source: LMDZ6/trunk/libf/phylmd/thermcell_old_mod_h.f90 @ 5300

Last change on this file since 5300 was 5291, checked in by abarral, 5 weeks ago

Move thermcell_old.h iotd.h to module

File size: 268 bytes
Line 
1MODULE thermcell_old_mod_h
2  IMPLICIT NONE; PRIVATE
3  PUBLIC r_aspect_thermals, l_mix_thermals, w2di_thermals
4  real, parameter :: r_aspect_thermals = 2.
5  real, parameter :: l_mix_thermals = 30.
6  integer, parameter :: w2di_thermals = 0
7END MODULE thermcell_old_mod_h
Note: See TracBrowser for help on using the repository browser.