Ignore:
Timestamp:
07/16/13 01:22:15 (11 years ago)
Author:
leila_ocean
Message:

ready to implement filter

File:
1 edited

Legend:

Unmodified
Added
Removed

  • altifloat/src/floater_delta.d

    r104 r106  
    11//#define FILTER 
    22 
    3 defval jtlag 12//nombre de pas de temps Delta t/ delta t 
     3 
     4defval jtlag 3//nombre de pas de temps Delta t/ delta t 
    45defval nlon 87 //nbre de points de grilles en longitude 
    56defval nlat 58 //nbre de points de grilles en latitude 
    6 defval nfloat 1 //nbre de flotteurs 
     7defval nfloat 280 //nbre de flotteurs 
    78 
    89#ifdef FILTER 
    … …  
    2930traj T_float M 1    OFIL  1    jtlag //trajectoire pour r  
    3031traj T_euler M 0    OFIL  1    1 //trajectoire pour u et v 
     32//for varibale u, put under nb step jtlag  
    3133 
    3234//deltas 
    … …  
    5961modul v           space S_euler noward   output 1  
    6062modul locate  space S_eulerlocate input 2  output 1 tempo 
     63modul mask    space S_euler noward output 1 
     64 
    6165 
    6266//deltas 
    … …  
    7276modul uc_d     space S_euler_df noward output 1 target 
    7377modul vc_d     space S_euler_df noward output 1 target 
    74 modul lapfilu  space S_euler_df_t input 6 output 1 tempo 
     78modul cfil         space S_euler_df noward output 9 
     79modul dfil     space S_euler_df noward output 9 
     80modul lapfilu  space S_euler_df_t input 20 output 1 tempo 
    7581modul lapfilv space  S_euler_df_t clonol lapfilu 
    7682modul u_d      space S_euler_d  input 1 output 1 
    … …  
    114120 
    115121#ifdef FILTER 
    116 ctin lapfilu    1      from  uc_d     1  i   j 
    117 ctin lapfilu    2      from  lapfilu  1  i   j   t-1 
    118 ctin lapfilu    3      from  lapfilu  1  i-1 j   t-1 
    119 ctin lapfilu    4      from  lapfilu  1  i+1 j   t-1 
    120 ctin lapfilu    5      from  lapfilu  1  i   j-1 t-1 
    121 ctin lapfilu    6      from  lapfilu  1  i   j+1 t-1 
    122 //LLLL  
    123 //ctin lapfilu 7      from  WW    1  i   j      
    124 //ctin lapfilu 8      from  WW    1  i-1 j    
    125 //ctin lapfilu 9      from  WW    1  i+1 j    
    126 //ctin lapfilu 10      from  WW   1  i j-1     
    127 //ctin lapfilu 11      from  WW   1  i j+1        
    128  
     122ctin lapfilu    1      from  uc_d     1  i    j 
     123ctin lapfilu    2      from  lapfilu  1  i    j   t-1 
     124ctin lapfilu    3      from  lapfilu  1  i+1  j   t-1 
     125ctin lapfilu    4      from  lapfilu  1  i    j+1      t-1 
     126ctin lapfilu    5      from  lapfilu  1  i    j-1    t-1 
     127ctin lapfilu    6      from  lapfilu  1  i-1  j    t-1 
     128ctin lapfilu    7      from  lapfilv  1  i    j      t-1 
     129ctin lapfilu    8      from  lapfilv  1  i+1  j-1   t-1 
     130ctin lapfilu    9      from  lapfilv  1  i    j-1   t-1 
     131ctin lapfilu    10      from  lapfilv 1  i+1  j     t-1 
     132ctin lapfilu    11..19 from  cfil     1..9 i j 
     133ctin lapfilu    20     from  mask     1  i  j 
    129134 
    130135ctin lapfilv    1      from  vc_d     1  i   j 
    131136ctin lapfilv    2      from  lapfilv  1  i   j   t-1 
    132 ctin lapfilv    3      from  lapfilv  1  i-1 j   t-1 
    133 ctin lapfilv    4      from  lapfilv  1  i+1 j   t-1 
    134 ctin lapfilv    5      from  lapfilv  1  i   j-1 t-1 
    135 ctin lapfilv    6      from  lapfilv  1  i   j+1 t-1 
    136 //LLLL  
    137 //ctin lapfilv 7      from  WW    1  i   j      
    138 //ctin lapfilv 8      from  WW    1  i-1 j    
    139 //ctin lapfilv 9      from  WW    1  i+1 j    
    140 //ctin lapfilv 10      from  WW   1  i j-1     
    141 //ctin lapfilv 11      from  WW   1  i j+1       
     137ctin lapfilv    3      from  lapfilv  1  i+1 j   t-1 
     138ctin lapfilv    4      from  lapfilv  1  i   j+1      t-1 
     139ctin lapfilv    5      from  lapfilv  1  i   j-1    t-1 
     140ctin lapfilv    6      from  lapfilv  1  i-1 j    t-1 
     141ctin lapfilv    7      from  lapfilu  1  i   j      t-1 
     142ctin lapfilv    8      from  lapfilu  1  i   j+1   t-1 
     143ctin lapfilv    9      from  lapfilu  1  i-1 j   t-1 
     144ctin lapfilv    10      from  lapfilu 1  i-1 j+1     t-1 
     145ctin lapfilv    11..19 from  dfil     1..9 i j 
     146ctin lapfilv    20     from  mask     1  i  j 
    142147 
    143148ctin u_d       1      from  lapfilu   1  i   j   t 
Note: See TracChangeset for help on using the changeset viewer.