source: trunk/src/sinobad.d @ 37

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

modification of ctin

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