source: trunk/src/sinobad.d @ 52

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

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