-
Notifications
You must be signed in to change notification settings - Fork 0
/
input_file
284 lines (275 loc) · 7.73 KB
/
input_file
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
!-----------------------------------------------------------------------
&run_type
! i_run_type = 0 : User application.
! = 1 : Euler 1D tests in "z".
! = 2 : Test vertical hydrostatic balance for a thin disk.
! z-direction only. Can impose acoustic pulse.
! = 3 : Test homentropic solid-body rotation. r-direction
! only. Parameters set internally.
! = 4 : Single vortex Fargo test.
! = 5 : 3D vertical shear instability.
! = 6 : Vortex pair
! = 7 : Taylor-Couette flow
! = 8 : Advection test. Please go into the Makefile and set
! advection_test = yes and compile the code. Note that
! this is an exlusive setting and you will not able to
! run any other application with it activated.
i_run_type = 8
/
!-----------------------------------------------------------------------
! Input for i_run_type = 0, i.e., for input to
! subroutine user_application. See app_user.f90 for the template
! which you may modify.
&user_input
restart = .false.
nr = 1
nz = 1
nphi = 1
nsteps = 1
/
!-----------------------------------------------------------------------
! Input for i_run_type = 1: Euler 1D tests.
! For the code see app_euler1d_tests.f90
&euler1d_tests_input
! Problem type = 1: Acoustic pulse; 2: Shock-tube
problem_type = 2,
!
nz = 512,
! Number of output steps:
n_output_steps = 4
! Time between output steps:
dt_output = 0.15d0
cfl = 1.0d0,
!
! These two parameters apply for the acoustic pulse test case only:
isothermal = .false.,
periodic_z = .true.,
!
! These parameters are for the shock-tube test case only:
apply_pade_filter = .true.,
eps_filter = 0.05d0,
apply_artificial_pressure = .true.,
! Coefficient for the artificial pressure:
C_ap = 2.d0
/
!-----------------------------------------------------------------------
! Input for i_run_type = 2: Hydrostatic balance test.
! See app_hydrostatic_test.f90 for the code. An acoustic wave can be
! superimposed.
&hydrostatic_test_input
nz = 256,
cfl = 1.0d0,
nsteps = 1000,
profiles_interval = 100,
apply_pade_filter = .false.,
eps_or_tau = 'eps',
eps_filter = 0.01d0,
tau_filter = 0.25d0,
! Parameters of superimposed acoustic pulse:
eps = 0.01d0,
sigma = 0.20d0,
z0 = 0.0d0
! This sets the min and max of the domain in terms of the scale height:
zmax_over_H = 3.0d0,
apply_artificial_pressure = .false.,
C_ap = 1.0d0,
isothermal = .false.
/
!-----------------------------------------------------------------------
! Input for i_run_type = 4: Single vortex Fargo test.
&vid_input
restart = .false.,
nr = 1024,
nphi = 1024,
!nr = 100,
!nphi = 10,
cfl = 1.0d0,
!nsteps = 1000,
nsteps = 2000,
tecplot_interval = 100,
tau_filter = 0.05d0,
apply_fargo_trick = .false.,
integer_shifts = .false.,
apply_fargo_correction = .false.,
use_supplied_dt = .false.,
dt = 0.00034d0,
isothermal = .true.,
/
!-----------------------------------------------------------------------
! Input for i_run_type = 6: Vortex Pair
! See app_vortex_pair.f90 for the application subroutine.
&vp_input
restart = .false.,
nr = 512,
nphi = 512,
cfl = 1.5d0,
nsteps = 100000,
hit_target = .true.
t_target = 4.d0
tecplot_interval = 200,
tau_filter = 0.01d0,
apply_fargo_trick = .false.,
integer_shifts = .false.,
apply_fargo_correction = .false.,
use_supplied_dt = .false.,
dt = 4.9063d-5,
isothermal = .true.,
apply_artificial_pressure = .false.,
C_ap = 1.0d0,
/
!-----------------------------------------------------------------------
! Input for i_run_type = 5: 3D vertical shear instability
! See app_vsi_3D.f90 for the code.
&vsi_3D_input
restart = .false.
! 1 : Old style restart file with basic state
! 2 : New style restart file without basic state
file_version = 2
perturb = .true.
isothermal = .true.
nr = 358
nz = 256
nphi = 512
phi_max_over_pi = 2.d0
cfl = 1.5d0
dt_min = 1.d-8
nsteps = 30000
tecplot_interval = 500
!
output_profiles = .false.
profiles_interval = 20000000
!
! Output Reynolds phi averages from which Favre phi-time averaged means and stresses
! can be computed using TOOLS/phi_time_Favre_averages.f90. This is valid only in a stationary
! state.
output_phi_Reynolds_averages = .false.
time_interval_for_phi_Reynolds_averages = 0.5d0
fluctuation_ke_interval = 200
! Interval for intermediate writing of a file called "save_xxxx" or "mpi_save_xxxx",
! with the same format as a restart file.
save_interval = 270
wavy_perturbation = .true.
zmax_over_H0 = 3.0d0
use_rsize_for_domain = .true.
! If the above is .true., this will determine the domain size:
rsize_over_H0 = 7.d0
rmin_over_H0 = 6.5d0
! Otherwise this will determine the domain size:
n_waves_in_r = 10
!
use_Manger_p = .false.
!
apply_newtonian_cooling = .false.
tau_cooling_over_t_Kepler_at_mid_radius = 0.d0
!
apply_pade_filter = .true.
eps_or_tau = 'eps'
eps_filter = 0.125d0
tau_filter = 0.05d0
!
apply_artificial_pressure = .true.
C_ap = 1.3d0
!
apply_viscosity = .false.
! Viscosity types are: laminar = 1, Moin_etal = 2, Vreman = 3, ddsv = 4, Moin_ddsv = 5, &
! Vreman_ddsv = 6
viscosity_type = 2
C_DDSV = 1.d0
! Boolean for naming files using the step number rather than the time:
name_using_step = .true.
! Boundary condition types are:
! null = 0, non_reflective = 1, zero_normal_momentum = 2,
! Cassen_Moosman_BC = 3, zero_normal_momentum_if_subsonic = 4,
! outflow = 5, periodic = 6, viscous_wall = 7, zero_shear_stress = 8
rmin_BC = 2
rmax_BC = 2
zmin_BC = 2
zmax_BC = 2
! This flag is for a non-reflective BC.
ibalanced = 1
apply_fargo_trick = .true.
! This is needed only if the above is .true.:
apply_fargo_correction = .true.
! Sponge paramaters:
!
! Valid sponge_types
! 'bsd+nul': Sponge when basic-state density is < rho1. rho2 marks the end of the
! transition region where the sponge ends.
! 'drw+nul': sponge when the distance from the nearest radial boundary < d1. d2 marks
! the end of the transition region.
! 'daw+nul': sponge when the distance from any boundary is < d1
! 'bsd+drm': This combined bsd and distance from the rmin boundary.
! 'drw+bsd': Combines the "distance to the nearest radial boundary" and
! "basic state density criteria"
apply_sponge = .true.
sponge_type = 'daw+nul'
rho1 = 0.008d0
rho2 = 0.01d0
!d1 = 0.25d0
!d2 = 0.50d0
d1 = 0.4d0
d2 = 0.5d0
n_decay_steps = 20
tau_decay = 0.d0
/
!-----------------------------------------------------------------------
! Input for i_run_type = 7: Taylor-Couette flow
! See app_taylor_couette.f90 for the application subroutine.
&tc_input
! Run type and sub-type:
! 1: Marcus axisymmetric Taylor-Couette
! 2: Dong (2007), L_z/d = 2*pi
! 3: Axial motion of the cylinders.
! 4: Meyer-Spasche and Keller
! 5: Moser
! 1: Meyer
! 2: Donnelly & Simon narrow gap (moser_DS_narrow)
! 3: Donnelly & Simon wide gap (moser_DS_wide )
! 7: Dong (2008) counter-rotating, Lz/d = 2*pi, eta = 0.5
! 8: Laminar with the same sub-types as Moser.
itype = 7
isubtype = 3
! Reynolds number for Dong's (2007) or (2008) set-up (itype = 2 or 7):
Re_Dong = 500.d0
!
restart = .true.
file_verision = 2
perturb = .false..
!
nr = 32
nz = 32
nphi = 1
!
cfl = 1.5d0
nsteps = 30000
! Also interval for Reynolds averages:
tecplot_interval = 30000
profiles_interval = 10
save_interval = 10000
history_interval = 50
!
apply_pade_filter = .true.
eps_or_tau = 'eps'
eps_filter = 0.02d0
tau_filter = 0.d0
/
!-----------------------------------------------------------------------
!
! Input for i_run_type = 8: Advection test
! See app_advection_test.f90 for the application subroutine.
&advec_input
!
restart = .false.
file_version = 2
!
nr = 8
nz = 8
nphi = 8
!
t_max_over_pi = 6.d0
cfl = 1.0d0
!
apply_pade_filter = .true.
eps_filter = 0.005d0
/
!-----------------------------------------------------------------------