Ignore:
Timestamp:
08/04/12 01:10:06 (12 years ago)
Author:
ymipsl
Message:

Put time variable : dt, itaumax, write_period, itau_out in the time module

YM

File:
1 edited

Legend:

Unmodified
Added
Removed

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

    r59 r98  
    4444  END SUBROUTINE allocate_dissip 
    4545  
    46   SUBROUTINE init_dissip(dt) 
     46  SUBROUTINE init_dissip 
    4747  USE icosa 
    4848  USE disvert_mod 
    … …  
    5151   
    5252  IMPLICIT NONE 
    53   REAL,INTENT(IN)       :: dt 
    5453   
    5554  TYPE(t_field),POINTER :: f_u(:) 
Note: See TracChangeset for help on using the changeset viewer.