Changeset 52


Ignore:
Timestamp:
07/30/12 10:41:58 (12 years ago)
Author:
dubos
Message:

Re-introduced writefield for ps.

File:
1 edited

Legend:

Unmodified
Added
Removed

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

    r51 r52  
    688688         f_buf_i(:), f_buf_v(:), f_buf_i3(:), f_buf1_i(:), f_buf2_i(:), f_buf_s(:), f_buf_p(:) 
    689689     
     690    CALL writefield("ps",f_ps) 
    690691    CALL writefield("dps",f_dps) 
    691692    CALL writefield("phis",f_phis) 
Note: See TracChangeset for help on using the changeset viewer.