[1] | 1 | #========================================================== |
---|
| 2 | # fichier de DESCRIPTION |
---|
| 3 | #========================================================== |
---|
| 4 | |
---|
| 5 | #DEFVAL pour definir des valeurs --------------------DEFVAL |
---|
| 6 | defval SZX 50 | 80 | 100 |
---|
| 7 | defval SZY 50 | 80 | 100 |
---|
| 8 | defval SZU 1 |
---|
| 9 | defval SZT 99 | 200 | 400 |
---|
| 10 | defval SZA 100 | 201 | 401 |
---|
| 11 | #exec disp_defval |
---|
| 12 | |
---|
| 13 | #NAME ---------------------------------------------HAT_NAME |
---|
| 14 | hat_name shald |
---|
| 15 | |
---|
| 16 | #OPTION ---------------------------------------------OPTION |
---|
| 17 | option o_gradtest |
---|
| 18 | option o_m1qn3 |
---|
| 19 | |
---|
| 20 | #TRAJECTOIRES -----------------------------------------TRAJ |
---|
| 21 | traj Toce M SZU SZT | (en secondes) |
---|
| 22 | |
---|
| 23 | #ESPACE ----------------------------------------------SPACE |
---|
| 24 | space Soce M SZX SZY Toce |
---|
| 25 | |
---|
| 26 | #MODULES -------------------------------------------MODULES |
---|
| 27 | modul Hfas space Soce input 3 output 1 tempo target cout |
---|
| 28 | modul Ufas space Soce clonof Hfas |
---|
| 29 | modul Vfas space Soce clonof Hfas |
---|
| 30 | modul Hdyn space Soce input 5 output 1 tempo |
---|
| 31 | modul Udyn space Soce input 7 output 1 tempo |
---|
| 32 | modul Vdyn space Soce input 7 output 1 tempo |
---|
| 33 | exec disp_modul |
---|
| 34 | |
---|
| 35 | #CONNECTIONS -----------Maillage 1 -----------------CTIN-M |
---|
| 36 | ctin Vdyn 1 from Vfas 1 i j t-1 |
---|
| 37 | ctin Vdyn 2..3 from Hdyn 1 i j%-1 t-1 |
---|
| 38 | ctin Vdyn 4..7 from Udyn 1 i%-1 j%-1 t-1 |
---|
| 39 | |
---|
| 40 | ctin Udyn 1 from Ufas 1 i j t-1 |
---|
| 41 | ctin Udyn 2..3 from Hdyn 1 i%+1 j t-1 |
---|
| 42 | ctin Udyn 4..7 from Vdyn 1 i%+1 j%+1 t-1 |
---|
| 43 | |
---|
| 44 | ctin Hdyn 1 from Hfas 1 i j t-1 |
---|
| 45 | ctin Hdyn 2..3 from Udyn 1 i%-1 j t-1 |
---|
| 46 | ctin Hdyn 4..5 from Vdyn 1 i j%+1 t-1 |
---|
| 47 | |
---|
| 48 | ctin Vfas 1 from Vfas 1 i j t-1 |
---|
| 49 | ctin Vfas 2..3 from Vdyn 1 i j t%-1 |
---|
| 50 | |
---|
| 51 | ctin Hfas 1 from Hfas 1 i j t-1 |
---|
| 52 | ctin Hfas 2..3 from Hdyn 1 i j t%-1 |
---|
| 53 | |
---|
| 54 | ctin Ufas 1 from Ufas 1 i j t-1 |
---|
| 55 | ctin Ufas 2..3 from Udyn 1 i j t%-1 |
---|
| 56 | |
---|
| 57 | exec disp_ct_in |
---|
| 58 | |
---|
| 59 | #ORDER -----------------------------------------------ORDER |
---|
| 60 | order modinspace Soce |
---|
| 61 | order YA1 YA2 |
---|
| 62 | Vdyn Hdyn Udyn |
---|
| 63 | Vfas Hfas Ufas |
---|
| 64 | forder |
---|
| 65 | forder |
---|
| 66 | # |
---|
| 67 | order spaceintraj Toce |
---|
| 68 | Soce |
---|
| 69 | forder |
---|
| 70 | # |
---|
| 71 | |
---|
| 72 | #USER FUNCTIONS ---------------------------------------UFCT |
---|
| 73 | insert_fct xdisplay |
---|
| 74 | insert_fct arg xivg | init variables globales (fcor, grav, ....) |
---|
| 75 | insert_fct arg xgauss |
---|
| 76 | insert_fct xvitgeo |
---|
| 77 | insert_fct xvitf2d |
---|
| 78 | #FIN ================================================== END |
---|