SFEMaNS  version 4.1 (work in progress)
Reference documentation for SFEMaNS
 All Classes Files Functions Variables Groups Pages
boundary.f90
Go to the documentation of this file.
1 module boundary
38 
39 CONTAINS
40  SUBROUTINE assign_boundary
41  USE input_data
42  USE my_util
43  IMPLICIT NONE
44  INTEGER :: i
45  IF (inputs%test_de_convergence) THEN
46  i=inputs%numero_du_test_debug
47  ELSE
48  i=0
49  END IF
50  SELECT case(i)
51  case(0)
52  init_velocity_pressure => init_velocity_pressure_generic
53  init_temperature => init_temperature_generic
54  init_level_set => init_level_set_generic
55  source_in_ns_momentum => source_in_ns_momentum_generic
56  source_in_temperature => source_in_temperature_generic
57  source_in_level_set => source_in_level_set_generic
58  vv_exact => vv_exact_generic
59  imposed_velocity_by_penalty => imposed_velocity_by_penalty_generic
60  pp_exact => pp_exact_generic
61  temperature_exact=> temperature_exact_generic
62  level_set_exact => level_set_exact_generic
63  penal_in_real_space => penal_in_real_space_generic
64  extension_velocity => extension_velocity_generic
65  vexact => vexact_generic
66  h_b_quasi_static => h_b_quasi_static_generic
67  hexact => hexact_generic
68  phiexact => phiexact_generic
69  jexact_gauss => jexact_gauss_generic
70  eexact_gauss => eexact_gauss_generic
71  init_maxwell => init_maxwell_generic
72  mu_bar_in_fourier_space => mu_bar_in_fourier_space_generic
73  grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_generic
74  mu_in_real_space=> mu_in_real_space_generic
75  sigma_bar_in_fourier_space => sigma_bar_in_fourier_space_generic
76  kelvin_force_coeff => kelvin_force_coeff_generic
77  case(1)
78  init_velocity_pressure => init_velocity_pressure_test_1
79 !!$ init_temperature => init_temperature_test_1
80 !!$ init_level_set => init_level_set_test_1
81  source_in_ns_momentum => source_in_ns_momentum_test_1
82 !!$ source_in_temperature => source_in_temperature_test_1
83 !!$ source_in_level_set => source_in_level_set_test_1
84  vv_exact => vv_exact_test_1
85 !!$ imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_1
86  pp_exact => pp_exact_test_1
87 !!$ temperature_exact=> temperature_exact_test_1
88 !!$ level_set_exact => level_set_exact_test_1
89 !!$ penal_in_real_space => penal_in_real_space_test_1
90 !!$ extension_velocity => extension_velocity_test_1
91 !!$ Vexact => Vexact_test_1
92 !!$ H_B_quasi_static => H_B_quasi_static_test_1
93 !!$ Hexact => Hexact_test_1
94 !!$ Phiexact => Phiexact_test_1
95 !!$ Jexact_gauss => Jexact_gauss_test_1
96 !!$ Eexact_gauss => Eexact_gauss_test_1
97 !!$ init_maxwell => init_maxwell_test_1
98 !!$ mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_1
99 !!$ grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_1
100 !!$ mu_in_real_space=> mu_in_real_space_test_1
101  case(2)
102  init_velocity_pressure => init_velocity_pressure_test_2
103 !!$ init_temperature => init_temperature_test_2
104 !!$ init_level_set => init_level_set_test_2
105  source_in_ns_momentum => source_in_ns_momentum_test_2
106 !!$ source_in_temperature => source_in_temperature_test_2
107 !!$ source_in_level_set => source_in_level_set_test_2
108  vv_exact => vv_exact_test_2
109 !!$ imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_2
110  pp_exact => pp_exact_test_2
111 !!$ temperature_exact=> temperature_exact_test_2
112 !!$ level_set_exact => level_set_exact_test_2
113 !!$ penal_in_real_space => penal_in_real_space_test_2
114 !!$ extension_velocity => extension_velocity_test_2
115 !!$ Vexact => Vexact_test_2
116 !!$ H_B_quasi_static => H_B_quasi_static_test_2
117 !!$ Hexact => Hexact_test_2
118 !!$ Phiexact => Phiexact_test_2
119 !!$ Jexact_gauss => Jexact_gauss_test_2
120 !!$ Eexact_gauss => Eexact_gauss_test_2
121 !!$ init_maxwell => init_maxwell_test_2
122 !!$ mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_2
123 !!$ grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_2
124 !!$ mu_in_real_space=> mu_in_real_space_test_2
125  case(3)
126 !!$ init_velocity_pressure => init_velocity_pressure_test_3
127 !!$ init_temperature => init_temperature_test_3
128 !!$ init_level_set => init_level_set_test_3
129 !!$ source_in_NS_momentum => source_in_NS_momentum_test_3
130 !!$ source_in_temperature => source_in_temperature_test_3
131 !!$ source_in_level_set => source_in_level_set_test_3
132 !!$ vv_exact => vv_exact_test_3
133 !!$ imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_3
134 !!$ pp_exact => pp_exact_test_3
135 !!$ temperature_exact=> temperature_exact_test_3
136 !!$ level_set_exact => level_set_exact_test_3
137 !!$ penal_in_real_space => penal_in_real_space_test_3
138 !!$ extension_velocity => extension_velocity_test_3
139  vexact => vexact_test_3
140 !!$ H_B_quasi_static => H_B_quasi_static_test_3
141  hexact => hexact_test_3
142  phiexact => phiexact_test_3
143  jexact_gauss => jexact_gauss_test_3
144  eexact_gauss => eexact_gauss_test_3
145  init_maxwell => init_maxwell_test_3
146 !!$ mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_3
147 !!$ grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_3
148 !!$ mu_in_real_space=> mu_in_real_space_test_3
149  case(4)
150 !!$ init_velocity_pressure => init_velocity_pressure_test_4
151 !!$ init_temperature => init_temperature_test_4
152 !!$ init_level_set => init_level_set_test_4
153 !!$ source_in_NS_momentum => source_in_NS_momentum_test_4
154 !!$ source_in_temperature => source_in_temperature_test_4
155 !!$ source_in_level_set => source_in_level_set_test_4
156 !!$ vv_exact => vv_exact_test_4
157 !!$ imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_4
158 !!$ pp_exact => pp_exact_test_4
159 !!$ temperature_exact=> temperature_exact_test_4
160 !!$ level_set_exact => level_set_exact_test_4
161 !!$ penal_in_real_space => penal_in_real_space_test_4
162 !!$ extension_velocity => extension_velocity_test_4
163  vexact => vexact_test_4
164 !!$ H_B_quasi_static => H_B_quasi_static_test_4
165  hexact => hexact_test_4
166  phiexact => phiexact_test_4
167  jexact_gauss => jexact_gauss_test_4
168  eexact_gauss => eexact_gauss_test_4
169  init_maxwell => init_maxwell_test_4
170 !!$ mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_4
171 !!$ grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_4
172 !!$ mu_in_real_space=> mu_in_real_space_test_4
173  case(5)
174 !!$ init_velocity_pressure => init_velocity_pressure_test_5
175 !!$ init_temperature => init_temperature_test_5
176 !!$ init_level_set => init_level_set_test_5
177 !!$ source_in_NS_momentum => source_in_NS_momentum_test_5
178 !!$ source_in_temperature => source_in_temperature_test_5
179 !!$ source_in_level_set => source_in_level_set_test_5
180 !!$ vv_exact => vv_exact_test_5
181 !!$ imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_5
182 !!$ pp_exact => pp_exact_test_5
183 !!$ temperature_exact=> temperature_exact_test_5
184 !!$ level_set_exact => level_set_exact_test_5
185 !!$ penal_in_real_space => penal_in_real_space_test_5
186 !!$ extension_velocity => extension_velocity_test_5
187  vexact => vexact_test_5
188 !!$ H_B_quasi_static => H_B_quasi_static_test_5
189  hexact => hexact_test_5
190  phiexact => phiexact_test_5
191  jexact_gauss => jexact_gauss_test_5
192  eexact_gauss => eexact_gauss_test_5
193  init_maxwell => init_maxwell_test_5
194 !!$ mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_5
195 !!$ grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_5
196 !!$ mu_in_real_space=> mu_in_real_space_test_5
197  case(6)
198 !!$ init_velocity_pressure => init_velocity_pressure_test_6
199 !!$ init_temperature => init_temperature_test_6
200 !!$ init_level_set => init_level_set_test_6
201 !!$ source_in_NS_momentum => source_in_NS_momentum_test_6
202 !!$ source_in_temperature => source_in_temperature_test_6
203 !!$ source_in_level_set => source_in_level_set_test_6
204 !!$ vv_exact => vv_exact_test_6
205 !!$ imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_6
206 !!$ pp_exact => pp_exact_test_6
207 !!$ temperature_exact=> temperature_exact_test_6
208 !!$ level_set_exact => level_set_exact_test_6
209 !!$ penal_in_real_space => penal_in_real_space_test_6
210 !!$ extension_velocity => extension_velocity_test_6
211  vexact => vexact_test_6
212 !!$ H_B_quasi_static => H_B_quasi_static_test_6
213  hexact => hexact_test_6
214  phiexact => phiexact_test_6
215  jexact_gauss => jexact_gauss_test_6
216  eexact_gauss => eexact_gauss_test_6
217  init_maxwell => init_maxwell_test_6
218 !!$ mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_6
219 !!$ grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_6
220 !!$ mu_in_real_space=> mu_in_real_space_test_6
221  case(7)
222 !!$ init_velocity_pressure => init_velocity_pressure_test_7
223 !!$ init_temperature => init_temperature_test_7
224 !!$ init_level_set => init_level_set_test_7
225 !!$ source_in_NS_momentum => source_in_NS_momentum_test_7
226 !!$ source_in_temperature => source_in_temperature_test_7
227 !!$ source_in_level_set => source_in_level_set_test_7
228 !!$ vv_exact => vv_exact_test_7
229 !!$ imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_7
230 !!$ pp_exact => pp_exact_test_7
231 !!$ temperature_exact=> temperature_exact_test_7
232 !!$ level_set_exact => level_set_exact_test_7
233 !!$ penal_in_real_space => penal_in_real_space_test_7
234 !!$ extension_velocity => extension_velocity_test_7
235  vexact => vexact_test_7
236 !!$ H_B_quasi_static => H_B_quasi_static_test_7
237  hexact => hexact_test_7
238  phiexact => phiexact_test_7
239  jexact_gauss => jexact_gauss_test_7
240  eexact_gauss => eexact_gauss_test_7
241  init_maxwell => init_maxwell_test_7
242 !!$ mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_7
243 !!$ grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_7
244 !!$ mu_in_real_space=> mu_in_real_space_test_7
245  case(8)
246  init_velocity_pressure => init_velocity_pressure_test_8
247  init_temperature => init_temperature_test_8
248 !!$ init_level_set => init_level_set_test_8
249  source_in_ns_momentum => source_in_ns_momentum_test_8
250  source_in_temperature => source_in_temperature_test_8
251 !!$ source_in_level_set => source_in_level_set_test_8
252  vv_exact => vv_exact_test_8
253 !!$ imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_8
254  pp_exact => pp_exact_test_8
255  temperature_exact=> temperature_exact_test_8
256 !!$ level_set_exact => level_set_exact_test_8
257 !!$ penal_in_real_space => penal_in_real_space_test_8
258  extension_velocity => extension_velocity_test_8
259 !!$ Vexact => Vexact_test_8
260 !!$ H_B_quasi_static => H_B_quasi_static_test_8
261 !!$ Hexact => Hexact_test_8
262 !!$ Phiexact => Phiexact_test_8
263 !!$ Jexact_gauss => Jexact_gauss_test_8
264 !!$ Eexact_gauss => Eexact_gauss_test_8
265 !!$ init_maxwell => init_maxwell_test_8
266 !!$ mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_8
267 !!$ grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_8
268 !!$ mu_in_real_space=> mu_in_real_space_test_8
269  case(9)
270  init_velocity_pressure => init_velocity_pressure_test_9
271  init_temperature => init_temperature_test_9
272 !!$ init_level_set => init_level_set_test_9
273  source_in_ns_momentum => source_in_ns_momentum_test_9
274  source_in_temperature => source_in_temperature_test_9
275 !!$ source_in_level_set => source_in_level_set_test_9
276  vv_exact => vv_exact_test_9
277 !!$ imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_9
278  pp_exact => pp_exact_test_9
279  temperature_exact=> temperature_exact_test_9
280 !!$ level_set_exact => level_set_exact_test_9
281 !!$ penal_in_real_space => penal_in_real_space_test_9
282  extension_velocity => extension_velocity_test_9
283 !!$ Vexact => Vexact_test_9
284 !!$ H_B_quasi_static => H_B_quasi_static_test_9
285 !!$ Hexact => Hexact_test_9
286 !!$ Phiexact => Phiexact_test_9
287 !!$ Jexact_gauss => Jexact_gauss_test_9
288 !!$ Eexact_gauss => Eexact_gauss_test_9
289 !!$ init_maxwell => init_maxwell_test_9
290 !!$ mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_9
291 !!$ grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_9
292 !!$ mu_in_real_space=> mu_in_real_space_test_9
293  case(10)
294 !!$ init_velocity_pressure => init_velocity_pressure_test_10
295 !!$ init_temperature => init_temperature_test_10
296 !!$ init_level_set => init_level_set_test_10
297 !!$ source_in_NS_momentum => source_in_NS_momentum_test_10
298 !!$ source_in_temperature => source_in_temperature_test_10
299 !!$ source_in_level_set => source_in_level_set_test_10
300 !!$ vv_exact => vv_exact_test_10
301 !!$ imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_10
302 !!$ pp_exact => pp_exact_test_10
303 !!$ temperature_exact=> temperature_exact_test_10
304 !!$ level_set_exact => level_set_exact_test_10
305 !!$ penal_in_real_space => penal_in_real_space_test_10
306 !!$ extension_velocity => extension_velocity_test_10
307  vexact => vexact_test_10
308 !!$ H_B_quasi_static => H_B_quasi_static_test_10
309  hexact => hexact_test_10
310  phiexact => phiexact_test_10
311  jexact_gauss => jexact_gauss_test_10
312  eexact_gauss => eexact_gauss_test_10
313  init_maxwell => init_maxwell_test_10
314 !!$ mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_10
315 !!$ grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_10
316 !!$ mu_in_real_space=> mu_in_real_space_test_10
317  case(11)
318  init_velocity_pressure => init_velocity_pressure_test_11
319  init_temperature => init_temperature_test_11
320 !!$ init_level_set => init_level_set_test_11
321  source_in_ns_momentum => source_in_ns_momentum_test_11
322  source_in_temperature => source_in_temperature_test_11
323 !!$ source_in_level_set => source_in_level_set_test_11
324  vv_exact => vv_exact_test_11
325 !!$ imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_11
326  pp_exact => pp_exact_test_11
327  temperature_exact=> temperature_exact_test_11
328 !!$ level_set_exact => level_set_exact_test_11
329 !!$ penal_in_real_space => penal_in_real_space_test_11
330  extension_velocity => extension_velocity_test_11
331 !!$ Vexact => Vexact_test_11
332 !!$ H_B_quasi_static => H_B_quasi_static_test_11
333  hexact => hexact_test_11
334  phiexact => phiexact_test_11
335  jexact_gauss => jexact_gauss_test_11
336  eexact_gauss => eexact_gauss_test_11
337  init_maxwell => init_maxwell_test_11
338 !!$ mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_11
339 !!$ grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_11
340 !!$ mu_in_real_space=> mu_in_real_space_test_11
341  case(12)
342 !!$ init_velocity_pressure => init_velocity_pressure_test_12
343 !!$ init_temperature => init_temperature_test_12
344 !!$ init_level_set => init_level_set_test_12
345 !!$ source_in_NS_momentum => source_in_NS_momentum_test_12
346 !!$ source_in_temperature => source_in_temperature_test_12
347 !!$ source_in_level_set => source_in_level_set_test_12
348 !!$ vv_exact => vv_exact_test_12
349 !!$ imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_12
350 !!$ pp_exact => pp_exact_test_12
351 !!$ temperature_exact=> temperature_exact_test_12
352 !!$ level_set_exact => level_set_exact_test_12
353 !!$ penal_in_real_space => penal_in_real_space_test_12
354 !!$ extension_velocity => extension_velocity_test_12
355  vexact => vexact_test_12
356 !!$ H_B_quasi_static => H_B_quasi_static_test_12
357  hexact => hexact_test_12
358  phiexact => phiexact_test_12
359  jexact_gauss => jexact_gauss_test_12
360  eexact_gauss => eexact_gauss_test_12
361  init_maxwell => init_maxwell_test_12
362 !!$ mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_12
363 !!$ grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_12
364 !!$ mu_in_real_space=> mu_in_real_space_test_12
365  case(13)
366  init_velocity_pressure => init_velocity_pressure_test_13
367 !!$ init_temperature => init_temperature_test_13
368 !!$ init_level_set => init_level_set_test_13
369  source_in_ns_momentum => source_in_ns_momentum_test_13
370 !!$ source_in_temperature => source_in_temperature_test_13
371 !!$ source_in_level_set => source_in_level_set_test_13
372  vv_exact => vv_exact_test_13
373 !!$ imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_13
374  pp_exact => pp_exact_test_13
375 !!$ temperature_exact=> temperature_exact_test_13
376 !!$ level_set_exact => level_set_exact_test_13
377 !!$ penal_in_real_space => penal_in_real_space_test_13
378  extension_velocity => extension_velocity_test_13
379 !!$ Vexact => Vexact_test_13
380 !!$ H_B_quasi_static => H_B_quasi_static_test_13
381  hexact => hexact_test_13
382  phiexact => phiexact_test_13
383  jexact_gauss => jexact_gauss_test_13
384  eexact_gauss => eexact_gauss_test_13
385  init_maxwell => init_maxwell_test_13
386 !!$ mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_13
387 !!$ grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_13
388 !!$ mu_in_real_space=> mu_in_real_space_test_13
389  case(14)
390 !!$ init_velocity_pressure => init_velocity_pressure_test_14
391 !!$ init_temperature => init_temperature_test_14
392 !!$ init_level_set => init_level_set_test_14
393 !!$ source_in_NS_momentum => source_in_NS_momentum_test_14
394 !!$ source_in_temperature => source_in_temperature_test_14
395 !!$ source_in_level_set => source_in_level_set_test_14
396 !!$ vv_exact => vv_exact_test_14
397 !!$ imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_14
398 !!$ pp_exact => pp_exact_test_14
399 !!$ temperature_exact=> temperature_exact_test_14
400 !!$ level_set_exact => level_set_exact_test_14
401 !!$ penal_in_real_space => penal_in_real_space_test_14
402 !!$ extension_velocity => extension_velocity_test_14
403  vexact => vexact_test_14
404 !!$ H_B_quasi_static => H_B_quasi_static_test_14
405  hexact => hexact_test_14
406  phiexact => phiexact_test_14
407  jexact_gauss => jexact_gauss_test_14
408  eexact_gauss => eexact_gauss_test_14
409  init_maxwell => init_maxwell_test_14
410 !!$ mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_14
411 !!$ grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_14
412 !!$ mu_in_real_space=> mu_in_real_space_test_14
413  case(15)
414  init_velocity_pressure => init_velocity_pressure_test_15
415  init_temperature => init_temperature_test_15
416 !!$ init_level_set => init_level_set_test_15
417  source_in_ns_momentum => source_in_ns_momentum_test_15
418  source_in_temperature => source_in_temperature_test_15
419 !!$ source_in_level_set => source_in_level_set_test_15
420  vv_exact => vv_exact_test_15
421 !!$ imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_15
422  pp_exact => pp_exact_test_15
423  temperature_exact=> temperature_exact_test_15
424 !!$ level_set_exact => level_set_exact_test_15
425 !!$ penal_in_real_space => penal_in_real_space_test_15
426  extension_velocity => extension_velocity_test_15
427 !!$ Vexact => Vexact_test_15
428 !!$ H_B_quasi_static => H_B_quasi_static_test_15
429 !!$ Hexact => Hexact_test_15
430 !!$ Phiexact => Phiexact_test_15
431 !!$ Jexact_gauss => Jexact_gauss_test_15
432 !!$ Eexact_gauss => Eexact_gauss_test_15
433 !!$ init_maxwell => init_maxwell_test_15
434 !!$ mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_15
435 !!$ grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_15
436 !!$ mu_in_real_space=> mu_in_real_space_test_15
437  case(16)
438  init_velocity_pressure => init_velocity_pressure_test_16
439 !!$ init_temperature => init_temperature_test_16
440 !!$ init_level_set => init_level_set_test_16
441  source_in_ns_momentum => source_in_ns_momentum_test_16
442 !!$ source_in_temperature => source_in_temperature_test_16
443 !!$ source_in_level_set => source_in_level_set_test_16
444  vv_exact => vv_exact_test_16
445 !!$ imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_16
446  pp_exact => pp_exact_test_16
447 !!$ temperature_exact=> temperature_exact_test_16
448 !!$ level_set_exact => level_set_exact_test_16
449 !!$ penal_in_real_space => penal_in_real_space_test_16
450 !!$ extension_velocity => extension_velocity_test_16
451 !!$ Vexact => Vexact_test_16
452 !!$ H_B_quasi_static => H_B_quasi_static_test_16
453 !!$ Hexact => Hexact_test_16
454 !!$ Phiexact => Phiexact_test_16
455 !!$ Jexact_gauss => Jexact_gauss_test_16
456 !!$ Eexact_gauss => Eexact_gauss_test_16
457 !!$ init_maxwell => init_maxwell_test_16
458 !!$ mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_16
459 !!$ grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_16
460 !!$ mu_in_real_space=> mu_in_real_space_test_16
461  case(17)
462 !!$ init_velocity_pressure => init_velocity_pressure_test_17
463 !!$ init_temperature => init_temperature_test_17
464 !!$ init_level_set => init_level_set_test_17
465 !!$ source_in_NS_momentum => source_in_NS_momentum_test_17
466 !!$ source_in_temperature => source_in_temperature_test_17
467 !!$ source_in_level_set => source_in_level_set_test_17
468 !!$ vv_exact => vv_exact_test_17
469 !!$ imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_17
470 !!$ pp_exact => pp_exact_test_17
471 !!$ temperature_exact=> temperature_exact_test_17
472 !!$ level_set_exact => level_set_exact_test_17
473 !!$ penal_in_real_space => penal_in_real_space_test_17
474 !!$ extension_velocity => extension_velocity_test_17
475  vexact => vexact_test_17
476 !!$ H_B_quasi_static => H_B_quasi_static_test_17
477  hexact => hexact_test_17
478  phiexact => phiexact_test_17
479  jexact_gauss => jexact_gauss_test_17
480  eexact_gauss => eexact_gauss_test_17
481  init_maxwell => init_maxwell_test_17
482  mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_17
483  grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_17
484 !!$ mu_in_real_space=> mu_in_real_space_test_17
485  case(18)
486 !!$ init_velocity_pressure => init_velocity_pressure_test_18
487 !!$ init_temperature => init_temperature_test_18
488 !!$ init_level_set => init_level_set_test_18
489 !!$ source_in_NS_momentum => source_in_NS_momentum_test_18
490 !!$ source_in_temperature => source_in_temperature_test_18
491 !!$ source_in_level_set => source_in_level_set_test_18
492 !!$ vv_exact => vv_exact_test_18
493 !!$ imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_18
494 !!$ pp_exact => pp_exact_test_18
495 !!$ temperature_exact=> temperature_exact_test_18
496 !!$ level_set_exact => level_set_exact_test_18
497 !!$ penal_in_real_space => penal_in_real_space_test_18
498 !!$ extension_velocity => extension_velocity_test_18
499  vexact => vexact_test_18
500 !!$ H_B_quasi_static => H_B_quasi_static_test_18
501  hexact => hexact_test_18
502  phiexact => phiexact_test_18
503  jexact_gauss => jexact_gauss_test_18
504  eexact_gauss => eexact_gauss_test_18
505  init_maxwell => init_maxwell_test_18
506  mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_18
507  grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_18
508 !!$ mu_in_real_space=> mu_in_real_space_test_18
509  case(19)
510  init_velocity_pressure => init_velocity_pressure_test_19
511 !!$ init_temperature => init_temperature_test_19
512  init_level_set => init_level_set_test_19
513  source_in_ns_momentum => source_in_ns_momentum_test_19
514 !!$ source_in_temperature => source_in_temperature_test_19
515  source_in_level_set => source_in_level_set_test_19
516  vv_exact => vv_exact_test_19
517 !!$ imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_19
518  pp_exact => pp_exact_test_19
519 !!$ temperature_exact=> temperature_exact_test_19
520  level_set_exact => level_set_exact_test_19
521 !!$ penal_in_real_space => penal_in_real_space_test_19
522 !!$ extension_velocity => extension_velocity_test_19
523 !!$ Vexact => Vexact_test_19
524 !!$ H_B_quasi_static => H_B_quasi_static_test_19
525 !!$ Hexact => Hexact_test_19
526 !!$ Phiexact => Phiexact_test_19
527 !!$ Jexact_gauss => Jexact_gauss_test_19
528 !!$ Eexact_gauss => Eexact_gauss_test_19
529 !!$ init_maxwell => init_maxwell_test_19
530 !!$ mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_19
531 !!$ grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_19
532 !!$ mu_in_real_space=> mu_in_real_space_test_19
533  case(20)
534  init_velocity_pressure => init_velocity_pressure_test_20
535 !!$ init_temperature => init_temperature_test_20
536  init_level_set => init_level_set_test_20
537  source_in_ns_momentum => source_in_ns_momentum_test_20
538 !!$ source_in_temperature => source_in_temperature_test_20
539  source_in_level_set => source_in_level_set_test_20
540  vv_exact => vv_exact_test_20
541 !!$ imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_20
542  pp_exact => pp_exact_test_20
543 !!$ temperature_exact=> temperature_exact_test_20
544  level_set_exact => level_set_exact_test_20
545 !!$ penal_in_real_space => penal_in_real_space_test_20
546 !!$ extension_velocity => extension_velocity_test_20
547 !!$ Vexact => Vexact_test_20
548 !!$ H_B_quasi_static => H_B_quasi_static_test_20
549 !!$ Hexact => Hexact_test_20
550 !!$ Phiexact => Phiexact_test_20
551 !!$ Jexact_gauss => Jexact_gauss_test_20
552 !!$ Eexact_gauss => Eexact_gauss_test_20
553 !!$ init_maxwell => init_maxwell_test_20
554 !!$ mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_20
555 !!$ grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_20
556 !!$ mu_in_real_space=> mu_in_real_space_test_20
557  case(21)
558  init_velocity_pressure => init_velocity_pressure_test_21
559 !!$ init_temperature => init_temperature_test_21
560  init_level_set => init_level_set_test_21
561  source_in_ns_momentum => source_in_ns_momentum_test_21
562 !!$ source_in_temperature => source_in_temperature_test_21
563  source_in_level_set => source_in_level_set_test_21
564  vv_exact => vv_exact_test_21
565 !!$ imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_21
566  pp_exact => pp_exact_test_21
567 !!$ temperature_exact=> temperature_exact_test_21
568  level_set_exact => level_set_exact_test_21
569 !!$ penal_in_real_space => penal_in_real_space_test_21
570  extension_velocity => extension_velocity_test_21
571 !!$ Vexact => Vexact_test_21
572 !!$ H_B_quasi_static => H_B_quasi_static_test_21
573  hexact => hexact_test_21
574  phiexact => phiexact_test_21
575  jexact_gauss => jexact_gauss_test_21
576  eexact_gauss => eexact_gauss_test_21
577  init_maxwell => init_maxwell_test_21
578 !!$ mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_21
579 !!$ grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_21
580 !!$ mu_in_real_space=> mu_in_real_space_test_21
581  sigma_bar_in_fourier_space => sigma_bar_in_fourier_space_21
582  case(22)
583 !!$ init_velocity_pressure => init_velocity_pressure_test_22
584 !!$ init_temperature => init_temperature_test_22
585 !!$ init_level_set => init_level_set_test_22
586 !!$ source_in_NS_momentum => source_in_NS_momentum_test_22
587 !!$ source_in_temperature => source_in_temperature_test_22
588 !!$ source_in_level_set => source_in_level_set_test_22
589 !!$ vv_exact => vv_exact_test_22
590 !!$ imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_22
591 !!$ pp_exact => pp_exact_test_22
592 !!$ temperature_exact=> temperature_exact_test_22
593 !!$ level_set_exact => level_set_exact_test_22
594 !!$ penal_in_real_space => penal_in_real_space_test_22
595 !!$ extension_velocity => extension_velocity_test_22
596  vexact => vexact_test_22
597 !!$ H_B_quasi_static => H_B_quasi_static_test_22
598  hexact => hexact_test_22
599  phiexact => phiexact_test_22
600  jexact_gauss => jexact_gauss_test_22
601  eexact_gauss => eexact_gauss_test_22
602  init_maxwell => init_maxwell_test_22
603  mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_22
604  grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_22
605  mu_in_real_space=> mu_in_real_space_test_22
606  case(23)
607 !!$ init_velocity_pressure => init_velocity_pressure_test_23
608 !!$ init_temperature => init_temperature_test_23
609 !!$ init_level_set => init_level_set_test_23
610 !!$ source_in_NS_momentum => source_in_NS_momentum_test_23
611 !!$ source_in_temperature => source_in_temperature_test_23
612 !!$ source_in_level_set => source_in_level_set_test_23
613 !!$ vv_exact => vv_exact_test_23
614 !!$ imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_23
615 !!$ pp_exact => pp_exact_test_23
616 !!$ temperature_exact=> temperature_exact_test_23
617 !!$ level_set_exact => level_set_exact_test_23
618 !!$ penal_in_real_space => penal_in_real_space_test_23
619 !!$ extension_velocity => extension_velocity_test_23
620  vexact => vexact_test_23
621 !!$ H_B_quasi_static => H_B_quasi_static_test_23
622  hexact => hexact_test_23
623  phiexact => phiexact_test_23
624  jexact_gauss => jexact_gauss_test_23
625  eexact_gauss => eexact_gauss_test_23
626  init_maxwell => init_maxwell_test_23
627  mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_23
628  grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_23
629  mu_in_real_space=> mu_in_real_space_test_23
630  case(24)
631  init_velocity_pressure => init_velocity_pressure_test_24
632 !!$ init_temperature => init_temperature_test_24
633 !!$ init_level_set => init_level_set_test_24
634  source_in_ns_momentum => source_in_ns_momentum_test_24
635 !!$ source_in_temperature => source_in_temperature_test_24
636 !!$ source_in_level_set => source_in_level_set_test_24
637  vv_exact => vv_exact_test_24
638  imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_24
639  pp_exact => pp_exact_test_24
640 !!$ temperature_exact=> temperature_exact_test_24
641 !!$ level_set_exact => level_set_exact_test_24
642  penal_in_real_space => penal_in_real_space_test_24
643 !!$ extension_velocity => extension_velocity_test_24
644 !!$ Vexact => Vexact_test_24
645 !!$ H_B_quasi_static => H_B_quasi_static_test_24
646 !!$ Hexact => Hexact_test_24
647 !!$ Phiexact => Phiexact_test_24
648 !!$ Jexact_gauss => Jexact_gauss_test_24
649 !!$ Eexact_gauss => Eexact_gauss_test_24
650 !!$ init_maxwell => init_maxwell_test_24
651 !!$ mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_24
652 !!$ grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_24
653 !!$ mu_in_real_space=> mu_in_real_space_test_24
654  case(25)
655  init_velocity_pressure => init_velocity_pressure_test_25
656 !!$ init_temperature => init_temperature_test_25
657  init_level_set => init_level_set_test_25
658  source_in_ns_momentum => source_in_ns_momentum_test_25
659 !!$ source_in_temperature => source_in_temperature_test_25
660  source_in_level_set => source_in_level_set_test_25
661  vv_exact => vv_exact_test_25
662 !!$ imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_25
663  pp_exact => pp_exact_test_25
664 !!$ temperature_exact=> temperature_exact_test_25
665  level_set_exact => level_set_exact_test_25
666 !!$ penal_in_real_space => penal_in_real_space_test_25
667 !!$ extension_velocity => extension_velocity_test_25
668 !!$ Vexact => Vexact_test_25
669 !!$ H_B_quasi_static => H_B_quasi_static_test_25
670 !!$ Hexact => Hexact_test_25
671 !!$ Phiexact => Phiexact_test_25
672 !!$ Jexact_gauss => Jexact_gauss_test_25
673 !!$ Eexact_gauss => Eexact_gauss_test_25
674 !!$ init_maxwell => init_maxwell_test_25
675 !!$ mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_25
676 !!$ grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_25
677 !!$ mu_in_real_space=> mu_in_real_space_test_25
678  case(26)
679 !!$ init_velocity_pressure => init_velocity_pressure_test_26
680 !!$ init_temperature => init_temperature_test_26
681 !!$ init_level_set => init_level_set_test_26
682 !!$ source_in_NS_momentum => source_in_NS_momentum_test_26
683 !!$ source_in_temperature => source_in_temperature_test_26
684 !!$ source_in_level_set => source_in_level_set_test_26
685 !!$ vv_exact => vv_exact_test_26
686 !!$ imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_26
687 !!$ pp_exact => pp_exact_test_26
688 !!$ temperature_exact=> temperature_exact_test_26
689 !!$ level_set_exact => level_set_exact_test_26
690 !!$ penal_in_real_space => penal_in_real_space_test_26
691 !!$ extension_velocity => extension_velocity_test_26
692  vexact => vexact_test_26
693 !!$ H_B_quasi_static => H_B_quasi_static_test_26
694  hexact => hexact_test_26
695  phiexact => phiexact_test_26
696  jexact_gauss => jexact_gauss_test_26
697  eexact_gauss => eexact_gauss_test_26
698  init_maxwell => init_maxwell_test_26
699  mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_26
700  grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_26
701 !!$ mu_in_real_space=> mu_in_real_space_test_26
702  case(27)
703 !!$ init_velocity_pressure => init_velocity_pressure_test_27
704 !!$ init_temperature => init_temperature_test_27
705 !!$ init_level_set => init_level_set_test_27
706 !!$ source_in_NS_momentum => source_in_NS_momentum_test_27
707 !!$ source_in_temperature => source_in_temperature_test_27
708 !!$ source_in_level_set => source_in_level_set_test_27
709 !!$ vv_exact => vv_exact_test_27
710 !!$ imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_27
711 !!$ pp_exact => pp_exact_test_27
712 !!$ temperature_exact=> temperature_exact_test_27
713 !!$ level_set_exact => level_set_exact_test_27
714 !!$ penal_in_real_space => penal_in_real_space_test_27
715 !!$ extension_velocity => extension_velocity_test_27
716  vexact => vexact_test_27
717 !!$ H_B_quasi_static => H_B_quasi_static_test_27
718  hexact => hexact_test_27
719  phiexact => phiexact_test_27
720  jexact_gauss => jexact_gauss_test_27
721  eexact_gauss => eexact_gauss_test_27
722  init_maxwell => init_maxwell_test_27
723  mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_27
724  grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_27
725  mu_in_real_space=> mu_in_real_space_test_27
726  case(28)
727  init_velocity_pressure => init_velocity_pressure_test_28
728 !!$ init_temperature => init_temperature_test_28
729 !!$ init_level_set => init_level_set_test_28
730  source_in_ns_momentum => source_in_ns_momentum_test_28
731 !!$ source_in_temperature => source_in_temperature_test_28
732 !!$ source_in_level_set => source_in_level_set_test_28
733  vv_exact => vv_exact_test_28
734  imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_28
735  pp_exact => pp_exact_test_28
736 !!$ temperature_exact=> temperature_exact_test_28
737 !!$ level_set_exact => level_set_exact_test_28
738  penal_in_real_space => penal_in_real_space_test_28
739 !!$ extension_velocity => extension_velocity_test_28
740 !!$ Vexact => Vexact_test_28
741 !!$ H_B_quasi_static => H_B_quasi_static_test_28
742 !!$ Hexact => Hexact_test_28
743 !!$ Phiexact => Phiexact_test_28
744 !!$ Jexact_gauss => Jexact_gauss_test_28
745 !!$ Eexact_gauss => Eexact_gauss_test_28
746 !!$ init_maxwell => init_maxwell_test_28
747 !!$ mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_28
748 !!$ grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_28
749 !!$ mu_in_real_space=> mu_in_real_space_test_28
750  case(29)
751  init_velocity_pressure => init_velocity_pressure_test_29
752 !!$ init_temperature => init_temperature_test_29
753 !!$ init_level_set => init_level_set_test_29
754  source_in_ns_momentum => source_in_ns_momentum_test_29
755 !!$ source_in_temperature => source_in_temperature_test_29
756 !!$ source_in_level_set => source_in_level_set_test_29
757  vv_exact => vv_exact_test_29
758  imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_29
759  pp_exact => pp_exact_test_29
760 !!$ temperature_exact=> temperature_exact_test_29
761 !!$ level_set_exact => level_set_exact_test_29
762  penal_in_real_space => penal_in_real_space_test_29
763  extension_velocity => extension_velocity_test_29
764 !!$ Vexact => Vexact_test_29
765 !!$ H_B_quasi_static => H_B_quasi_static_test_29
766  hexact => hexact_test_29
767  phiexact => phiexact_test_29
768  jexact_gauss => jexact_gauss_test_29
769  eexact_gauss => eexact_gauss_test_29
770  init_maxwell => init_maxwell_test_29
771  mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_29
772  grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_29
773  mu_in_real_space=> mu_in_real_space_test_29
774  case(30)
775  init_velocity_pressure => init_velocity_pressure_test_30
776  init_temperature => init_temperature_test_30
777 !!$ init_level_set => init_level_set_test_30
778  source_in_ns_momentum => source_in_ns_momentum_test_30
779  source_in_temperature => source_in_temperature_test_30
780 !!$ source_in_level_set => source_in_level_set_test_30
781  vv_exact => vv_exact_test_30
782 !!$ imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_30
783  pp_exact => pp_exact_test_30
784  temperature_exact=> temperature_exact_test_30
785 !!$ level_set_exact => level_set_exact_test_30
786 !!$ penal_in_real_space => penal_in_real_space_test_30
787  extension_velocity => extension_velocity_test_30
788 !!$ Vexact => Vexact_test_30
789 !!$ H_B_quasi_static => H_B_quasi_static_test_30
790 !!$ Hexact => Hexact_test_30
791 !!$ Phiexact => Phiexact_test_30
792 !!$ Jexact_gauss => Jexact_gauss_test_30
793 !!$ Eexact_gauss => Eexact_gauss_test_30
794 !!$ init_maxwell => init_maxwell_test_30
795 !!$ mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_30
796 !!$ grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_30
797 !!$ mu_in_real_space=> mu_in_real_space_test_30
798  case(31)
799  init_velocity_pressure => init_velocity_pressure_test_31
800  init_temperature => init_temperature_test_31
801 !!$ init_level_set => init_level_set_test_31
802  source_in_ns_momentum => source_in_ns_momentum_test_31
803  source_in_temperature => source_in_temperature_test_31
804 !!$ source_in_level_set => source_in_level_set_test_31
805  vv_exact => vv_exact_test_31
806 !!$ imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_31
807  pp_exact => pp_exact_test_31
808  temperature_exact=> temperature_exact_test_31
809 !!$ level_set_exact => level_set_exact_test_31
810 !!$ penal_in_real_space => penal_in_real_space_test_31
811  extension_velocity => extension_velocity_test_31
812 !!$ Vexact => Vexact_test_31
813 !!$ H_B_quasi_static => H_B_quasi_static_test_31
814 !!$ Hexact => Hexact_test_31
815 !!$ Phiexact => Phiexact_test_31
816 !!$ Jexact_gauss => Jexact_gauss_test_31
817 !!$ Eexact_gauss => Eexact_gauss_test_31
818 !!$ init_maxwell => init_maxwell_test_31
819 !!$ mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_31
820 !!$ grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_31
821 !!$ mu_in_real_space=> mu_in_real_space_test_31
822  case(32)
823  init_velocity_pressure => init_velocity_pressure_test_32
824  init_temperature => init_temperature_test_32
825 !!$ init_level_set => init_level_set_test_32
826  source_in_ns_momentum => source_in_ns_momentum_test_32
827  source_in_temperature => source_in_temperature_test_32
828 !!$ source_in_level_set => source_in_level_set_test_32
829  vv_exact => vv_exact_test_32
830 !!$ imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_32
831  pp_exact => pp_exact_test_32
832  temperature_exact=> temperature_exact_test_32
833 !!$ level_set_exact => level_set_exact_test_32
834 !!$ penal_in_real_space => penal_in_real_space_test_32
835  extension_velocity => extension_velocity_test_32
836 !!$ Vexact => Vexact_test_32
837 !!$ H_B_quasi_static => H_B_quasi_static_test_32
838 !!$ Hexact => Hexact_test_32
839 !!$ Phiexact => Phiexact_test_32
840 !!$ Jexact_gauss => Jexact_gauss_test_32
841 !!$ Eexact_gauss => Eexact_gauss_test_32
842 !!$ init_maxwell => init_maxwell_test_32
843 !!$ mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_32
844 !!$ grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_32
845 !!$ mu_in_real_space=> mu_in_real_space_test_32
846  case(33)
847  init_velocity_pressure => init_velocity_pressure_test_33
848  init_temperature => init_temperature_test_33
849 !!$ init_level_set => init_level_set_test_33
850  source_in_ns_momentum => source_in_ns_momentum_test_33
851  source_in_temperature => source_in_temperature_test_33
852 !!$ source_in_level_set => source_in_level_set_test_33
853  vv_exact => vv_exact_test_33
854 !!$ imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_33
855  pp_exact => pp_exact_test_33
856  temperature_exact=> temperature_exact_test_33
857 !!$ level_set_exact => level_set_exact_test_33
858 !!$ penal_in_real_space => penal_in_real_space_test_33
859  extension_velocity => extension_velocity_test_33
860 !!$ Vexact => Vexact_test_33
861 !!$ H_B_quasi_static => H_B_quasi_static_test_33
862  hexact => hexact_test_33
863  phiexact => phiexact_test_33
864  jexact_gauss => jexact_gauss_test_33
865  eexact_gauss => eexact_gauss_test_33
866  init_maxwell => init_maxwell_test_33
867 !!$ mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_33
868 !!$ grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_33
869 !!$ mu_in_real_space=> mu_in_real_space_test_33
870  kelvin_force_coeff => kelvin_force_coeff_test_33
871  case(34)
872  init_velocity_pressure => init_velocity_pressure_test_34
873  init_temperature => init_temperature_test_34
874 !!$ init_level_set => init_level_set_test_34
875  source_in_ns_momentum => source_in_ns_momentum_test_34
876  source_in_temperature => source_in_temperature_test_34
877 !!$ source_in_level_set => source_in_level_set_test_34
878  vv_exact => vv_exact_test_34
879 !!$ imposed_velocity_by_penalty => imposed_velocity_by_penalty_test_34
880  pp_exact => pp_exact_test_34
881  temperature_exact=> temperature_exact_test_34
882 !!$ level_set_exact => level_set_exact_test_34
883 !!$ penal_in_real_space => penal_in_real_space_test_34
884  extension_velocity => extension_velocity_test_34
885 !!$ Vexact => Vexact_test_34
886 !!$ H_B_quasi_static => H_B_quasi_static_test_34
887  hexact => hexact_test_34
888  phiexact => phiexact_test_34
889  jexact_gauss => jexact_gauss_test_34
890  eexact_gauss => eexact_gauss_test_34
891  init_maxwell => init_maxwell_test_34
892 !!$ mu_bar_in_fourier_space => mu_bar_in_fourier_space_test_34
893 !!$ grad_mu_bar_in_fourier_space=> grad_mu_bar_in_fourier_space_test_34
894 !!$ mu_in_real_space=> mu_in_real_space_test_34
895  kelvin_force_coeff => kelvin_force_coeff_test_34
896 
897  CASE default
898  CALL error_petsc(' BUG in assign_boundary, wrong test number')
899  end SELECT
900  END SUBROUTINE assign_boundary
901 end module boundary
real(kind=8) function, dimension(size(rr, 2)), public source_in_ns_momentum(TYPE, rr, mode, i, time, Re, ty, opt_density, opt_tempn)
real(kind=8) function, dimension(size(rr, 2)), public pp_exact(TYPE, rr, m, t)
real(kind=8) function, dimension(h_mesh%np), public extension_velocity(TYPE, H_mesh, mode, t, n_start)
real(kind=8) function, dimension(size(rr, 2)), public source_in_level_set(interface_nb, TYPE, rr, m, t)
real(kind=8) function, dimension(size(h_mesh%rr, 2)), public sigma_bar_in_fourier_space(H_mesh)
subroutine, public init_maxwell(H_mesh, phi_mesh, time, dt, mu_H_field, mu_phi, list_mode, Hn1, Hn, phin1, phin)
real(kind=8) function, public kelvin_force_coeff(temp)
real(kind=8) function, dimension(size(rr, 2), 6), public h_b_quasi_static(char_h_b, rr, m)
Definition: condlim.f90:276
real(kind=8) function, public jexact_gauss(TYPE, rr, m, mu_phi, sigma, mu_H, t, mesh_id, opt_B_ext)
real(kind=8) function, dimension(h_mesh%np, 6), public vexact(m, H_mesh)
subroutine assign_boundary
Definition: boundary.f90:40
real(kind=8) function, dimension(nb_angles, ne-nb+1), public penal_in_real_space(mesh, rr_gauss, angles, nb_angles, nb, ne, time)
real(kind=8) function, dimension(size(rr, 2)), public temperature_exact(TYPE, rr, m, t)
real(kind=8) function, dimension(size(rr, 2)), public vv_exact(TYPE, rr, m, t)
real(kind=8) function, dimension(size(rr, 2)), public phiexact(TYPE, rr, m, mu_phi, t)
real(kind=8) function, dimension(size(rr, 2), 6), public imposed_velocity_by_penalty(rr, t)
real(kind=8) function, dimension(2), public grad_mu_bar_in_fourier_space(pt, pt_id)
real(kind=8) function, dimension(nb_angles, ne-nb+1), public mu_in_real_space(H_mesh, angles, nb_angles, nb, ne, time)
real(kind=8) function, dimension(size(rr, 2)), public source_in_temperature(TYPE, rr, m, t)
real(kind=8) function, public eexact_gauss(TYPE, rr, m, mu_phi, sigma, mu_H, t)
subroutine, public init_velocity_pressure(mesh_f, mesh_c, time, dt, list_mode, un_m1, un, pn_m1, pn, phin_m1, phin)
real(kind=8) function, dimension(ne-nb+1), public mu_bar_in_fourier_space(H_mesh, nb, ne, pts, pts_ids)
subroutine error_petsc(string)
Definition: my_util.f90:15
real(kind=8) function, dimension(size(rr, 2)), public level_set_exact(interface_nb, TYPE, rr, m, t)
real(kind=8) function, dimension(size(rr, 2)), public hexact(H_mesh, TYPE, rr, m, mu_H_field, t)
subroutine, public init_level_set(vv_mesh, time, dt, list_mode, level_set_m1, level_set)
subroutine, public init_temperature(mesh, time, dt, list_mode, tempn_m1, tempn)