Changeset 3049 for LMDZ6/branches/DYNAMICO-conv/libf/phy_common/mod_phys_lmdz_para.F90

Timestamp:

Oct 29, 2017, 11:13:59 AM (7 years ago)

Author:

Laurent Fairhead

Message:

Replacing iniprint

File:

• LMDZ6/branches/DYNAMICO-conv/libf/phy_common/mod_phys_lmdz_para.F90 (modified) (1 diff)

LMDZ6/branches/DYNAMICO-conv/libf/phy_common/mod_phys_lmdz_para.F90

@@ -49 +49 @@
   SUBROUTINE Test_transfert
   USE mod_grid_phy_lmdz
+  USE print_control_mod, ONLY: lunout
   IMPLICIT NONE
-    INCLUDE "iniprint.h"
+!    INCLUDE "iniprint.h"
  
     REAL :: Test_Field1d_glo(klon_glo,nbp_lev)