Changeset 3817 for dynamico_lmdz/aquaplanet/LMDZ5/libf/dynlonlat_phylonlat/phylmd/iniphysiq.F90

Timestamp:

Apr 17, 2015, 10:30:37 PM (10 years ago)

Author:

millour

Message:

Further cleanup and removal of references to iniprint.h.
Also added bench testcase 48x36x19.
EM

File:

• dynamico_lmdz/aquaplanet/LMDZ5/libf/dynlonlat_phylonlat/phylmd/iniphysiq.F90 (modified) (2 diffs)

dynamico_lmdz/aquaplanet/LMDZ5/libf/dynlonlat_phylonlat/phylmd/iniphysiq.F90

@@ -24 +24 @@
   USE infotrac, ONLY: nqtot,nqo,nbtr,tname,ttext,type_trac,&
                       niadv,conv_flg,pbl_flg,solsym
-  USE phytrac_mod, ONLY: ini_phytrac_mod
   USE control_mod, ONLY: dayref,anneeref,day_step,iphysiq,nday,&
                          config_inca,raz_date,offline
@@ -163 +162 @@
 
   ! Initialize tracer names, numbers, etc. for physics
-  CALL ini_phytrac_phy(nqtot,nqo,nbtr,tname,ttext,type_trac,&
-                       niadv,conv_flg,pbl_flg,solsym)
+  CALL init_infotrac_phy(nqtot,nqo,nbtr,tname,ttext,type_trac,&
+                         niadv,conv_flg,pbl_flg,solsym)
 
   ! transfer some flags/infos from dynamics to physics