Ignore:
Timestamp:
07/18/12 18:39:59 (12 years ago)
Author:
dubos
Message:

Review of 3D transport code
Fewer interations in dissip_gcm
This revision is certainly broken ; see next revision

File:
1 edited

Legend:

Unmodified
Added
Removed

  • codes/icosagcm/trunk/src/dissip_gcm.f90

    r19 r22  
    145145 
    146146 
    147     DO it=1,500 
     147    DO it=1,20 
    148148 
    149149      CALL transfert_request(f_u,req_dissip) 
    … …  
    212212 
    213213 
    214     DO it=1,500 
     214    DO it=1,20 
    215215  
    216216      CALL transfert_request(f_u,req_dissip) 
    … …  
    279279    ENDDO 
    280280 
    281     DO it=1,500 
     281    DO it=1,20 
    282282 
    283283      CALL transfert_request(f_theta,req_i1) 
Note: See TracChangeset for help on using the changeset viewer.