source: LMDZ6/branches/contrails/libf/phylmd/tsoilnudge_mod_h.f90 @ 5450

Last change on this file since 5450 was 5301, checked in by abarral, 8 weeks ago

Turn tsoilnudge.h fcg_gcssold.h flux_arp.h into module

File size: 220 bytes
Line 
1MODULE tsoilnudge_mod_h
2  IMPLICIT NONE; PRIVATE
3  PUBLIC nudge_tsoil, isoil_nudge, Tsoil_nudge, tau_soil_nudge
4
5  LOGICAL nudge_tsoil
6  INTEGER isoil_nudge
7  REAL Tsoil_nudge, tau_soil_nudge
8END MODULE tsoilnudge_mod_h
Note: See TracBrowser for help on using the repository browser.