Changeset 3605 for LMDZ6/branches/Ocean_skin/libf/phydev/inifis_mod.F90

Timestamp:

Nov 21, 2019, 4:43:45 PM (5 years ago)

Author:

lguez

Message:

Merge revisions 3427:3600 of trunk into branch Ocean_skin

Location:

LMDZ6/branches/Ocean_skin

Files:

• . (modified) (1 prop)
• libf/phydev/inifis_mod.F90 (modified) (2 diffs)

LMDZ6/branches/Ocean_skin/libf/phydev/inifis_mod.F90

@@ -1 @@
-! $Id: $
+! $Id$
 MODULE inifis_mod
 
@@ -6 +6 @@
   SUBROUTINE inifis(prad, pg, pr, pcpp)
   ! Initialize some physical constants and settings
-  USE print_control_mod, ONLY: init_print_control
+  USE init_print_control_mod, ONLY: init_print_control
   USE comcstphy, ONLY: rradius, & ! planet radius (m)
                        rr, & ! recuced gas constant: R/molar mass of atm