1% -------------------------------------------------------------------------
2% EXAMPLE: SHOCK_OBLIQUE_R
3%
4% Compute pre-shock and post-shock state (incident and reflected) for a
5% oblique incident shock wave at standard conditions, a set of 51 species
6% considered, a initial shock front velocities u1 = a1 * 10 [m/s], and a
7% deflection angle theta = 20 [deg]
8%
9% Air_ions == {'eminus', 'Ar', 'Arplus', 'C', 'Cplus', 'Cminus', ...
10% 'CN', 'CNplus', 'CNminus', 'CNN', 'CO', 'COplus', ...
11% 'CO2', 'CO2plus', 'C2', 'C2plus', 'C2minus', 'CCN', ...
12% 'CNC', 'OCCN', 'C2N2', 'C2O', 'C3', 'C3O2', 'N', ...
13% 'Nplus', 'Nminus', 'NCO', 'NO', 'NOplus', 'NO2', ...
14% 'NO2minus', 'NO3', 'NO3minus', 'N2', 'N2plus', ...
15% 'N2minus', 'NCN', 'N2O', 'N2Oplus', 'N2O3', 'N2O4', ...
16% 'N2O5', 'N3', 'O', 'Oplus', 'Ominus', 'O2', 'O2plus', ...
17% 'O2minus', 'O3'}
18%
19% See wiki or list_species() for more predefined sets of species
20%
21% @author: Alberto Cuadra Lara
22% PhD Candidate - Group Fluid Mechanics
23% Universidad Carlos III de Madrid
24%
25% Last update July 22 2022
26% -------------------------------------------------------------------------
27
28%% INITIALIZE
29self = App('Air_ions');
30% self = App({'O2', 'N2', 'Ar', 'CO2'}); % Frozen
31% self = App({'O2'}); % Frozen
32%% INITIAL CONDITIONS
33self = set_prop(self, 'TR', 300, 'pR', 1 * 1.01325);
34self.PD.S_Oxidizer = {'N2', 'O2', 'Ar', 'CO2'};
35self.PD.N_Oxidizer = [78.084, 20.9476, 0.9365, 0.0319] ./ 20.9476;
36%% ADDITIONAL INPUTS (DEPENDS OF THE PROBLEM SELECTED)
37overdriven = 10;
38self = set_prop(self, 'u1', 3.472107491008314e+02 * overdriven, 'theta', 20);
39%% SOLVE PROBLEM
40self = solve_problem(self, 'SHOCK_OBLIQUE_R');
41%% DISPLAY RESULTS (PLOTS)
42post_results(self);