source: trunk/yao/src/analyzers/testANTLR/filesUniti/provaPARZIALE5 @ 1

Last change on this file since 1 was 1, checked in by lnalod, 15 years ago

Initial import of YAO sources

File size: 39.7 KB
Line 
1#==========================================================
2#                  fichier de DESCRIPTION
3#==========================================================
4#DEFVAL : permet de définir des valeurs -------------DEFVAL
5#defval  SZX         190 |   200 |    340 |   114 | ! used in module(s)
6#defval  SZXpo2x2  72200 | 80000 | 231200 | 25992 | must be = pow(SZX,2) * 2
7#defval  SZXnx2    72580 | 80400 | 231880 | 26220 | must be = (SZX + pow(SZX,2)) * 2
8defval  SZX          50 |   200 |    340 |   114 | ! used in module(s)
9defval  SZXpo2x2   5000 | 80000 | 231200 | 25992 | must be = pow(SZX,2) * 2
10defval  SZXnx2     5100 | 80400 | 231880 | 26220 | must be = (SZX + pow(SZX,2)) * 2
11
12##########
13defval SZU           0
14defval SZT           1
15defval SZA           1
16
17#NAME : nom des sources  "hat" --------------------HAT_NAME
18hat_name cgmnz
19
20#OPTION : des options de g?n?ration -----------------OPTION
21#option O_VARINCR
22option  O_M1QN3
23option  O_GRADTEST
24#option O_REAL FLOAT
25#option O_EXTOBJ eigvvcgm.o eigvvcgmb.o eigvvcgmd.o adBuffer.o adStack.o
26#option O_EXTOBJ cgall.o cgallb.o cgalld.o adBuffer.o adStack.o
27option  O_EXTOBJ cbal.o cbalb.o cbald.o corth.o corthb.o corthd.o comqr2.o comqr2b.o comqr2d.o cgcom.o adBuffer.o adStack.o
28
29#TRAJECTOIRES -----------------------------------------TRAJ
30traj Tcal M SZU SZT
31
32#ESPACE ----------------------------------------------SPACE
33space  ScalA  M    1      Tcal
34
35#MODULES: les modules et leurs attributs -----------MODULES
36modul   Cz         space ScalA noward  output SZX target
37modul   BuildM3DMN space ScalA hidjac input array SZX output SZXpo2x2
38#modul  Cgall      space ScalA hidjac input array SZXpo2x2 output SZXnx2   tempo  cout
39#modul  Cggrp      space ScalA hidjac input array SZXpo2x2 output SZXpo2x2 tempo  cout
40modul   Cggrp      space ScalA hidjac input array SZXpo2x2 output SZXnx2   tempo  cout
41
42#CONNECTIONS: liens sorties->entrées ----------------CTIN-M
43exec disp_ct_in
44
45#ORDER: ----------------------------------------------ORDER
46#    ordre de parcourt de l'espace et de calcul des modules
47order modinspace ScalA
48   order YA1
49           BuildM3DMN
50                 #Cgall
51                 Cggrp
52   forder
53forder
54#
55order spaceintraj Tcal
56    ScalA
57forder
58#
59
60#USER FUNCTIONS: --------------------------------------UFCT
61#       instructions sp?cifiques de l'application
62insert_fct      xdisplay
63insert_fct      xinit_appli
64insert_fct  arg xset_freq
65#insert_fct  arg xset_freq_obs
66insert_fct  arg xset_delta
67insert_fct  arg xperturb_cz
68insert_fct  arg xsetetape
69insert_fct  arg xset_zs
70insert_fct      xinit_cz
71#insert_fct arg xcinema_freq
72
73#FIN ================================================== END
74#==========================================================
75#                  fichier de DESCRIPTION
76#==========================================================
77#DEFVAL : permet de définir des valeurs -------------DEFVAL
78#defval  SZX         190 |   200 |    340 |   114 | ! used in module(s)
79#defval  SZXpo2x2  72200 | 80000 | 231200 | 25992 | must be = pow(SZX,2) * 2
80#defval  SZXnx2    72580 | 80400 | 231880 | 26220 | must be = (SZX + pow(SZX,2)) * 2
81defval  SZX        190 |  4 |  5 |   50 |   200 |    340 |   114 | ! used in module(s)
82defval  SZXpo2x2 72200 | 32 | 50 | 5000 | 80000 | 231200 | 25992 | must be = pow(SZX,2) * 2
83defval  SZXnx2   72580 | 40 | 60 | 5100 | 80400 | 231880 | 26220 | must be = (SZX + pow(SZX,2)) * 2
84
85##########
86defval SZU           0
87defval SZT           1
88defval SZA           1
89
90#NAME : nom des sources  "hat" --------------------HAT_NAME
91hat_name cgmnz
92
93#OPTION : des options de g?n?ration -----------------OPTION
94#option O_VARINCR
95option  O_M1QN3
96option  O_GRADTEST
97#option O_REAL FLOAT
98#option O_EXTOBJ eigvvcgm.o eigvvcgmb.o eigvvcgmd.o adBuffer.o adStack.o
99#option O_EXTOBJ cgall.o cgallb.o cgalld.o adBuffer.o adStack.o
100#option O_EXTOBJ cbal.o cbalb.o cbald.o corth.o corthb.o corthd.o comqr2.o comqr2b.o comqr2d.o cgcom.o adBuffer.o adStack.o
101#option O_EXTOBJ  cgall.o cgallb.o cgalld.o adBuffer.o adStack.o
102option  O_EXTOBJ  cgall67.o cgall67b.o cgall67d.o adBuffer.o adStack.o
103
104#TRAJECTOIRES -----------------------------------------TRAJ
105traj Tcal M SZU SZT
106
107#ESPACE ----------------------------------------------SPACE
108space  ScalA  M    1      Tcal
109
110#MODULES: les modules et leurs attributs -----------MODULES
111modul   Cz         space ScalA noward  output SZX target
112modul   BuildM3DMN space ScalA hidjac input array SZX output SZXpo2x2
113#modul  Cgall      space ScalA hidjac input array SZXpo2x2 output SZXnx2   tempo  cout
114#modul  Cggrp      space ScalA hidjac input array SZXpo2x2 output SZXpo2x2 tempo  cout
115modul   Cggrp      space ScalA hidjac input array SZXpo2x2 output SZXnx2   tempo  cout
116
117#CONNECTIONS: liens sorties->entrées ----------------CTIN-M
118exec disp_ct_in
119
120#ORDER: ----------------------------------------------ORDER
121#    ordre de parcourt de l'espace et de calcul des modules
122order modinspace ScalA
123   order YA1
124           BuildM3DMN
125                 #Cgall
126                 Cggrp
127   forder
128forder
129#
130order spaceintraj Tcal
131    ScalA
132forder
133#
134
135#USER FUNCTIONS: --------------------------------------UFCT
136#       instructions sp?cifiques de l'application
137insert_fct      xdisplay
138insert_fct      xinit_appli
139insert_fct  arg xset_freq
140#insert_fct  arg xset_freq_obs
141insert_fct  arg xset_delta
142insert_fct  arg xperturb_cz
143insert_fct  arg xsetetape
144insert_fct  arg xset_zs
145insert_fct      xinit_cz
146#insert_fct arg xcinema_freq
147
148#FIN ================================================== END
149#==========================================================
150#                  fichier de DESCRIPTION
151#==========================================================
152#DEFVAL : permet de définir des valeurs -------------DEFVAL
153#defval  SZX         190 |   200 |    340 |   114 | ! used in module(s)
154#defval  SZXpo2x2  72200 | 80000 | 231200 | 25992 | must be = pow(SZX,2) * 2
155#defval  SZXnx2    72580 | 80400 | 231880 | 26220 | must be = (SZX + pow(SZX,2)) * 2
156#defval  SZX         190 |   190 |  4 |  5 |   50 |   200 |    340 |   114 | ! used in module(s)
157#defval  SZXpo2x2  72200 | 72200 | 32 | 50 | 5000 | 80000 | 231200 | 25992 | must be = pow(SZX,2) * 2
158#defval  SZXnx2    72580 | 72580 | 40 | 60 | 5100 | 80400 | 231880 | 26220 | must be = (SZX + pow(SZX,2)) * 2
159defval  SZX           4
160defval  SZXpo2x2     32
161defval  SZXnx2       40
162
163##########
164defval SZU           0
165defval SZT           1
166defval SZA           1
167
168#NAME : nom des sources  "hat" --------------------HAT_NAME
169hat_name cgmnz
170
171#OPTION : des options de g?n?ration -----------------OPTION
172#option O_VARINCR
173option  O_M1QN3
174option  O_GRADTEST
175#option O_REAL FLOAT
176#option O_EXTOBJ eigvvcgm.o eigvvcgmb.o eigvvcgmd.o adBuffer.o adStack.o
177#option O_EXTOBJ cgall.o cgallb.o cgalld.o adBuffer.o adStack.o
178#option O_EXTOBJ cbal.o cbalb.o cbald.o corth.o corthb.o corthd.o comqr2.o comqr2b.o comqr2d.o cgcom.o adBuffer.o adStack.o
179#option O_EXTOBJ cgall.o cgallb.o cgalld.o adBuffer.o adStack.o
180#option O_EXTOBJ cgall67.o cgall67b.o cgall67d.o adBuffer.o adStack.o
181#option O_EXTOBJ cbal68.o cbal68b.o cbal68d.o corth68.o corth68b.o corth68d.o comqr268.o comqr268b.o comqr268d.o cgcom.o adBuffer.o adStack.o
182#option O_EXTOBJ cgall.o cgallb.o cgalld.o adBuffer.o adStack.o
183#option O_EXTOBJ cgall.o cgallb.o cgalld.o cbal68b.o corth68b.o comqr268b.o cbabk268b.o adBuffer.o adStack.o
184#option  O_EXTOBJ cgall.o          cbal68b.o corth68b.o comqr268b.o cbabk268b.o cgcom.o adBuffer.o adStack.o
185option  O_EXTOBJ cbal68.o corth68.o comqr268.o cbabk268.o    cbal68b.o corth68b.o comqr268b.o cbabk268b.o cgcom.o adBuffer.o adStack.o
186
187#TRAJECTOIRES -----------------------------------------TRAJ
188traj Tcal M SZU SZT
189
190#ESPACE ----------------------------------------------SPACE
191space  ScalA  M    1      Tcal
192
193#MODULES: les modules et leurs attributs -----------MODULES
194modul   Cz         space ScalA noward  output SZX target
195modul   BuildM3DMN space ScalA hidjac input array SZX output SZXpo2x2
196#modul  Cgall      space ScalA hidjac input array SZXpo2x2 output SZXnx2   tempo  cout
197#modul  Cggrp      space ScalA hidjac input array SZXpo2x2 output SZXpo2x2 tempo  cout
198modul   Cggrp      space ScalA hidjac input array SZXpo2x2 output SZXnx2   tempo  cout
199
200#CONNECTIONS: liens sorties->entrées ----------------CTIN-M
201exec disp_ct_in
202
203#ORDER: ----------------------------------------------ORDER
204#    ordre de parcourt de l'espace et de calcul des modules
205order modinspace ScalA
206   order YA1
207           BuildM3DMN
208                 #Cgall
209                 Cggrp
210   forder
211forder
212#
213order spaceintraj Tcal
214    ScalA
215forder
216#
217
218#USER FUNCTIONS: --------------------------------------UFCT
219#       instructions sp?cifiques de l'application
220insert_fct      xdisplay
221insert_fct      xinit_appli
222insert_fct  arg xset_freq
223#insert_fct  arg xset_freq_obs
224insert_fct  arg xset_delta
225insert_fct  arg xperturb_cz
226insert_fct  arg xsetetape
227insert_fct  arg xset_zs
228insert_fct      xinit_cz
229#insert_fct arg xcinema_freq
230
231#FIN ================================================== END
232#==========================================================
233#                  fichier de DESCRIPTION
234#==========================================================
235#DEFVAL : permet de définir des valeurs -------------DEFVAL
236#defval  SZX         190 |   200 |    340 |   114 | ! used in module(s)
237#defval  SZXpo2x2  72200 | 80000 | 231200 | 25992 | must be = pow(SZX,2) * 2
238#defval  SZXnx2    72580 | 80400 | 231880 | 26220 | must be = (SZX + pow(SZX,2)) * 2
239defval  SZX          50 |   200 |    340 |   114 | ! used in module(s)
240defval  SZXpo2x2   5000 | 80000 | 231200 | 25992 | must be = pow(SZX,2) * 2
241defval  SZXnx2     5100 | 80400 | 231880 | 26220 | must be = (SZX + pow(SZX,2)) * 2
242
243##########
244defval SZU           0
245defval SZT           1
246defval SZA           1
247
248#NAME : nom des sources  "hat" --------------------HAT_NAME
249hat_name cgmnz
250
251#OPTION : des options de g?n?ration -----------------OPTION
252#option O_VARINCR
253option  O_M1QN3
254option  O_GRADTEST
255#option O_REAL FLOAT
256#option O_EXTOBJ eigvvcgm.o eigvvcgmb.o eigvvcgmd.o adBuffer.o adStack.o
257option  O_EXTOBJ cgall.o cgallb.o cgalld.o adBuffer.o adStack.o
258
259#TRAJECTOIRES -----------------------------------------TRAJ
260traj Tcal M SZU SZT
261
262#ESPACE ----------------------------------------------SPACE
263space  ScalA  M    1      Tcal
264
265#MODULES: les modules et leurs attributs -----------MODULES
266modul   Cz         space ScalA noward  output SZX target
267modul   BuildM3DMN space ScalA hidjac input array SZX output SZXpo2x2
268modul   Cgall      space ScalA hidjac input array SZXpo2x2 output SZXnx2 tempo  cout
269
270#CONNECTIONS: liens sorties->entrées ----------------CTIN-M
271exec disp_ct_in
272
273#ORDER: ----------------------------------------------ORDER
274#    ordre de parcourt de l'espace et de calcul des modules
275order modinspace ScalA
276   order YA1
277           BuildM3DMN Cgall
278   forder
279forder
280#
281order spaceintraj Tcal
282    ScalA
283forder
284#
285
286#USER FUNCTIONS: --------------------------------------UFCT
287#       instructions sp?cifiques de l'application
288insert_fct      xdisplay
289insert_fct      xinit_appli
290insert_fct  arg xset_freq
291#insert_fct  arg xset_freq_obs
292insert_fct  arg xset_delta
293insert_fct  arg xperturb_cz
294insert_fct  arg xsetetape
295insert_fct  arg xset_zs
296insert_fct      xinit_cz
297#insert_fct arg xcinema_freq
298
299#FIN ================================================== END
300#==========================================================
301#                  fichier de DESCRIPTION
302#==========================================================
303#DEFVAL : permet de définir des valeurs -------------DEFVAL
304#defval  SZX         190 |   200 |    340 |   114 | ! used in module(s)
305#defval  SZXpo2x2  72200 | 80000 | 231200 | 25992 | must be = pow(SZX,2) * 2
306#defval  SZXnx2    72580 | 80400 | 231880 | 26220 | must be = (SZX + pow(SZX,2)) * 2
307defval  SZX          4 |  4 |  5 |   50 |   200 |    340 |   114 | ! used in module(s)
308defval  SZXpo2x2    32 | 32 | 50 | 5000 | 80000 | 231200 | 25992 | must be = pow(SZX,2) * 2
309defval  SZXnx2      40 | 40 | 60 | 5100 | 80400 | 231880 | 26220 | must be = (SZX + pow(SZX,2)) * 2
310
311##########
312defval SZU           0
313defval SZT           1
314defval SZA           1
315
316#NAME : nom des sources  "hat" --------------------HAT_NAME
317hat_name cgmnz
318
319#OPTION : des options de g?n?ration -----------------OPTION
320#option O_VARINCR
321option  O_M1QN3
322option  O_GRADTEST
323#option O_REAL FLOAT
324#option O_EXTOBJ eigvvcgm.o eigvvcgmb.o eigvvcgmd.o adBuffer.o adStack.o
325option  O_EXTOBJ cgall.o cgallb.o cgalld.o adBuffer.o adStack.o
326
327#TRAJECTOIRES -----------------------------------------TRAJ
328traj Tcal M SZU SZT
329
330#ESPACE ----------------------------------------------SPACE
331space  ScalA  M    1      Tcal
332
333#MODULES: les modules et leurs attributs -----------MODULES
334modul   Cz         space ScalA noward  output SZX target
335modul   BuildM3DMN space ScalA hidjac input array SZX output SZXpo2x2
336modul   Cgall      space ScalA hidjac input array SZXpo2x2 output SZXnx2 tempo  cout
337
338#CONNECTIONS: liens sorties->entrées ----------------CTIN-M
339exec disp_ct_in
340
341#ORDER: ----------------------------------------------ORDER
342#    ordre de parcourt de l'espace et de calcul des modules
343order modinspace ScalA
344   order YA1
345           BuildM3DMN Cgall
346   forder
347forder
348#
349order spaceintraj Tcal
350    ScalA
351forder
352#
353
354#USER FUNCTIONS: --------------------------------------UFCT
355#       instructions sp?cifiques de l'application
356insert_fct      xdisplay
357insert_fct      xinit_appli
358insert_fct  arg xset_freq
359#insert_fct  arg xset_freq_obs
360insert_fct  arg xset_delta
361insert_fct  arg xperturb_cz
362insert_fct  arg xsetetape
363insert_fct  arg xset_zs
364insert_fct      xinit_cz
365#insert_fct arg xcinema_freq
366
367#FIN ================================================== END
368#==========================================================
369#                  fichier de DESCRIPTION
370#==========================================================
371#DEFVAL : permet de définir des valeurs -------------DEFVAL
372#defval  SZX         190 |   200 |    340 |   114 | ! used in module(s)
373#defval  SZXpo2x2  72200 | 80000 | 231200 | 25992 | must be = pow(SZX,2) * 2
374#defval  SZXnx2    72580 | 80400 | 231880 | 26220 | must be = (SZX + pow(SZX,2)) * 2
375defval  SZX         4 |   190 |  4 |  5 |   50 |   200 |    340 |   114 | ! used in module(s)
376defval  SZXpo2x2   32 | 72200 | 32 | 50 | 5000 | 80000 | 231200 | 25992 | must be = pow(SZX,2) * 2
377defval  SZXnx2     40 | 72580 | 40 | 60 | 5100 | 80400 | 231880 | 26220 | must be = (SZX + pow(SZX,2)) * 2
378
379##########
380defval SZU           0
381defval SZT           1
382defval SZA           1
383
384#NAME : nom des sources  "hat" --------------------HAT_NAME
385hat_name cgmnz
386
387#OPTION : des options de g?n?ration -----------------OPTION
388#option O_VARINCR
389option  O_M1QN3
390option  O_GRADTEST
391#option O_REAL FLOAT
392#option O_EXTOBJ eigvvcgm.o eigvvcgmb.o eigvvcgmd.o adBuffer.o adStack.o
393option O_EXTOBJ cgall.o cgallb.o cgalld.o adBuffer.o adStack.o
394#option O_EXTOBJ cbal.o cbalb.o cbald.o corth.o corthb.o corthd.o comqr2.o comqr2b.o comqr2d.o cgcom.o adBuffer.o adStack.o
395#option O_EXTOBJ cgall.o cgallb.o cgalld.o adBuffer.o adStack.o
396#option O_EXTOBJ cgall67.o cgall67b.o cgall67d.o adBuffer.o adStack.o
397#option  O_EXTOBJ cbal68.o cbal68b.o cbal68d.o corth68.o corth68b.o corth68d.o comqr268.o comqr268b.o comqr268d.o cgcom.o adBuffer.o adStack.o
398
399#TRAJECTOIRES -----------------------------------------TRAJ
400traj Tcal M SZU SZT
401
402#ESPACE ----------------------------------------------SPACE
403space  ScalA  M    1      Tcal
404
405#MODULES: les modules et leurs attributs -----------MODULES
406modul   Cz         space ScalA noward  output SZX target
407modul   BuildM3DMN space ScalA hidjac input array SZX output SZXpo2x2
408modul  Cgall      space ScalA hidjac input array SZXpo2x2 output SZXnx2   tempo  cout
409#modul  Cggrp      space ScalA hidjac input array SZXpo2x2 output SZXpo2x2 tempo  cout
410#modul   Cggrp      space ScalA hidjac input array SZXpo2x2 output SZXnx2   tempo  cout
411
412#CONNECTIONS: liens sorties->entrées ----------------CTIN-M
413exec disp_ct_in
414
415#ORDER: ----------------------------------------------ORDER
416#    ordre de parcourt de l'espace et de calcul des modules
417order modinspace ScalA
418   order YA1
419           BuildM3DMN
420                 Cgall
421                 #Cggrp
422   forder
423forder
424#
425order spaceintraj Tcal
426    ScalA
427forder
428#
429
430#USER FUNCTIONS: --------------------------------------UFCT
431#       instructions sp?cifiques de l'application
432insert_fct      xdisplay
433insert_fct      xinit_appli
434insert_fct  arg xset_freq
435#insert_fct  arg xset_freq_obs
436insert_fct  arg xset_delta
437insert_fct  arg xperturb_cz
438insert_fct  arg xsetetape
439insert_fct  arg xset_zs
440insert_fct      xinit_cz
441#insert_fct arg xcinema_freq
442
443#FIN ================================================== END
444#==========================================================
445#                  fichier de DESCRIPTION
446#==========================================================
447#DEFVAL : permet de définir des valeurs -------------DEFVAL
448defval  SZX         190 |   200 |    340 |   114 | ! used in module(s)
449defval  SZXpo2x2  72200 | 80000 | 231200 | 25992 | must be = pow(SZX,2) * 2
450defval  SZXnx2    72580 | 80400 | 231880 | 26220 | must be = (SZX + pow(SZX,2)) * 2
451#defval  SZX          50 |   200 |    340 |   114 | ! used in module(s)
452#defval  SZXpo2x2   5000 | 80000 | 231200 | 25992 | must be = pow(SZX,2) * 2
453#defval  SZXnx2     5100 | 80400 | 231880 | 26220 | must be = (SZX + pow(SZX,2)) * 2
454
455##########
456defval SZU           0
457defval SZT           1
458defval SZA           1
459
460#NAME : nom des sources  "hat" --------------------HAT_NAME
461hat_name cgmnz
462
463#OPTION : des options de g?n?ration -----------------OPTION
464#option O_VARINCR
465option  O_M1QN3
466option  O_GRADTEST
467#option O_REAL FLOAT
468#option O_EXTOBJ eigvvcgm.o eigvvcgmb.o eigvvcgmd.o adBuffer.o adStack.o
469#option O_EXTOBJ cgall.o cgallb.o cgalld.o adBuffer.o adStack.o
470option  O_EXTOBJ cbal.o cbalb.o cbald.o corth.o corthb.o corthd.o cgcom.o adBuffer.o adStack.o
471
472#TRAJECTOIRES -----------------------------------------TRAJ
473traj Tcal M SZU SZT
474
475#ESPACE ----------------------------------------------SPACE
476space  ScalA  M    1      Tcal
477
478#MODULES: les modules et leurs attributs -----------MODULES
479modul   Cz         space ScalA noward  output SZX target
480modul   BuildM3DMN space ScalA hidjac input array SZX output SZXpo2x2
481#modul  Cgall      space ScalA hidjac input array SZXpo2x2 output SZXnx2   tempo  cout
482modul   Cggrp      space ScalA hidjac input array SZXpo2x2 output SZXpo2x2 tempo  cout
483
484#CONNECTIONS: liens sorties->entrées ----------------CTIN-M
485exec disp_ct_in
486
487#ORDER: ----------------------------------------------ORDER
488#    ordre de parcourt de l'espace et de calcul des modules
489order modinspace ScalA
490   order YA1
491           BuildM3DMN
492                 #Cgall
493                 Cggrp
494   forder
495forder
496#
497order spaceintraj Tcal
498    ScalA
499forder
500#
501
502#USER FUNCTIONS: --------------------------------------UFCT
503#       instructions sp?cifiques de l'application
504insert_fct      xdisplay
505insert_fct      xinit_appli
506insert_fct  arg xset_freq
507#insert_fct  arg xset_freq_obs
508insert_fct  arg xset_delta
509insert_fct  arg xperturb_cz
510insert_fct  arg xsetetape
511insert_fct  arg xset_zs
512insert_fct      xinit_cz
513#insert_fct arg xcinema_freq
514
515#FIN ================================================== END
516#==========================================================
517#                  fichier de DESCRIPTION
518#==========================================================
519#DEFVAL : permet de définir des valeurs -------------DEFVAL
520#defval  SZX         190 |   200 |    340 |   114 | ! used in module(s)
521#defval  SZXpo2x2  72200 | 80000 | 231200 | 25992 | must be = pow(SZX,2) * 2
522#defval  SZXnx2    72580 | 80400 | 231880 | 26220 | must be = (SZX + pow(SZX,2)) * 2
523defval  SZX         190 |    330 |   190 |   50 |   200 |    340 |   114 | ! used in module(s)
524defval  SZXpo2x2  72200 | 217800 | 72200 | 5000 | 80000 | 231200 | 25992 | must be = pow(SZX,2) * 2
525defval  SZXnx2    72580 | 218460 | 72580 | 5100 | 80400 | 231880 | 26220 | must be = (SZX + pow(SZX,2)) * 2
526#defval  SZX           4
527#defval  SZXpo2x2     32
528#defval  SZXnx2       40
529
530##########
531defval SZU           0
532defval SZT           1
533defval SZA           1
534
535#NAME : nom des sources  "hat" --------------------HAT_NAME
536hat_name cgmnz
537
538#OPTION : des options de g?n?ration -----------------OPTION
539#option O_VARINCR
540option  O_M1QN3
541option  O_GRADTEST
542#option O_REAL FLOAT
543#option O_EXTOBJ eigvvcgm.o eigvvcgmb.o eigvvcgmd.o adBuffer.o adStack.o
544#option O_EXTOBJ cgall.o cgallb.o cgalld.o adBuffer.o adStack.o
545#option  O_EXTOBJ cbal.o cbalb.o cbald.o corth.o corthb.o corthd.o comqr2.o comqr2b.o comqr2d.o cgcom.o adBuffer.o adStack.o
546#option O_EXTOBJ cbal.o cbalb.o cbald.o corth.o corthb.o corthd.o cgcom.o adBuffer.o adStack.o
547option  O_EXTOBJ cbal.o cbalb.o cbald.o corth.o corthb.o          comqr2.o comqr2b.o           cbabk268.o cbabk268b.o cgcom.o adBuffer.o adStack.o
548
549#TRAJECTOIRES -----------------------------------------TRAJ
550traj Tcal M SZU SZT
551
552#ESPACE ----------------------------------------------SPACE
553space  ScalA  M    1      Tcal
554
555#MODULES: les modules et leurs attributs -----------MODULES
556modul   Cz         space ScalA noward  output SZX target
557modul   BuildM3DMN space ScalA hidjac input array SZX output SZXpo2x2
558#modul  Cgall      space ScalA hidjac input array SZXpo2x2 output SZXnx2   tempo  cout
559#modul  Cggrp      space ScalA hidjac input array SZXpo2x2 output SZXpo2x2 tempo  cout
560modul   Cggrp      space ScalA hidjac input array SZXpo2x2 output SZXnx2   tempo  cout
561
562#CONNECTIONS: liens sorties->entrées ----------------CTIN-M
563exec disp_ct_in
564
565#ORDER: ----------------------------------------------ORDER
566#    ordre de parcourt de l'espace et de calcul des modules
567order modinspace ScalA
568   order YA1
569           BuildM3DMN
570                 #Cgall
571                 Cggrp
572   forder
573forder
574#
575order spaceintraj Tcal
576    ScalA
577forder
578#
579
580#USER FUNCTIONS: --------------------------------------UFCT
581#       instructions sp?cifiques de l'application
582insert_fct      xdisplay
583insert_fct      xinit_appli
584insert_fct  arg xset_freq
585#insert_fct  arg xset_freq_obs
586insert_fct  arg xset_delta
587insert_fct  arg xperturb_cz
588insert_fct  arg xsetetape
589insert_fct  arg xset_zs
590insert_fct      xinit_cz
591#insert_fct arg xcinema_freq
592
593#FIN ================================================== END
594#==========================================================
595#                  fichier de DESCRIPTION
596#==========================================================
597#DEFVAL : permet de définir des valeurs -------------DEFVAL
598#defval  SZX         190 |   200 |    340 |   114 | ! used in module(s)
599#defval  SZXpo2x2  72200 | 80000 | 231200 | 25992 | must be = pow(SZX,2) * 2
600#defval  SZXnx2    72580 | 80400 | 231880 | 26220 | must be = (SZX + pow(SZX,2)) * 2
601defval  SZX        114 |  4 |  5 |   50 |   200 |    340 |   114 | ! used in module(s)
602defval  SZXpo2x2 25992 | 32 | 50 | 5000 | 80000 | 231200 | 25992 | must be = pow(SZX,2) * 2
603defval  SZXnx2   26220 | 40 | 60 | 5100 | 80400 | 231880 | 26220 | must be = (SZX + pow(SZX,2)) * 2
604
605##########
606defval SZU           0
607defval SZT           1
608defval SZA           1
609
610#NAME : nom des sources  "hat" --------------------HAT_NAME
611hat_name cgmnz
612
613#OPTION : des options de g?n?ration -----------------OPTION
614#option O_VARINCR
615option  O_M1QN3
616option  O_GRADTEST
617#option O_REAL FLOAT
618#option O_EXTOBJ eigvvcgm.o eigvvcgmb.o eigvvcgmd.o adBuffer.o adStack.o
619option  O_EXTOBJ cgall.o cgallb.o cgalld.o adBuffer.o adStack.o
620
621#TRAJECTOIRES -----------------------------------------TRAJ
622traj Tcal M SZU SZT
623
624#ESPACE ----------------------------------------------SPACE
625space  ScalA  M    1      Tcal
626
627#MODULES: les modules et leurs attributs -----------MODULES
628modul   Cz         space ScalA noward  output SZX target
629modul   BuildM3DMN space ScalA hidjac input array SZX output SZXpo2x2
630modul   Cgall      space ScalA hidjac input array SZXpo2x2 output SZXnx2 tempo  cout
631
632#CONNECTIONS: liens sorties->entrées ----------------CTIN-M
633exec disp_ct_in
634
635#ORDER: ----------------------------------------------ORDER
636#    ordre de parcourt de l'espace et de calcul des modules
637order modinspace ScalA
638   order YA1
639           BuildM3DMN Cgall
640   forder
641forder
642#
643order spaceintraj Tcal
644    ScalA
645forder
646#
647
648#USER FUNCTIONS: --------------------------------------UFCT
649#       instructions sp?cifiques de l'application
650insert_fct      xdisplay
651insert_fct      xinit_appli
652insert_fct  arg xset_freq
653#insert_fct  arg xset_freq_obs
654insert_fct  arg xset_delta
655insert_fct  arg xperturb_cz
656insert_fct  arg xsetetape
657insert_fct  arg xset_zs
658insert_fct      xinit_cz
659#insert_fct arg xcinema_freq
660
661#FIN ================================================== END
662#==========================================================
663#                  fichier de DESCRIPTION
664#==========================================================
665#DEFVAL : permet de définir des valeurs -------------DEFVAL
666defval  SZX         114 |   190 |  4 | ! used in module(s)
667defval  SZXx3       342 |   570 | 12 | must be SZX * 3
668defval  SZXnx2    13110 | 36290 | 20 | must be SZX + SZX^2
669defval  SZXx2       228 |            | must be = SZX * 2   ! used in module(s)
670defval  SZXpo2    12996 |            | must be = pow(SZX,2)
671#
672defval  SZR          51 |    71 |    61 |    51 |   101 | = NR (nbr de maille en longueur) ! used in module(s)
673defval  SZXR       5814 |  8094 |  6954 |  5814 | 10100 | must be = SZX*SZR (nbr de maille)
674defval  SZXRx2    11628 | 16188 | 13908 | 11628 | 20200 | must be = SZXR * 2 (nbr de maille Reelles et Imag)
675#
676defval  NBM          40 |    40 |    40 |    40 |    40 | = nbre de modes : must be <= SZX              ! used in module(s)
677defval  NBMR       2040 |  2840 |  2440 |  2040 |  4040 | must be = NBM*SZR                             ! used in module(s)
678defval  NBMRx2     4080 |  5680 |  4880 |  4080 |  8080 | phase : must be = NBMR*2
679defval  SZXM       4560 |  4560 |  4560 |  4560 |  4000 | mode scaled et excited : must be = SZX * NBM
680defval  SZSP       8640 | 10240 |  9440 |  8640 | 12080 | entree de Pression = sorties(Phase) + sorties(Scalex) : must be = NBMRx2 + SZXM
681#
682
683##########
684defval SZU           0
685defval SZT           1
686defval SZA           1
687
688#NAME : nom des sources  "hat" --------------------HAT_NAME
689hat_name cgmnz
690
691#OPTION : des options de g?n?ration -----------------OPTION
692#option O_VARINCR
693option  O_M1QN3
694option  O_GRADTEST
695#option O_REAL FLOAT
696option  O_EXTOBJ rt2all.o rt2allb.o rt2alld.o adBuffer.o adStack.o
697
698#TRAJECTOIRES -----------------------------------------TRAJ
699traj Tcal M SZU SZT
700
701#ESPACE ----------------------------------------------SPACE
702space  ScalA  M    1      Tcal
703
704#MODULES: les modules et leurs attributs -----------MODULES
705modul  Cz        space ScalA noward output SZX target
706modul  Grad      space ScalA hidjac input array SZX    output SZX    tempo cout
707modul  Build3DMN space ScalA hidjac input array SZX    output SZXx3
708modul  Rt2all    space ScalA hidjac input array SZXx3  output SZXnx2 tempo | cout
709modul  Norm      space ScalA hidjac input array SZXpo2 output SZXpo2 tempo | cout
710modul  Tril      space ScalA hidjac input array SZX    output SZXx2  tempo | cout
711modul  Scalex    space ScalA hidjac input array SZXpo2 output SZXM   tempo | cout
712modul  Sqrk      space ScalA hidjac input array SZX    output NBM    tempo | cout
713modul  Phase     space ScalA hidjac input array NBM    output NBMRx2 tempo | cout
714modul  Press     space ScalA hidjac input array SZSP   output SZXRx2 tempo cout
715
716#CONNECTIONS: liens sorties->entrées ----------------CTIN-M
717exec disp_ct_in
718
719#ORDER: ----------------------------------------------ORDER
720#    ordre de parcourt de l'espace et de calcul des modules
721order modinspace ScalA
722   order YA1
723           Grad
724           Build3DMN
725                 Rt2all
726     Norm
727     Tril
728     Scalex
729                 Sqrk
730                 Phase
731     Press
732   forder
733forder
734#
735order spaceintraj Tcal
736    ScalA
737forder
738#
739
740#USER FUNCTIONS: --------------------------------------UFCT
741#       instructions sp?cifiques de l'application
742insert_fct      xdisplay
743insert_fct      xinit_appli
744insert_fct  arg xset_freq
745insert_fct  arg xset_freq_obs
746insert_fct  arg xset_delta
747insert_fct  arg xperturb_cz
748insert_fct  arg xsetetape
749insert_fct  arg xset_zs
750insert_fct      xinit_cz
751
752#FIN ================================================== END
753#==============================================================================
754#
755#               fichier de DESCRIPTION nnpzdd.d
756#
757# (RESPECTER L'ORDRE - NE PAS SAISIR DE TAB)
758#==============================================================================
759
760#DEFVAL ---------------------------------------------DEFVAL
761#definition de valeur
762#defval Y3_M     20
763#
764defval SZX      39              |  39
765defval SZY      39              |  39
766defval Prof     24
767defval BioLevel 19
768# pour le modul Xbod, le nombre d'input doit etre egal
769# a Biolovel + 1 (plm) : Bodin=BioLevel+1 :
770defval Bodin    20
771#pour les nbp : ! SZA=SZU+SZT
772defval SZU    1
773defval SZT   80   | 100
774defval SZA   81   | 101
775
776exec disp_valdef
777
778#HAT_NAME -----------------------------------------HAT_NAME
779#hat_name nnpzdd
780hat_name  mk
781
782#OPTION ----------------------------------------------OPTION
783#option  O_M1QN3  M2QN1
784option   O_M1QN3
785#option  O_REAL float | default is double; was double before
786option   O_GRADTEST
787#option  O_REAL double
788#option   O_VARINCR
789
790#TRAJECTOIRES (DIM) -----------------------------------TRAJ
791#traj nom type nbuptime [offt dt] nbstept
792traj  Toei  M  0                  1
793traj  Tbio  M  SZU       0    1   SZT
794traj  Toce  M  SZU       0    1   SZT
795#nb: avec un dt=900s=15mn, il faut 96 pas pour une journée!
796exec disp_traj
797
798#SPACES (DIM) ----------------------------------------SPACE
799space Soei M  1            Toei
800space Sbio M  SZX SZY Prof Tbio
801space Site M  SZX SZY      Toce
802space Soce M  SZX SZY Prof Toce
803exec disp_space
804
805#MODULUS ---------------------------------------------MODUL
806#modul Kn    space Soei noward  output 1
807modul  XKn   space Soei noward  output 1
808modul  Kn    space Soei input 1 output 1
809#modul Mup   space Soei noward  output 1 target
810modul  XMup  space Soei noward  output 1 target
811modul  Mup   space Soei input 1 output 1
812#modul Mp    space Soei noward  output 1 target
813modul  XMp   space Soei noward  output 1 target
814modul  Mp    space Soei input 1 output 1
815#modul Gz    space Soei noward  output 1 target
816modul  XGz   space Soei noward  output 1 target
817modul  Gz    space Soei input 1 output 1
818#
819modul  Rchl space Soei noward output 1
820modul  Vd   space Soei noward output 1
821modul  Mz   space Soei noward output 1
822
823#modul Xadj  space Soce spec inter YA1 YA2
824modul  Xadj  space Site spec
825#modul Xbod  space Soce inter YA1 YA2 input Bodin output 1
826modul  Xbod  space Site input Bodin output 1
827
828modul  Xvit  space Soce spec output 3
829
830modul  Sno3  space Soce input     9 output 1
831modul  Nlin  space Soce input    19 output 1
832#modul Ndyn  space Soce input  Prof output 1 tempo
833modul  Ndyn  space Soce input  array Prof output 1 tempo
834modul  Nno3  space Soce input     3 output 1 tempo
835
836modul  Snh4  space Soce input     9 output 1
837modul  Alin  space Soce clonol Nlin
838modul  Adyn  space Soce clonol Ndyn
839modul  Anh4  space Soce clonol Nno3
840
841modul  Sphy  space Soce input     7 output 1
842modul  Plin  space Soce clonol Nlin
843modul  Pdyn  space Soce clonol Ndyn
844modul  Ppla  space Soce input     3 output 1 tempo cout
845
846modul  Szoo  space Soce input     4 output 1
847modul  Zlin  space Soce clonol Nlin
848modul  Zdyn  space Soce clonol Ndyn
849#modul Zpla  space Soce clonol Nno3
850modul  Zpla  space Soce clonol Ppla
851
852modul  Sdet  space Soce input     7 output 1
853modul  Dlin  space Soce clonol Nlin
854modul  Ddyn  space Soce clonol Ndyn
855#modul Detr  space Soce clonol Nno3
856modul  Detr  space Soce clonol Ppla
857
858modul  Sdom  space Soce input     8 output 1
859modul  Olin  space Soce clonol Nlin
860modul  Odyn  space Soce clonol Ndyn
861modul  Orga  space Soce clonol Nno3
862
863modul  Lno3  space Sbio input     3 output 1 tempo
864modul  Lnh4  space Sbio input     2 output 1 tempo
865modul  Graz  space Sbio input     4 output 2 tempo
866
867modul  Chlt  space Sbio input     2 output 1 tempo
868modul  Chlw  space Sbio clonol Chlt
869modul  Lpar  space Sbio input     2 output 1 tempo
870
871modul  Tldag space Sbio input     1 output 1 tempo
872modul  Wldag space Sbio clonol Tldag
873modul  Tldar space Sbio input     1 output 1 tempo
874modul  Wldar space Sbio clonol Tldar
875modul  Wparr space Sbio input     2 output 1 tempo
876modul  Wparg space Sbio clonol Wparr
877modul  Tparr space Sbio input     2 output 1 tempo
878modul  Tparg space Sbio clonol Tparr
879
880#exec disp_modul
881
882#CONNECTIONS-----------------------------------------CTIN+M
883ctin   Kn    1     from XKn   1    1
884ctin   Mup   1     from XMup  1    1
885ctin   Mp    1     from XMp   1    1
886ctin   Gz    1     from XGz   1    1
887#
888ctin   Nno3  1     from Nno3  1    i    j    k     t-1
889ctinm  Nno3  2..3  from Ndyn  1    i    j    k     t%-1
890ctin   Anh4  1     from Anh4  1    i    j    k     t-1
891ctinm  Anh4  2..3  from Adyn  1    i    j    k     t%-1
892ctin   Ppla  1     from Ppla  1    i    j    k     t-1
893ctinm  Ppla  2..3  from Pdyn  1    i    j    k     t%-1
894ctin   Zpla  1     from Zpla  1    i    j    k     t-1
895ctinm  Zpla  2..3  from Zdyn  1    i    j    k     t%-1
896ctin   Detr  1     from Detr  1    i    j    k     t-1
897ctinm  Detr  2..3  from Ddyn  1    i    j    k     t%-1
898ctin   Orga  1     from Orga  1    i    j    k     t-1
899ctinm  Orga  2..3  from Odyn  1    i    j    k     t%-1
900ctin   Lno3  1     from Ndyn  1    i    j    k     t-1
901ctin   Lno3  2     from Adyn  1    i    j    k     t-1
902ctin   Lno3  3     from Kn    1    1
903ctin   Lnh4  1     from Adyn  1    i    j    k     t-1
904ctin   Lnh4  2     from Kn    1    1
905ctin   Graz  1     from Pdyn  1    i    j    k     t-1
906ctin   Graz  2     from Zdyn  1    i    j    k     t-1
907ctin   Graz  3     from Ddyn  1    i    j    k     t-1
908ctin   Graz  4     from Gz    1    1
909ctin   Chlw  1     from Pdyn  1    i    j    k-1   t-1
910ctin   Chlw  2     from Rchl  1    1
911ctin   Chlt  1     from Pdyn  1    i    j    k     t-1
912ctin   Chlt  2     from Rchl  1    1
913ctin   Wldar 1     from Chlw  1    i    j    k     t
914ctin   Wldag 1     from Chlw  1    i    j    k     t
915ctin   Wparr 1     from Wparr 1    i    j    k-1   t
916ctin   Wparr 2     from Wldar 1    i    j    k     t
917ctin   Wparg 1     from Wparg 1    i    j    k-1   t
918ctin   Wparg 2     from Wldag 1    i    j    k     t
919ctin   Tldar 1     from Chlt  1    i    j    k     t
920ctin   Tldag 1     from Chlt  1    i    j    k     t
921ctin   Tparr 1     from Wparr 1    i    j    k     t
922ctin   Tparr 2     from Tldar 1    i    j    k     t
923ctin   Tparg 1     from Wparg 1    i    j    k     t
924ctin   Tparg 2     from Tldag 1    i    j    k     t
925ctin   Lpar  1     from Tparr 1    i    j    k     t
926ctin   Lpar  2     from Tparg 1    i    j    k     t
927ctin   Sno3  1     from Adyn  1    i    j    k     t-1
928ctin   Sno3  2     from Pdyn  1    i    j    k     t-1
929ctin   Sno3  3     from Lno3  1    i    j    k     t
930ctin   Sno3  4     from Lpar  1    i    j    k     t
931ctin   Sno3  5     from Zdyn  1    i    j    k     t-1
932ctin   Sno3  6     from Ddyn  1    i    j    k     t-1
933ctin   Sno3  7     from Odyn  1    i    j    k     t-1
934ctin   Sno3  8     from Xbod  1    i    j
935ctin   Sno3  9     from Mup   1    1
936ctin   Sphy  1     from Lno3  1    i    j    k     t
937ctin   Sphy  2     from Lnh4  1    i    j    k     t
938ctin   Sphy  3     from Pdyn  1    i    j    k     t-1
939ctin   Sphy  4     from Graz  1    i    j    k     t
940ctin   Sphy  5     from Lpar  1    i    j    k     t
941ctin   Sphy  6     from Mup   1    1
942ctin   Sphy  7     from Mp    1    1
943ctin   Snh4  1     from Lno3  1    i    j    k     t
944ctin   Snh4  2     from Adyn  1    i    j    k     t-1
945ctin   Snh4  3     from Lnh4  1    i    j    k     t
946ctin   Snh4  4     from Pdyn  1    i    j    k     t-1
947ctin   Snh4  5     from Zdyn  1    i    j    k     t-1
948ctin   Snh4  6     from Ddyn  1    i    j    k     t-1
949ctin   Snh4  7     from Lpar  1    i    j    k     t
950ctin   Snh4  8     from Mup   1    1
951#ctin  Snh4  9     from Orga  1    i    j    k     t-1
952ctin   Snh4  9     from Odyn  1    i    j    k     t-1
953ctin   Szoo  1     from Zdyn  1    i    j    k     t-1
954ctin   Szoo  2..3  from Graz  1..2 i    j    k     t
955ctin   Szoo  4     from Mz    1    1
956ctin   Sdet  1     from Pdyn  1    i    j    k     t-1
957ctin   Sdet  2..3  from Ddyn  1    i    j    k%-1  t-1
958ctin   Sdet  4..5  from Graz  1..2 i    j    k     t
959ctin   Sdet  6     from Mp    1    1
960ctin   Sdet  7     from Vd    1    1
961ctin   Sdom  1     from Lno3  1    i    j    k     t
962ctin   Sdom  2     from Lnh4  1    i    j    k     t
963ctin   Sdom  3     from Pdyn  1    i    j    k     t-1
964ctin   Sdom  4     from Zdyn  1    i    j    k     t-1
965ctin   Sdom  5     from Ddyn  1    i    j    k     t-1
966ctin   Sdom  6     from Odyn  1    i    j    k     t-1
967ctin   Sdom  7     from Lpar  1    i    j    k     t
968ctin   Sdom  8     from Mup   1    1
969ctin  Adyn 1..Prof from Alin  1    i    j    1..Prof
970ctin  Ndyn 1..Prof from Nlin  1    i    j    1..Prof
971ctin  Pdyn 1..Prof from Plin  1    i    j    1..Prof
972ctin  Zdyn 1..Prof from Zlin  1    i    j    1..Prof
973ctin  Ddyn 1..Prof from Dlin  1    i    j    1..Prof
974ctin  Odyn 1..Prof from Olin  1    i    j    1..Prof
975ctin  Xbod 1..BioLevel from Zpla 1 i    j    1..BioLevel t-1
976ctin  Xbod Bodin   from Mz    1    1
977ctin   Alin  1     from Snh4  1    i    j    k
978ctinm  Alin  2..6  from Anh4  1    i%~1 j#~1 k     t-1
979ctinm  Alin  7..13 from Adyn  1    i%~1 j#~1 k#~1  t-1
980ctin   Alin 14     from Xvit  1    i-1  j    k
981ctin   Alin 15     from Xvit  2    i    j-1  k
982ctin   Alin 16     from Xvit  3    i    j    k+1
983ctin   Alin 17..19 from Xvit  1..3 i    j    k
984ctin   Nlin  1     from Sno3  1    i    j    k
985ctinm  Nlin  2..6  from Nno3  1    i%~1 j#~1 k     t-1
986ctinm  Nlin  7..13 from Ndyn  1    i%~1 j#~1 k#~1  t-1
987ctin   Nlin 14     from Xvit  1    i-1  j    k
988ctin   Nlin 15     from Xvit  2    i    j-1  k
989ctin   Nlin 16     from Xvit  3    i    j    k+1
990ctin   Nlin 17..19 from Xvit  1..3 i    j    k
991ctin   Plin  1     from Sphy  1    i    j    k
992ctinm  Plin  2..6  from Ppla  1    i%~1 j#~1 k     t-1
993ctinm  Plin  7..13 from Pdyn  1    i%~1 j#~1 k#~1  t-1
994ctin   Plin 14     from Xvit  1    i-1  j    k
995ctin   Plin 15     from Xvit  2    i    j-1  k
996ctin   Plin 16     from Xvit  3    i    j    k+1
997ctin   Plin 17..19 from Xvit  1..3 i    j    k
998ctin   Zlin  1     from Szoo  1    i    j    k
999ctinm  Zlin  2..6  from Zpla  1    i%~1 j#~1 k     t-1
1000ctinm  Zlin  7..13 from Zdyn  1    i%~1 j#~1 k#~1  t-1
1001ctin   Zlin 14     from Xvit  1    i-1  j    k
1002ctin   Zlin 15     from Xvit  2    i    j-1  k
1003ctin   Zlin 16     from Xvit  3    i    j    k+1
1004ctin   Zlin 17..19 from Xvit  1..3 i    j    k
1005ctin   Dlin  1     from Sdet  1    i    j    k
1006ctinm  Dlin  2..6  from Detr  1    i%~1 j#~1 k     t-1
1007ctinm  Dlin  7..13 from Ddyn  1    i%~1 j#~1 k#~1  t-1
1008ctin   Dlin 14     from Xvit  1    i-1  j    k
1009ctin   Dlin 15     from Xvit  2    i    j-1  k
1010ctin   Dlin 16     from Xvit  3    i    j    k+1
1011ctin   Dlin 17..19 from Xvit  1..3 i    j    k
1012ctin   Olin  1     from Sdom  1    i    j    k
1013ctinm  Olin  2..6  from Orga  1    i%~1 j#~1 k     t-1
1014ctinm  Olin  7..13 from Odyn  1    i%~1 j#~1 k#~1  t-1
1015ctin   Olin 14     from Xvit  1    i-1  j    k
1016ctin   Olin 15     from Xvit  2    i    j-1  k
1017ctin   Olin 16     from Xvit  3    i    j    k+1
1018ctin   Olin 17..19 from Xvit  1..3 i    j    k
1019#exec disp_ct_in
1020#exec disp_ct_out
1021
1022#ORDRE (Ascending, Backwarding) ----------------------ORDER
1023#-----
1024order modinspace Soei
1025  order YA1 Kn Mup Mp Gz forder
1026forder
1027#-----
1028order modinspace Sbio
1029  order YA2 YA1
1030              order YA3 Chlw  Chlt forder
1031              order YA3 Wldar Wldag forder
1032              order YA3 Wparr Wparg forder
1033              order YA3 Tldar Tldag forder
1034              order YA3 Tparr Tparg forder
1035              order YA3 Lno3  Lnh4 Lpar Graz forder
1036  forder
1037forder
1038#-----
1039order modinspace Site
1040  order YA2 YA1 Xadj Xbod forder
1041forder
1042#
1043order modinspace Soce
1044  order YA2 YA1
1045              order YA3 Sno3 Snh4 Sphy Szoo Sdet Sdom forder
1046              order YA3 Nlin forder
1047              order YA3 Alin Plin Zlin Dlin Olin forder
1048              order YA3 Ndyn Adyn Pdyn Zdyn Ddyn Odyn forder
1049              order YA3 Nno3 Anh4 Ppla Zpla Detr Orga forder
1050  forder
1051forder
1052#---------------------
1053order spaceintraj Toei
1054      Soei
1055forder
1056#-----
1057order spaceintraj Tbio
1058      Sbio
1059forder
1060#-----
1061order spaceintraj Toce
1062      Site Soce
1063forder
1064#-----
1065
1066#USER FUNCTIONS ---------------------------------INSERT_FCT
1067insert_fct     initialiser_trajectoire
1068insert_fct     xdisplay
1069insert_fct     xend2init
1070insert_fct arg xspinup
1071insert_fct arg xsetodg
1072insert_fct arg xsetsel
1073insert_fct arg xsetcass
1074insert_fct arg xset_delta
1075
1076#TO REMEMBER ----------------------------------------------
1077#modul  Kn   outer 1 output 1
1078#modul  Mup  outer 1 output 1 target
1079#modul  Mp   outer 1 output 1 target
1080#modul  Gz   outer 1 output 1 target
1081#modul  Rchl outer 1 output 1
1082#modul  Vd   outer 1 output 1
1083#modul  Mz   outer 1 output 1
1084
1085
1086
1087
1088
1089
Note: See TracBrowser for help on using the repository browser.