source: trunk/src/sinobad.d @ 54

Last change on this file since 54 was 54, checked in by jbrlod, 13 years ago

gestion des options
File size: 35.6 KB
Line 
1//#define SOLSORYAO
2//#define OPTIMORDER
3//#==============================================================================
4//#             fichier de DESCRIPTION sinobad.d
5//#Mohamed Berrada 26/02/2009
6//#modification (#define) Julien Brajard 06/2011
7//#==============================================================================
8//#DEFVAL ---------------------------------------------DEFVAL
9//#definition de valeur
10defval NPCA    15 
11defval NX      32   
12defval NY      22 
13defval NZ      31 
14defval NMAX    800 //    !  maximum of iterations for the SOR solver
15defval TA      50 |__DATE__ | number of time steps
16defval TU       2 | start time step
17//#exec disp_valdef
18#ifdef SOLSORYAO
19defval K_SOLSORYAO
20#endif
21#ifdef OPTIMORDER
22defval K_OPTIMORDER
23#endif
24
25//#HAT_NAME -----------------------------------------HAT_NAME
26hat_name  sinobad
27 
28//#OPTION ----------------------------------------------OPTION
29
30option    O_M1QN3 | M2QN1
31//#option O_VARINCR
32//#option    O_GRADTEST
33option   O_DBG_NANF
34//#option   O_DBG_TING
35option  O_EXTOBJ "../object/ncutil.o"
36option O_REAL double
37option o_parallel 16
38
39//#TRAJECTOIRES (DIM) -----------------------------------TRAJ
40traj  Tcst       M   0   1
41traj  Tsbd       M   TU  0   1  TA
42exec disp_traj
43
44
45space  S0d       M    1           Tcst
46//#space  S3d    M    NX NY NZ    Tcst
47space  S3d       M    NX NY NZ    Tcst
48space  S3dt      M    NX NY NZ    Tsbd
49#ifdef SOLSORYAO
50space  S3dt_b    M    NX NY NZ    Tsbd
51space  Ssolsor   M    NX NY NMAX  Tsbd
52#endif
53
54exec disp_space
55
56//#######################################################################################
57//#----------------------------------------
58//# choisir le vecteur du contrÃŽle (target)
59//#----------------------------------------
60//#modul         pca_ta                 space   S0d     noward                            output NPCA   target
61
62modul    sshn_c                 space   S3d inter YA1 YA2       noward            output 1      |target
63
64modul    ta_c                   space   S3d                     noward            output 1      target
65
66//#modul         ta_c                   space   S3d     input array NPCA                  output 1     
67
68modul    sa_c                   space   S3d                     noward            output 1      |target
69modul    ua_c                   space   S3d                     noward            output 1      |target
70modul    va_c                   space   S3d                     noward            output 1      |target
71
72//#-------------
73//# Les modules dans l'ordre du code NEMO/OPA
74//#-------------
75//#boucle sur kt (NEMO/OPA)
76//#step(kt) --->  --->
77//##START_sbc (debut routine sbc)
78modul    sbcgyre_qsr_qns        space   S3dt inter YA1 YA2      input 1           output 2      tempo   
79modul    sbcgyre_emp1           space   S3dt inter YA1 YA2      input 0           output 1      tempo   
80modul    sbcgyre_zsumemp_zsurf  space   S3dt inter YA1 YA2      input 5           output 2      tempo   
81modul    sbcgyre_emp            space   S3dt inter YA1 YA2      input 3           output 1      tempo   
82modul    sbcgyre_emps           space   S3dt inter YA1 YA2      input 1           output 1      tempo
83modul    sbcgyre_utau_vtau      space   S3dt inter YA1 YA2      input 0           output 2      tempo   
84modul    sbcgyre_wndm           space   S3dt inter YA1 YA2      input 4           output 1      tempo   
85//##END_sbc (fin routine sbc)
86
87//##START_bn2  (debut routine bn2)  (neos=2)
88modul    bn2_rn2                space   S3dt                    input 4           output 1      tempo   
89//##END_bn2(fin routine bn2)
90
91//##START_zdf     (n_evdm=1,nbotfr=2)
92//#mélange vertical
93modul    zdf_avt_avmu_avmv      space   S3dt                    input 19          output 3      tempo   
94modul    zdfmxl_hmld            space   S3dt inter YA1 YA2      input array NZ    output 1      tempo
95modul    zdfmxl_nmln_hmlp_hmlpt space   S3dt inter YA1 YA2      input array NZ    output 3      tempo   
96//##END_zdf
97
98//##START_trasbc
99//#température et salinté de surface
100modul    ta_sa_trasbc           space   S3dt inter YA1 YA2      input 3           output 2      tempo   
101//#//#END_trasbc
102
103//##START_traqsr
104modul    ta_traqsr              space   S3dt                    input 2           output 1      tempo   
105//##END_traqsr
106
107//##START_traadv_cen2
108//#advection (cen2 second order center scheme)
109modul    zcent_hor_traadv_cen2  space   S3dt                    input 5           output 2      tempo
110modul    zcens_hor_traadv_cen2  space   S3dt    clonol  zcent_hor_traadv_cen2
111modul    ta_hor_traadv_cen2     space   S3dt                    input 5           output 1      tempo
112modul    sa_hor_traadv_cen2     space   S3dt                    input 5           output 1      tempo
113modul    zcent_ver_traadv_cen2  space   S3dt                    input 3           output 1      tempo
114modul    zcens_ver_traadv_cen2  space   S3dt    clonol  zcent_ver_traadv_cen2
115modul    ta_ver_traadv_cen2     space   S3dt                    input 3           output 1      tempo
116modul    sa_ver_traadv_cen2     space   S3dt    clonol  ta_ver_traadv_cen2
117
118//##END_traadv_cen2
119
120//##START_traldf_lap
121//#diffusion latérale (laplacian scheme)
122modul    ztuv_traldf_lap        space   S3dt                    input 3           output 2      tempo
123modul    zsuv_traldf_lap        space   S3dt    clonol  ztuv_traldf_lap
124modul    ta_traldf_lap          space   S3dt                    input 5           output 1      tempo
125modul    sa_traldf_lap          space   S3dt    clonol  ta_traldf_lap
126//##END_traldf_lap
127
128//##START_trazdf_imp
129//#diffusion verticale (schema implicit)
130modul   zwisd_trazdf_imp        space   S3dt                    input 2           output 3      tempo
131modul   zrhs_trazdf_imp         space   S3dt                    input 2           output 1      tempo
132modul   zrhs_sa_trazdf_imp      space   S3dt    clonol zrhs_trazdf_imp 
133modul   zwt_trazdf_imp          space   S3dt                    input 4           output 1      tempo
134modul   ta_de_trazdf_imp        space   S3dt    clonol zwt_trazdf_imp
135modul   ta                      space   S3dt                    input 5           output 1      tempo
136modul   sa_de_trazdf_imp        space   S3dt    clonol ta_de_trazdf_imp
137modul   sa                      space   S3dt                    input 5           output 1      tempo
138//##END_trazdf_imp
139
140//##START_tra_nxt
141//#tracer next : filtre asselin
142modul    tb                     space   S3dt                    input 4           output 1      tempo cout
143modul    sb                     space   S3dt                    input 4           output 1      tempo cout
144//##END_tra_nxt
145
146//##START_eos
147//#equation of state, density
148modul    rhd                    space   S3dt                    input 2           output 1      tempo
149modul    rhop                   space   S3dt                    input 1           output 1      tempo
150//##END_eos
151
152//##START_dyn_adv_cen2
153//#advention
154modul    hmf_TF_dynadv_cen2     space   S3dt                    input 6           output 4      tempo
155modul    zua_dhmf_dynadv_cen2   space   S3dt                    input 4           output 1      tempo
156modul    zva_dhmf_dynadv_cen2   space   S3dt                    input 4           output 1      tempo
157modul    zfuv_UW_dynadv_cen2    space   S3dt                    input 7           output 2      tempo
158modul    ua_dynadv_cen2         space   S3dt                    input 3           output 1      tempo
159modul    va_dynadv_cen2         space   S3dt                    input 3           output 1      tempo
160//##END_dyn_adv_cen2
161
162//##START_vor
163//#vorticity enstrophy conservative scheme
164modul    zwxyz_vor_ene          space   S3dt                    input 4           output 3      tempo
165modul    ua_vor_ene             space   S3dt                    input 7           output 1      tempo
166modul    va_vor_ene             space   S3dt                    input 7           output 1      tempo
167//##END_vor
168
169//##START_dyn_ldf
170//#lateral diffusion
171modul    ua_dyn_ldf_lap         space   S3dt                    input 5           output 1      tempo
172modul    va_dyn_ldf_lap         space   S3dt                    input 5           output 1      tempo
173//##END_dyn_ldf
174
175//##START_dyn_hpg
176//#hydrostratic pressure gradient
177modul    zhpij_dyn_hpg_zco      space   S3dt                    input 8           output 2      tempo
178modul    ua_dyn_hpg_zco         space   S3dt                    input 2           output 1      tempo
179modul    va_dyn_hpg_zco         space   S3dt    clonol ua_dyn_hpg_zco
180//##END_dyn_hpg
181
182//##START_dyn_zdf
183//#vertical diffusion
184modul   zwisd_ua_dynzdf_imp     space   S3dt                    input 2           output 3      tempo
185modul   zwisd_va_dynzdf_imp     space   S3dt                    input 2           output 3      tempo
186modul   zrhs_ua_dynzdf_imp      space   S3dt                    input 3           output 1      tempo
187modul   zrhs_va_dynzdf_imp      space   S3dt                    input 3           output 1      tempo
188modul   zwt_ua_dynzdf_imp       space   S3dt    clonol    zwt_trazdf_imp
189modul   zwt_va_dynzdf_imp       space   S3dt    clonol    zwt_trazdf_imp
190modul   ua_de_dynzdf_imp        space   S3dt    clonol    ta_de_trazdf_imp
191modul   ua_dynzdf_imp           space   S3dt                    input 4           output 1      tempo
192modul   va_de_dynzdf_imp        space   S3dt    clonol    ta_de_trazdf_imp
193modul   va_dynzdf_imp           space   S3dt    clonol    ua_dynzdf_imp
194modul   ua_norm_dynzdf          space   S3dt                    input 2           output 1      tempo
195modul   va_norm_dynzdf          space   S3dt    clonol    ua_norm_dynzdf
196//##END_dyn_zdf
197
198//##START_dyn_spg
199//#surface presure gradient
200modul   spguv_now_dynspg        space   S3dt inter YA1 YA2      input 3           output 2      tempo
201modul   ua_1_dynspg_flt         space   S3dt                    input 3           output 1      tempo
202modul   va_1_dynspg_flt         space   S3dt                    input 3           output 1      tempo
203modul   sum_spgu_dynspg_flt     space   S3dt inter YA1 YA2      input array NZ    output 1      tempo
204modul   sum_spgv_dynspg_flt     space   S3dt inter YA1 YA2      input array NZ    output 1      tempo
205modul   gcb_dynspg_flt          space   S3dt inter YA1 YA2      input 4           output 1      tempo   
206modul   gcx_dynspg_flt          space   S3dt inter YA1 YA2      input 2           output 1      tempo   
207#ifndef SOLSORYAO
208modul   solsor_dynspg_flt       space   S3dt inter YA1 YA2      input array 19    output 1      tempo
209#endif
210
211#ifdef SOLSORYAO
212modul   solsor_gx1_x_r          space   Ssolsor                 input 8           output 2      tempo
213modul   solsor_gx2_x_r          space   Ssolsor                 input 9           output 2      tempo
214modul   solsor_flag             space   Ssolsor                 input 4           output 2      tempo
215#define S3dt S3dt_b
216#endif
217
218
219modul   gcx2                    space   S3dt inter YA1 YA2      input 1           output 1      tempo   
220modul   spguv_dynspg_flt        space   S3dt inter YA1 YA2      input 3           output 2      tempo   
221modul   ua                      space   S3dt                    input 3           output 1      tempo
222modul   va                      space   S3dt                    input 3           output 1      tempo
223modul   sshn                    space   S3dt inter YA1  YA2     input 4           output 1      tempo   
224modul   sshb                    space   S3dt inter YA1  YA2     input 4           output 1      tempo  cout
225//##END_dyn_spg
226
227//##START_dyn_nxt
228//#nxt : filtre d'asselin
229modul    ub                     space   S3dt                    input 4           output 1      tempo cout
230modul    vb                     space   S3dt                    input 4           output 1      tempo cout
231//##END_dyn_nxt
232
233//##START_divcur
234//#calcul de div et de rotationnel
235modul    hdivn                  space   S3dt                    input 4           output 1      tempo   
236modul    rotn                   space   S3dt                    input 4           output 1      tempo   
237//##END_divcur
238
239//##START_wzv
240//#vitesse vertical
241modul    wa                     space   S3dt                    input 2           output 1      tempo   
242//##END_wzv
243
244#ifdef SOLSORYAO
245#undef S3dt
246#endif
247
248//exec disp_modul
249//#############################################################################################
250
251//#ctin  ta_c                   1..NPCA from    pca_ta                  1..NPCA  1
252
253//#---------->sbcgyre
254ctin     sbcgyre_qsr_qns        1       from    tb                      1  i    j    1    t-1
255
256ctin     sbcgyre_zsumemp_zsurf  1       from    sbcgyre_zsumemp_zsurf   1  i-1  j         t
257ctin     sbcgyre_zsumemp_zsurf  2       from    sbcgyre_zsumemp_zsurf   1  NX   j-1       t
258ctin     sbcgyre_zsumemp_zsurf  3       from    sbcgyre_zsumemp_zsurf   2  i-1  j         t
259ctin     sbcgyre_zsumemp_zsurf  4       from    sbcgyre_zsumemp_zsurf   2  NX   j-1       t
260ctin     sbcgyre_zsumemp_zsurf  5       from    sbcgyre_emp1            1  i    j         t
261
262ctin     sbcgyre_emp            1       from    sbcgyre_emp1            1  i    j         t
263ctin     sbcgyre_emp            2       from    sbcgyre_zsumemp_zsurf   1  NX   NY        t
264ctin     sbcgyre_emp            3       from    sbcgyre_zsumemp_zsurf   2  NX   NY        t
265
266ctin     sbcgyre_emps           1       from    sbcgyre_emp             1  i    j         t
267
268ctin     sbcgyre_wndm           1       from    sbcgyre_utau_vtau       1  i-1  j         t
269ctin     sbcgyre_wndm           2       from    sbcgyre_utau_vtau       2  i    j-1       t
270ctin     sbcgyre_wndm           3       from    sbcgyre_utau_vtau       1  i    j         t
271ctin     sbcgyre_wndm           4       from    sbcgyre_utau_vtau       2  i    j         t
272
273//#---------->bn2
274ctin     bn2_rn2                1       from    tb                      1  i    j    k    t-1
275ctin     bn2_rn2                2       from    tb                      1  i    j    k-1  t-1
276ctin     bn2_rn2                3       from    sb                      1  i    j    k    t-1
277ctin     bn2_rn2                4       from    sb                      1  i    j    k-1  t-1
278
279//#---------->zdf
280ctin     zdf_avt_avmu_avmv      1       from    bn2_rn2                 1  i    j    k    t
281ctin     zdf_avt_avmu_avmv      2       from    bn2_rn2                 1  i+1  j    k    t
282ctin     zdf_avt_avmu_avmv      3       from    bn2_rn2                 1  i    j+1  k    t
283
284ctin     zdf_avt_avmu_avmv      4       from    ua                      1  i-1  j    30   t-1
285ctin     zdf_avt_avmu_avmv      5       from    ua                      1  i-1  j+1  30   t-1
286ctin     zdf_avt_avmu_avmv      6       from    ua                      1  i    j    30   t-1
287ctin     zdf_avt_avmu_avmv      7       from    ua                      1  i    j+1  30   t-1
288
289ctin     zdf_avt_avmu_avmv      8       from    ua                      1  i-1  j    2    t-1
290ctin     zdf_avt_avmu_avmv      9       from    ua                      1  i-1  j+1  2    t-1
291ctin     zdf_avt_avmu_avmv      10      from    ua                      1  i    j    2    t-1
292ctin     zdf_avt_avmu_avmv      11      from    ua                      1  i    j+1  2    t-1
293
294ctin     zdf_avt_avmu_avmv      12      from    va                      1  i    j-1  30   t-1
295ctin     zdf_avt_avmu_avmv      13      from    va                      1  i    j    30   t-1
296ctin     zdf_avt_avmu_avmv      14      from    va                      1  i+1  j-1  30   t-1
297ctin     zdf_avt_avmu_avmv      15      from    va                      1  i+1  j    30   t-1
298
299ctin     zdf_avt_avmu_avmv      16      from    va                      1  i    j-1  2    t-1
300ctin     zdf_avt_avmu_avmv      17      from    va                      1  i    j    2    t-1
301ctin     zdf_avt_avmu_avmv      18      from    va                      1  i+1  j-1  2    t-1
302ctin     zdf_avt_avmu_avmv      19      from    va                      1  i+1  j    2    t-1
303
304ctin     zdfmxl_hmld            1..NZ   from    zdf_avt_avmu_avmv       1  i    j   1..NZ t
305ctin     zdfmxl_nmln_hmlp_hmlpt 1..NZ   from    rhop                    1  i    j   1..NZ t-1
306
307//#---------->trasbc
308ctin     ta_sa_trasbc           1       from    sbcgyre_qsr_qns         2  i    j         t
309ctin     ta_sa_trasbc           2       from    sbcgyre_emps            1  i    j         t
310ctin     ta_sa_trasbc           3       from    sa                      1  i    j    1    t-1
311
312//#---------->traqsr
313ctin     ta_traqsr              1       from    sbcgyre_qsr_qns         1  i    j         t
314ctin     ta_traqsr              2       from    ta_sa_trasbc            1  i    j         t
315
316//#---------->traadv_cen2
317ctin    zcent_hor_traadv_cen2   1       from    ua                      1  i    j    k    t-1
318ctin    zcent_hor_traadv_cen2   2       from    va                      1  i    j    k    t-1
319ctin    zcent_hor_traadv_cen2   3       from    ta                      1  i    j    k    t-1
320ctin    zcent_hor_traadv_cen2   4       from    ta                      1  i    j+1  k    t-1
321ctin    zcent_hor_traadv_cen2   5       from    ta                      1  i+1  j    k    t-1
322
323ctin    zcens_hor_traadv_cen2   1       from    ua                      1  i    j    k    t-1
324ctin    zcens_hor_traadv_cen2   2       from    va                      1  i    j    k    t-1
325ctin    zcens_hor_traadv_cen2   3       from    sa                      1  i    j    k    t-1
326ctin    zcens_hor_traadv_cen2   4       from    sa                      1  i    j+1  k    t-1
327ctin    zcens_hor_traadv_cen2   5       from    sa                      1  i+1  j    k    t-1
328
329ctin    ta_hor_traadv_cen2      1       from    ta_traqsr               1  i    j    k    t
330ctin    ta_hor_traadv_cen2      2       from    zcent_hor_traadv_cen2   1  i-1  j    k    t
331ctin    ta_hor_traadv_cen2      3       from    zcent_hor_traadv_cen2   1  i    j    k    t
332ctin    ta_hor_traadv_cen2      4       from    zcent_hor_traadv_cen2   2  i    j-1  k    t
333ctin    ta_hor_traadv_cen2      5       from    zcent_hor_traadv_cen2   2  i    j    k    t
334
335ctin    sa_hor_traadv_cen2      1       from    ta_sa_trasbc            2  i    j         t
336ctin    sa_hor_traadv_cen2      2       from    zcens_hor_traadv_cen2   1  i-1  j    k    t
337ctin    sa_hor_traadv_cen2      3       from    zcens_hor_traadv_cen2   1  i    j    k    t
338ctin    sa_hor_traadv_cen2      4       from    zcens_hor_traadv_cen2   2  i    j-1  k    t
339ctin    sa_hor_traadv_cen2      5       from    zcens_hor_traadv_cen2   2  i    j    k    t
340
341ctin    zcent_ver_traadv_cen2   1       from    wa                      1  i    j    k    t-1
342ctin    zcent_ver_traadv_cen2   2       from    ta                      1  i    j    k    t-1
343ctin    zcent_ver_traadv_cen2   3       from    ta                      1  i    j    k-1  t-1
344
345ctin    zcens_ver_traadv_cen2   1       from    wa                      1  i    j    k    t-1
346ctin    zcens_ver_traadv_cen2   2       from    sa                      1  i    j    k    t-1
347ctin    zcens_ver_traadv_cen2   3       from    sa                      1  i    j    k-1  t-1
348
349ctin    ta_ver_traadv_cen2      1       from    ta_hor_traadv_cen2      1  i    j    k    t
350ctin    ta_ver_traadv_cen2      2       from    zcent_ver_traadv_cen2   1  i    j    k    t
351ctin    ta_ver_traadv_cen2      3       from    zcent_ver_traadv_cen2   1  i    j    k+1  t
352
353ctin    sa_ver_traadv_cen2      1       from    sa_hor_traadv_cen2      1  i    j    k    t
354ctin    sa_ver_traadv_cen2      2       from    zcens_ver_traadv_cen2   1  i    j    k    t
355ctin    sa_ver_traadv_cen2      3       from    zcens_ver_traadv_cen2   1  i    j    k+1  t
356
357//#---------->traldf_lap
358ctin     ztuv_traldf_lap        1       from    tb                      1  i    j    k    t-1
359ctin     ztuv_traldf_lap        2       from    tb                      1  i+1  j    k    t-1
360ctin     ztuv_traldf_lap        3       from    tb                      1  i    j+1  k    t-1
361
362ctin     zsuv_traldf_lap        1       from    sb                      1  i    j    k    t-1
363ctin     zsuv_traldf_lap        2       from    sb                      1  i+1  j    k    t-1
364ctin     zsuv_traldf_lap        3       from    sb                      1  i    j+1  k    t-1
365
366ctin     ta_traldf_lap          1       from    ta_ver_traadv_cen2      1  i    j    k    t
367ctin     ta_traldf_lap          2       from    ztuv_traldf_lap         1  i    j    k    t
368ctin     ta_traldf_lap          3       from    ztuv_traldf_lap         1  i-1  j    k    t
369ctin     ta_traldf_lap          4       from    ztuv_traldf_lap         2  i    j    k    t
370ctin     ta_traldf_lap          5       from    ztuv_traldf_lap         2  i    j-1  k    t
371
372ctin     sa_traldf_lap          1       from    sa_ver_traadv_cen2      1  i    j    k    t
373ctin     sa_traldf_lap          2       from    zsuv_traldf_lap         1  i    j    k    t
374ctin     sa_traldf_lap          3       from    zsuv_traldf_lap         1  i-1  j    k    t
375ctin     sa_traldf_lap          4       from    zsuv_traldf_lap         2  i    j    k    t
376ctin     sa_traldf_lap          5       from    zsuv_traldf_lap         2  i    j-1  k    t
377
378//#---------->trazdf_imp
379ctin     zwisd_trazdf_imp       1       from    zdf_avt_avmu_avmv       1  i    j    k    t
380ctin     zwisd_trazdf_imp       2       from    zdf_avt_avmu_avmv       1  i    j    k+1  t
381
382ctin     zrhs_trazdf_imp        1       from    ta_traldf_lap           1  i    j    k    t
383ctin     zrhs_trazdf_imp        2       from    tb                      1  i    j    k    t-1
384
385ctin     zrhs_sa_trazdf_imp     1       from    sa_traldf_lap           1  i    j    k    t
386ctin     zrhs_sa_trazdf_imp     2       from    sb                      1  i    j    k    t-1
387
388ctin     zwt_trazdf_imp         1       from    zwisd_trazdf_imp        1  i    j    k    t
389ctin     zwt_trazdf_imp         2       from    zwisd_trazdf_imp        2  i    j    k-1  t
390ctin     zwt_trazdf_imp         3       from    zwisd_trazdf_imp        3  i    j    k    t
391ctin     zwt_trazdf_imp         4       from    zwt_trazdf_imp          1  i    j    k-1  t
392
393ctin     ta_de_trazdf_imp       1       from    zwisd_trazdf_imp        1  i    j    k    t
394ctin     ta_de_trazdf_imp       2       from    ta_de_trazdf_imp        1  i    j    k-1  t
395ctin     ta_de_trazdf_imp       3       from    zrhs_trazdf_imp         1  i    j    k    t
396ctin     ta_de_trazdf_imp       4       from    zwt_trazdf_imp          1  i    j    k-1  t
397
398ctin     ta                     1       from    zwisd_trazdf_imp        2  i    j    k    t
399ctin     ta                     2       from    ta                      1  i    j    k+1  t
400ctin     ta                     3       from    ta_de_trazdf_imp        1  i    j    k    t
401ctin     ta                     4       from    zwt_trazdf_imp          1  i    j    k    t
402ctin     ta                     5       from    ta_c                    1  i    j    k
403
404ctin     sa_de_trazdf_imp       1       from    zwisd_trazdf_imp        1  i    j    k    t
405ctin     sa_de_trazdf_imp       2       from    sa_de_trazdf_imp        1  i    j    k-1  t
406ctin     sa_de_trazdf_imp       3       from    zrhs_sa_trazdf_imp      1  i    j    k    t
407ctin     sa_de_trazdf_imp       4       from    zwt_trazdf_imp          1  i    j    k-1  t
408
409ctin     sa                     1       from    zwisd_trazdf_imp        2  i    j    k    t
410ctin     sa                     2       from    sa              1  i    j    k+1  t
411ctin     sa                     3       from    sa_de_trazdf_imp        1  i    j    k    t
412ctin     sa                     4       from    zwt_trazdf_imp          1  i    j    k    t
413ctin     sa                     5       from    sa_c                    1  i    j    k
414
415//#---------->tra_nxt
416ctin     tb                     1       from    tb                      1  i    j    k    t-1
417ctin     tb                     2       from    ta                      1  i    j    k    t-1
418ctin     tb                     3       from    ta                      1  i    j    k    t
419ctin     tb                     4       from    ta_c                    1  i    j    k
420
421ctin     sb                     1       from    sb                      1  i    j    k    t-1
422ctin     sb                     2       from    sa                      1  i    j    k    t-1
423ctin     sb                     3       from    sa                      1  i    j    k    t
424ctin     sb                     4       from    sa_c                    1  i    j    k
425
426//#---------->eos
427ctin     rhd                    1       from    tb                      1  i    j    k    t
428ctin     rhd                    2       from    sb                      1  i    j    k    t
429
430ctin     rhop                   1       from    rhd                     1  i    j    k    t
431
432
433//#---------->dynadv_cen2
434ctin    hmf_TF_dynadv_cen2      1       from    ua                      1  i    j    k    t-1
435ctin    hmf_TF_dynadv_cen2      2       from    ua                      1  i+1  j    k    t-1
436ctin    hmf_TF_dynadv_cen2      3       from    ua                      1  i    j+1  k    t-1
437ctin    hmf_TF_dynadv_cen2      4       from    va                      1  i    j    k    t-1
438ctin    hmf_TF_dynadv_cen2      5       from    va                      1  i+1  j    k    t-1
439ctin    hmf_TF_dynadv_cen2      6       from    va                      1  i    j+1  k    t-1
440
441ctin    zua_dhmf_dynadv_cen2    1       from    hmf_TF_dynadv_cen2      1  i    j    k    t
442ctin    zua_dhmf_dynadv_cen2    2       from    hmf_TF_dynadv_cen2      1  i-1  j    k    t
443ctin    zua_dhmf_dynadv_cen2    3       from    hmf_TF_dynadv_cen2      2  i    j    k    t
444ctin    zua_dhmf_dynadv_cen2    4       from    hmf_TF_dynadv_cen2      2  i    j-1  k    t
445
446ctin    zva_dhmf_dynadv_cen2    1       from    hmf_TF_dynadv_cen2      3  i    j    k    t
447ctin    zva_dhmf_dynadv_cen2    2       from    hmf_TF_dynadv_cen2      3  i-1  j    k    t
448ctin    zva_dhmf_dynadv_cen2    3       from    hmf_TF_dynadv_cen2      4  i    j    k    t
449ctin    zva_dhmf_dynadv_cen2    4       from    hmf_TF_dynadv_cen2      4  i    j-1  k    t
450
451ctin    zfuv_UW_dynadv_cen2     1       from    wa                      1  i    j    k    t-1
452ctin    zfuv_UW_dynadv_cen2     2       from    wa                      1  i+1  j    k    t-1
453ctin    zfuv_UW_dynadv_cen2     3       from    wa                      1  i    j+1  k    t-1
454ctin    zfuv_UW_dynadv_cen2     4       from    ua                      1  i    j    k    t-1   
455ctin    zfuv_UW_dynadv_cen2     5       from    ua                      1  i    j    k-1  t-1
456ctin    zfuv_UW_dynadv_cen2     6       from    va                      1  i    j    k    t-1   
457ctin    zfuv_UW_dynadv_cen2     7       from    va                      1  i    j    k-1  t-1
458
459ctin    ua_dynadv_cen2          1       from    zfuv_UW_dynadv_cen2     1  i    j    k    t
460ctin    ua_dynadv_cen2          2       from    zfuv_UW_dynadv_cen2     1  i    j    k+1  t
461ctin    ua_dynadv_cen2          3       from    zua_dhmf_dynadv_cen2    1  i    j    k    t
462
463ctin    va_dynadv_cen2          1       from    zfuv_UW_dynadv_cen2     2  i    j    k    t
464ctin    va_dynadv_cen2          2       from    zfuv_UW_dynadv_cen2     2  i    j    k+1  t
465ctin    va_dynadv_cen2          3       from    zva_dhmf_dynadv_cen2    1  i    j    k    t
466
467//#---------->vor_ene
468ctin    zwxyz_vor_ene   1       from    ua                      1  i    j    k    t-1
469ctin    zwxyz_vor_ene   2       from    ua                      1  i    j+1  k    t-1
470ctin    zwxyz_vor_ene   3       from    va                      1  i    j    k    t-1
471ctin    zwxyz_vor_ene   4       from    va                      1  i+1  j    k    t-1
472
473ctin    ua_vor_ene      1       from    ua_dynadv_cen2          1  i    j    k    t
474ctin    ua_vor_ene      2       from    zwxyz_vor_ene           3  i    j-1  k    t
475ctin    ua_vor_ene      3       from    zwxyz_vor_ene           3  i    j    k    t
476ctin    ua_vor_ene      4       from    zwxyz_vor_ene           2  i    j-1  k    t
477ctin    ua_vor_ene      5       from    zwxyz_vor_ene           2  i    j    k    t
478ctin    ua_vor_ene      6       from    zwxyz_vor_ene           2  i+1  j-1  k    t
479ctin    ua_vor_ene      7       from    zwxyz_vor_ene           2  i+1  j    k    t
480
481ctin    va_vor_ene      1       from    va_dynadv_cen2          1  i    j    k    t
482ctin    va_vor_ene      2       from    zwxyz_vor_ene           3  i-1  j    k    t
483ctin    va_vor_ene      3       from    zwxyz_vor_ene           3  i    j    k    t
484ctin    va_vor_ene      4       from    zwxyz_vor_ene           1  i-1  j    k    t
485ctin    va_vor_ene      5       from    zwxyz_vor_ene           1  i-1  j+1  k    t
486ctin    va_vor_ene      6       from    zwxyz_vor_ene           1  i    j    k    t
487ctin    va_vor_ene      7       from    zwxyz_vor_ene           1  i    j+1  k    t
488
489//#---------->dyn_ldf_lap
490ctin    ua_dyn_ldf_lap  1       from    ua_vor_ene              1  i    j    k    t
491ctin    ua_dyn_ldf_lap  2       from    rotn                    1  i    j-1  k    t-2
492ctin    ua_dyn_ldf_lap  3       from    rotn                    1  i    j    k    t-2
493ctin    ua_dyn_ldf_lap  4       from    hdivn                   1  i    j    k    t-2
494ctin    ua_dyn_ldf_lap  5       from    hdivn                   1  i+1  j    k    t-2
495
496ctin    va_dyn_ldf_lap  1       from    va_vor_ene              1  i    j    k    t
497ctin    va_dyn_ldf_lap  2       from    rotn                    1  i-1  j    k    t-2
498ctin    va_dyn_ldf_lap  3       from    rotn                    1  i    j    k    t-2
499ctin    va_dyn_ldf_lap  4       from    hdivn                   1  i    j    k    t-2
500ctin    va_dyn_ldf_lap  5       from    hdivn                   1  i    j+1  k    t-2
501
502//#---------->dyn__hpg_zco
503ctin     zhpij_dyn_hpg_zco      1       from    rhd                     1  i+1  j    k    t
504ctin     zhpij_dyn_hpg_zco      2       from    rhd                     1  i    j+1  k    t
505ctin     zhpij_dyn_hpg_zco      3       from    rhd                     1  i    j    k    t
506ctin     zhpij_dyn_hpg_zco      4       from    rhd                     1  i+1  j    k-1  t
507ctin     zhpij_dyn_hpg_zco      5       from    rhd                     1  i    j+1  k-1  t
508ctin     zhpij_dyn_hpg_zco      6       from    rhd                     1  i    j    k-1  t
509ctin     zhpij_dyn_hpg_zco      7       from    zhpij_dyn_hpg_zco       1  i    j    k-1  t
510ctin     zhpij_dyn_hpg_zco      8       from    zhpij_dyn_hpg_zco       2  i    j    k-1  t
511
512ctin     ua_dyn_hpg_zco         1       from    ua_dyn_ldf_lap          1  i    j    k    t
513ctin     ua_dyn_hpg_zco         2       from    zhpij_dyn_hpg_zco       1  i    j    k    t
514
515ctin     va_dyn_hpg_zco         1       from    va_dyn_ldf_lap          1  i    j    k    t
516ctin     va_dyn_hpg_zco         2       from    zhpij_dyn_hpg_zco       2  i    j    k    t
517
518//#---------->dynzdf_imp
519ctin     zwisd_ua_dynzdf_imp    1       from    zdf_avt_avmu_avmv       2  i    j    k    t
520ctin     zwisd_ua_dynzdf_imp    2       from    zdf_avt_avmu_avmv       2  i    j    k+1  t
521
522ctin     zwisd_va_dynzdf_imp    1       from    zdf_avt_avmu_avmv       3  i    j    k    t
523ctin     zwisd_va_dynzdf_imp    2       from    zdf_avt_avmu_avmv       3  i    j    k+1  t
524
525ctin     zrhs_ua_dynzdf_imp     1       from    ua_dyn_hpg_zco          1  i    j    k    t
526ctin     zrhs_ua_dynzdf_imp     2       from    ub                      1  i    j    k    t-1
527ctin     zrhs_ua_dynzdf_imp     3       from    sbcgyre_utau_vtau       1  i    j         t
528
529ctin     zrhs_va_dynzdf_imp     1       from    va_dyn_hpg_zco          1  i    j    k    t
530ctin     zrhs_va_dynzdf_imp     2       from    vb                      1  i    j    k    t-1
531ctin     zrhs_va_dynzdf_imp     3       from    sbcgyre_utau_vtau       2  i    j         t
532
533ctin     zwt_ua_dynzdf_imp      1       from    zwisd_ua_dynzdf_imp     1  i    j    k    t
534ctin     zwt_ua_dynzdf_imp      2       from    zwisd_ua_dynzdf_imp     2  i    j    k-1  t
535ctin     zwt_ua_dynzdf_imp      3       from    zwisd_ua_dynzdf_imp     3  i    j    k    t
536ctin     zwt_ua_dynzdf_imp      4       from    zwt_ua_dynzdf_imp       1  i    j    k-1  t
537
538ctin     zwt_va_dynzdf_imp      1       from    zwisd_va_dynzdf_imp     1  i    j    k    t
539ctin     zwt_va_dynzdf_imp      2       from    zwisd_va_dynzdf_imp     2  i    j    k-1  t
540ctin     zwt_va_dynzdf_imp      3       from    zwisd_va_dynzdf_imp     3  i    j    k    t
541ctin     zwt_va_dynzdf_imp      4       from    zwt_va_dynzdf_imp       1  i    j    k-1  t
542
543ctin     ua_de_dynzdf_imp       1       from    zwisd_ua_dynzdf_imp     1  i    j    k    t
544ctin     ua_de_dynzdf_imp       2       from    ua_de_dynzdf_imp        1  i    j    k-1  t
545ctin     ua_de_dynzdf_imp       3       from    zrhs_ua_dynzdf_imp      1  i    j    k    t
546ctin     ua_de_dynzdf_imp       4       from    zwt_ua_dynzdf_imp       1  i    j    k-1  t
547
548ctin     ua_dynzdf_imp          1       from    zwisd_ua_dynzdf_imp     2  i    j    k    t
549ctin     ua_dynzdf_imp          2       from    ua_dynzdf_imp           1  i    j    k+1  t
550ctin     ua_dynzdf_imp          3       from    ua_de_dynzdf_imp        1  i    j    k    t
551ctin     ua_dynzdf_imp          4       from    zwt_ua_dynzdf_imp       1  i    j    k    t
552
553ctin     va_de_dynzdf_imp       1       from    zwisd_va_dynzdf_imp     1  i    j    k    t
554ctin     va_de_dynzdf_imp       2       from    va_de_dynzdf_imp        1  i    j    k-1  t
555ctin     va_de_dynzdf_imp       3       from    zrhs_va_dynzdf_imp      1  i    j    k    t
556ctin     va_de_dynzdf_imp       4       from    zwt_va_dynzdf_imp       1  i    j    k-1  t
557
558ctin     va_dynzdf_imp          1       from    zwisd_va_dynzdf_imp     2  i    j    k    t
559ctin     va_dynzdf_imp          2       from    va_dynzdf_imp           1  i    j    k+1  t
560ctin     va_dynzdf_imp          3       from    va_de_dynzdf_imp        1  i    j    k    t
561ctin     va_dynzdf_imp          4       from    zwt_va_dynzdf_imp       1  i    j    k    t
562
563ctin     ua_norm_dynzdf         1       from    ua_dynzdf_imp           1  i    j    k    t
564ctin     ua_norm_dynzdf         2       from    ub                      1  i    j    k    t-1
565
566ctin     va_norm_dynzdf         1       from    va_dynzdf_imp           1  i    j    k    t
567ctin     va_norm_dynzdf         2       from    vb                      1  i    j    k    t-1
568
569//#---------->ddynspg_flt
570ctin     spguv_now_dynspg       1       from    sshn                    1  i    j         t-1
571ctin     spguv_now_dynspg       2       from    sshn                    1  i    j+1       t-1
572ctin     spguv_now_dynspg       3       from    sshn                    1  i+1  j         t-1
573
574ctin     ua_1_dynspg_flt        1       from    ua_norm_dynzdf          1  i    j    k    t
575ctin     ua_1_dynspg_flt        2       from    ub                      1  i    j    k    t-1
576ctin     ua_1_dynspg_flt        3       from    spguv_now_dynspg        1  i    j         t
577
578ctin     va_1_dynspg_flt        1       from    va_norm_dynzdf          1  i    j    k    t
579ctin     va_1_dynspg_flt        2       from    vb                      1  i    j    k    t-1
580ctin     va_1_dynspg_flt        3       from    spguv_now_dynspg        2  i    j         t
581
582ctin     sum_spgu_dynspg_flt    1..NZ   from    ua_1_dynspg_flt         1  i    j   1..NZ t
583ctin     sum_spgv_dynspg_flt    1..NZ   from    va_1_dynspg_flt         1  i    j   1..NZ t
584
585ctin     gcb_dynspg_flt         1       from    sum_spgu_dynspg_flt     1  i    j         t
586ctin     gcb_dynspg_flt         2       from    sum_spgu_dynspg_flt     1  i-1  j         t
587ctin     gcb_dynspg_flt         3       from    sum_spgv_dynspg_flt     1  i    j         t
588ctin     gcb_dynspg_flt         4       from    sum_spgv_dynspg_flt     1  i    j-1       t
589
590ctin     gcx_dynspg_flt         1       from    gcx2                    1  i    j         t-1
591ctin     gcx_dynspg_flt         2       from    gcx2                    1  i    j         t-2
592
593ctin     spguv_dynspg_flt       1       from    gcx2                    1  i+1  j         t
594ctin     spguv_dynspg_flt       2       from    gcx2                    1  i    j         t
595ctin     spguv_dynspg_flt       3       from    gcx2                    1  i    j+1       t
596
597ctin     ua                     1       from    ua_1_dynspg_flt         1  i    j    k    t
598ctin     ua                     2       from    spguv_dynspg_flt        1  i    j         t
599ctin     ua                     3       from    ua_c                    1  i    j    k
600
601ctin     va                     1       from    va_1_dynspg_flt         1  i    j    k    t
602ctin     va                     2       from    spguv_dynspg_flt        2  i    j         t
603ctin     va                     3       from    va_c                    1  i    j    k
604
605ctin     sshn                   1       from    sshb                    1  i    j         t-1
606ctin     sshn                   2       from    wa                      1  i    j    1    t-1
607ctin     sshn                   3       from    sbcgyre_emp             1  i    j         t
608ctin     sshn                   4       from    sshn_c                  1  i    j         
609
610ctin     sshb                   1       from    sshb                    1  i    j         t-1
611ctin     sshb                   2       from    sshn                    1  i    j         t-1
612ctin     sshb                   3       from    sshn                    1  i    j         t
613ctin     sshb                   4       from    sshn_c                  1  i    j         
614
615#ifndef SOLSORYAO
616//############## Ajout de ctin "virtuels" ##############
617ctin     solsor_dynspg_flt      1..9    from    gcx_dynspg_flt          1 i%~1 j%~1       t
618ctin     solsor_dynspg_flt      10..18  from    gcb_dynspg_flt          1 i%~1 j%~1       t
619ctin     solsor_dynspg_flt      19      from    solsor_dynspg_flt       1 i-1  j-1       t
620ctin     gcx2                   1       from    solsor_dynspg_flt       1 i    j          t
621#endif
622
623#ifdef SOLSORYAO
624ctin solsor_flag                1       from    solsor_gx2_x_r          2 i    j   k    t
625ctin solsor_flag                2       from    solsor_flag             2 NX   NY  k-1  t
626ctin solsor_flag                3       from    solsor_flag             1 i-1  NY  k    t
627ctin solsor_flag                4       from    solsor_flag             1 i    j-1 k    t
628
629ctin solsor_gx1_x_r             1       from    gcx_dynspg_flt          1 i    j        t
630ctin solsor_gx1_x_r             2       from    gcb_dynspg_flt          1 i    j        t
631ctin solsor_gx1_x_r             3       from    solsor_gx2_x_r          1 i    j-1   k-1  t
632ctin solsor_gx1_x_r             4       from    solsor_gx2_x_r          1 i-1  j     k-1  t
633ctin solsor_gx1_x_r             5       from    solsor_gx2_x_r          1 i+1  j     k-1  t
634ctin solsor_gx1_x_r             6       from    solsor_gx2_x_r          1 i    j+1   k-1  t
635ctin solsor_gx1_x_r             7       from    solsor_gx2_x_r          1 i    j     k-1  t
636ctin solsor_gx1_x_r             8       from    solsor_flag             2 NX   NY    k-1  t
637
638ctin solsor_gx2_x_r             1       from    gcx_dynspg_flt          1 i    j        t
639ctin solsor_gx2_x_r             2       from    gcb_dynspg_flt          1 i    j        t
640ctin solsor_gx2_x_r             3       from    solsor_gx1_x_r          1 i    j-1   k  t
641ctin solsor_gx2_x_r             4       from    solsor_gx1_x_r          1 i-1  j     k  t
642ctin solsor_gx2_x_r             5       from    solsor_gx1_x_r          1 i+1  j     k  t
643ctin solsor_gx2_x_r             6       from    solsor_gx1_x_r          1 i    j+1   k  t
644ctin solsor_gx2_x_r             7       from    solsor_gx1_x_r          1 i    j     k  t
645ctin solsor_gx2_x_r             8       from    solsor_flag             2 NX   NY    k-1 t
646ctin solsor_gx2_x_r             9       from    solsor_gx1_x_r          2 i    j     k  t
647
648ctin gcx2                       1       from    solsor_gx2_x_r          1 i    j     NMAX  t
649#endif
650
651//#---------->dyn_nxt
652ctin    ub              1       from    ub                      1  i    j    k    t-1
653ctin    ub              2       from    ua                      1  i    j    k    t-1
654ctin    ub              3       from    ua                      1  i    j    k    t
655ctin    ub              4       from    ua_c                    1  i    j    k
656
657ctin    vb              1       from    vb                      1  i    j    k    t-1
658ctin    vb              2       from    va                      1  i    j    k    t-1
659ctin    vb              3       from    va                      1  i    j    k    t
660ctin    vb              4       from    va_c                    1  i    j    k
661
662//#---------->divcur
663ctin     hdivn                  1       from    ua                      1  i    j    k    t
664ctin     hdivn                  2       from    ua                      1  i-1  j    k    t
665ctin     hdivn                  3       from    va                      1  i    j    k    t
666ctin     hdivn                  4       from    va                      1  i    j-1  k    t
667
668ctin     rotn                   1       from    va                      1  i+1  j    k    t
669ctin     rotn                   2       from    va                      1  i    j    k    t
670ctin     rotn                   3       from    ua                      1  i    j+1  k    t
671ctin     rotn                   4       from    ua                      1  i    j    k    t
672
673//#---------->wzv
674ctin     wa                     1       from    wa                      1  i    j    k+1  t
675ctin     wa                     2       from    hdivn                   1  i    j    k    t
676
677//#---------->
678
679#ifdef OPTIMORDER
680
681//#---------->sbcgyre + bn2_rn2 + zdf + trasbc + traqsr + traadv +
682//#      traldf + trazdf + tra_nxt + eos + dynadv_cen2 + vor_ene
683//#      +dyn_ldf + dyn__hpg_zco +dynzdf_imp(-> gcx_dynspg_flt)  //
684
685
686order modinspace S3dt
687      order YA1 YA2
688            sbcgyre_qsr_qns sbcgyre_emp1
689            spguv_now_dynspg
690            gcx_dynspg_flt
691            order YA3
692                  bn2_rn2 zcent_hor_traadv_cen2 zcens_hor_traadv_cen2
693                  zcent_ver_traadv_cen2 zcens_ver_traadv_cen2
694                  ztuv_traldf_lap zsuv_traldf_lap
695                  hmf_TF_dynadv_cen2 zfuv_UW_dynadv_cen2
696            forder
697      forder
698
699       order YA3
700             order YA1 YA2
701                   zua_dhmf_dynadv_cen2 zva_dhmf_dynadv_cen2 zwxyz_vor_ene
702             forder
703       forder
704
705      //#NO PARALLEL
706      order YA2 YA1
707            sbcgyre_zsumemp_zsurf
708      forder
709      order YA1 YA2
710             order YB3
711                  zdf_avt_avmu_avmv
712                  zwisd_trazdf_imp
713                  zwisd_ua_dynzdf_imp zwisd_va_dynzdf_imp
714             forder
715             sbcgyre_emp sbcgyre_emps sbcgyre_utau_vtau
716             zdfmxl_hmld zdfmxl_nmln_hmlp_hmlpt ta_sa_trasbc
717             order YB3
718                  ta_traqsr
719                  ua_dynadv_cen2 va_dynadv_cen2
720                  ua_vor_ene    va_vor_ene
721                  ua_dyn_ldf_lap va_dyn_ldf_lap
722                  ta_hor_traadv_cen2 sa_hor_traadv_cen2
723                  ta_ver_traadv_cen2 sa_ver_traadv_cen2
724                  ta_traldf_lap sa_traldf_lap
725                  zrhs_trazdf_imp zrhs_sa_trazdf_imp
726             forder
727             order YA3
728                   zwt_trazdf_imp ta_de_trazdf_imp sa_de_trazdf_imp
729                   zwt_ua_dynzdf_imp zwt_va_dynzdf_imp
730             forder
731             order YB3
732                   ta sa tb sb rhd rhop
733             forder         
734      forder
735      order YA1 YA2
736            order YA3
737                  zhpij_dyn_hpg_zco
738                  ua_dyn_hpg_zco va_dyn_hpg_zco
739                  zrhs_ua_dynzdf_imp zrhs_va_dynzdf_imp
740                  ua_de_dynzdf_imp va_de_dynzdf_imp
741            forder
742            order YB3
743                  ua_dynzdf_imp va_dynzdf_imp
744                  ua_norm_dynzdf va_norm_dynzdf
745                  ua_1_dynspg_flt va_1_dynspg_flt
746            forder
747                  sum_spgu_dynspg_flt sum_spgv_dynspg_flt
748     forder       
749
750     order YA1 YA2
751            sbcgyre_wndm
752            gcb_dynspg_flt
753
754     forder
755#ifdef SOLSORYAO
756forder
757#endif
758
759#ifndef SOLSORYAO
760order YA1 YA2
761      solsor_dynspg_flt
762forder
763#endif
764
765#ifdef SOLSORYAO
766order modinspace Ssolsor
767      order YA3
768            order YA2 YA1
769                  solsor_gx1_x_r
770            forder
771
772            order YA2 YA1
773                  solsor_gx2_x_r
774            forder
775
776            order YA1 YA2
777                  solsor_flag
778            forder
779      forder
780forder
781#endif
782
783#ifdef SOLSORYAO
784order modinspace S3dt_b
785#endif
786      order YA2 YA1
787            gcx2
788            sshn sshb
789      forder
790      order YA2 YA1
791            spguv_dynspg_flt
792                order YA3
793                      ua va
794                      ub vb
795                forder
796        forder
797
798//      #---------->divcur
799              order YA3 YA2 YA1
800                    hdivn rotn
801              forder
802//      #---------->wzv
803              order YA2 YA1 YB3
804                    wa
805 
806     forder
807
808
809forder
810
811#endif
812
813#ifndef OPTIMORDER
814
815order modinspace S3dt
816//#---------->sbcgyre
817      order YA2 YA1
818            sbcgyre_qsr_qns sbcgyre_emp1 sbcgyre_zsumemp_zsurf
819      forder
820      order YA2 YA1
821            sbcgyre_emp sbcgyre_emps sbcgyre_utau_vtau sbcgyre_wndm
822      forder
823
824
825//#---------->bn2
826      order YA3 YA2 YA1
827            bn2_rn2
828      forder
829
830//#---------->zdf
831      order YA3 YA2 YA1
832            zdf_avt_avmu_avmv
833      forder
834      order YA2 YA1
835            zdfmxl_hmld zdfmxl_nmln_hmlp_hmlpt
836      forder
837//#---------->trasbc
838      order YA2 YA1
839            ta_sa_trasbc
840      forder
841//#---------->traqsr
842      order YA3 YA2 YA1
843            ta_traqsr
844      forder
845//#------> traadv_cen2
846      order YA3 
847            order YA2 YA1
848                  zcent_hor_traadv_cen2 zcens_hor_traadv_cen2
849            forder
850            order YA2 YA1
851                  ta_hor_traadv_cen2   sa_hor_traadv_cen2
852            forder
853      forder
854
855      order YA3 YA2 YA1
856            zcent_ver_traadv_cen2 zcens_ver_traadv_cen2
857      forder
858      order YA3 YA2 YA1
859            ta_ver_traadv_cen2 sa_ver_traadv_cen2
860      forder
861
862//#------> traldf_lap
863      order YA3 YA2 YA1
864            ztuv_traldf_lap zsuv_traldf_lap
865            ta_traldf_lap sa_traldf_lap
866      forder
867//#------> trazdf_imp
868      order YA3 YA2 YA1
869            zwisd_trazdf_imp zrhs_trazdf_imp zrhs_sa_trazdf_imp
870      forder
871      order YA3 YA2 YA1
872            zwt_trazdf_imp ta_de_trazdf_imp  sa_de_trazdf_imp
873      forder
874      order YB3 YA2 YA1
875            ta sa
876      forder
877//#---------->tra_nxt
878      order YA3 YA2 YA1
879            tb sb
880      forder
881//#---------->eos
882      order YA3 YA2 YA1
883            rhd rhop
884      forder
885//#------> dynadv_cen2
886         order YA3 
887              order YA2 YA1
888                    hmf_TF_dynadv_cen2
889              forder
890              order YA2 YA1
891                   zua_dhmf_dynadv_cen2 zva_dhmf_dynadv_cen2
892              forder
893          forder
894
895           order YA3 YA2 YA1
896                 zfuv_UW_dynadv_cen2
897           forder
898           order YA3 YA2 YA1
899                 ua_dynadv_cen2 va_dynadv_cen2
900           forder
901//#------> vor_ene && dyn_ldf_lap
902         order YA3 
903              order YA2 YA1
904                    zwxyz_vor_ene
905              forder
906              order YA2 YA1
907                    ua_vor_ene va_vor_ene
908                    ua_dyn_ldf_lap va_dyn_ldf_lap
909              forder
910         forder
911//#---------->dyn__hpg_zco
912         order YA3 YA2 YA1
913               zhpij_dyn_hpg_zco ua_dyn_hpg_zco va_dyn_hpg_zco
914         forder
915//#---------->dynzdf_imp
916      order YA3 YA2 YA1
917            zwisd_ua_dynzdf_imp zwisd_va_dynzdf_imp
918            zrhs_ua_dynzdf_imp zrhs_va_dynzdf_imp
919      forder
920      order YA3 YA2 YA1
921            zwt_ua_dynzdf_imp ua_de_dynzdf_imp
922            zwt_va_dynzdf_imp va_de_dynzdf_imp
923      forder
924      order YB3 YA2 YA1
925            ua_dynzdf_imp va_dynzdf_imp
926      forder
927      order YA3 YA2 YA1
928            ua_norm_dynzdf va_norm_dynzdf
929      forder
930//#---------->dynspg_flt
931      order YA2 YA1
932            spguv_now_dynspg
933      forder
934      order YA3 YA2 YA1
935            ua_1_dynspg_flt va_1_dynspg_flt
936      forder
937      order YA2 YA1
938            sum_spgu_dynspg_flt sum_spgv_dynspg_flt
939      forder
940      order YA2 YA1
941            gcb_dynspg_flt gcx_dynspg_flt
942      forder
943
944#ifdef SOLSORYAO
945forder
946#endif
947
948#ifndef SOLSORYAO
949order YA1 YA2
950      solsor_dynspg_flt
951forder
952#endif
953
954#ifdef SOLSORYAO
955order modinspace Ssolsor
956      order YA3
957            order YA2 YA1
958                  solsor_gx1_x_r
959            forder
960
961            order YA2 YA1
962                  solsor_gx2_x_r
963            forder
964
965            order YA1 YA2
966                  solsor_flag
967            forder
968      forder
969forder
970#endif
971
972#ifdef SOLSORYAO
973order modinspace S3dt_b
974#endif SOLSORYAO
975
976      order YA2 YA1
977            gcx2
978      forder
979      order YA2 YA1
980            spguv_dynspg_flt
981            sshn sshb
982                order YA3
983                      ua va
984                forder
985      forder
986//      #---------->dyn_nxt
987              order YA3 YA2 YA1
988                    ub vb
989              forder
990//      #---------->divcur
991              order YA3 YA2 YA1
992                    hdivn rotn
993              forder
994//      #---------->wzv
995              order YB3 YA2 YA1
996                    wa
997      forder
998forder
999#endif
1000
1001
1002
1003#ifdef SOLSORYAO
1004order spaceintraj Tsbd
1005        S3dt Ssolsor S3dt_b
1006forder
1007#endif
1008
1009#ifndef SOLSORYAO
1010order spaceintraj Tsbd
1011        S3dt
1012forder
1013#endif
1014
1015//#USER FUNCTIONS       ---------------------------------INSERT_FCT
1016insert_fct      xdisplay
1017insert_fct      xcomparYF
1018insert_fct  arg xistate_init
1019insert_fct  arg true_target_in_tab
1020insert_fct  arg xrst_save
1021insert_fct  arg xchangesavemode
1022
1023insert_fct arg xwriteout
1024insert_fct arg xwritegrad
1025insert_fct arg xinitnc
1026//#insert_fct  arg load_shape_func
1027//#insert_fct  arg load_stdev_pca
1028//#insert_fct  arg load_mean
Note: See TracBrowser for help on using the repository browser.