Changeset 2319 for LMDZ5/trunk/libf/phylmd/iophy.F90

Timestamp:

Jun 30, 2015, 1:49:22 PM (9 years ago)

Author:

Laurent Fairhead

Message:

Some initialisation missing

File:

• LMDZ5/trunk/libf/phylmd/iophy.F90 (modified) (2 diffs)

LMDZ5/trunk/libf/phylmd/iophy.F90

@@ -46 +46 @@
                                 is_sequential, is_south_pole
   USE mod_grid_phy_lmdz, only: nbp_lon, nbp_lat, klon_glo
+  USE print_control_mod, ONLY: prt_level,lunout 
 #ifdef CPP_IOIPSL
   USE ioipsl, only: flio_dom_set
@@ -562 +563 @@
                                    clef_stations, phys_out_filenames, lev_files, &
                                    nid_files, nhorim, swaero_diag
+    USE print_control_mod, ONLY: prt_level,lunout 
 #ifdef CPP_XIOS
     use wxios, only: wxios_add_field_to_file