Changeset 2347 for LMDZ5/trunk/libf/dynlonlat_phylonlat/phylmd

Timestamp:

Aug 24, 2015, 9:26:48 AM (9 years ago)

Author:

Ehouarn Millour

Message:

Make iniphysiq a module.
Fix call to iniphysiq in lmdz1d (missing arguments and arrays of wrong sizes).
EM

File:

• LMDZ5/trunk/libf/dynlonlat_phylonlat/phylmd/iniphysiq_mod.F90 (moved) (moved from LMDZ5/trunk/libf/dynlonlat_phylonlat/phylmd/iniphysiq.F90) (2 diffs)

LMDZ5/trunk/libf/dynlonlat_phylonlat/phylmd/iniphysiq_mod.F90

@@ -1 @@
-
+!
 ! $Id$
-
+!
+MODULE iniphysiq_mod
+
+CONTAINS
 
 SUBROUTINE iniphysiq(ii,jj,nlayer,punjours, pdayref,ptimestep, &
@@ -211 +214 @@
 
 END SUBROUTINE iniphysiq
+
+END MODULE iniphysiq_mod