Changeset 956 for LMDZ4/trunk/libf/phy_IPCC_AR4/physiq.F

Timestamp:

May 9, 2008, 6:17:59 PM (17 years ago)

Author:

lmdzadmin

Message:

Nettoyage du controle des parametres physiques. FH

Les parametres cycle_diurne, soil_model, new_oliq, ok_orodr, ok_orolf, ok_limitvrai, nbapp_rad et iflag_con
sont maintenant geres par la physique uniquement.
ecritphy est elimine.
dimphy.F90 et clesphys.h ne sont plus utilises par le code dynamique.
Le test academique obtenu en compilant avec
makegcm -p nophys gcm
fonctionne. FH
IM

File:

• LMDZ4/trunk/libf/phy_IPCC_AR4/physiq.F (modified) (2 diffs)

LMDZ4/trunk/libf/phy_IPCC_AR4/physiq.F

@@ -1582 +1582 @@
          itaprad = 0
 
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+! FH 2008/05/02 changement lie a la lecture de nbapp_rad dans phylmd
+! plutot que
+! dyn3d
+! Attention : la version precedente n'etait pas tres propre.
+! Il se peut qu'il faille prendre une valeur differente de nbapp_rad
+! pour obtenir le meme resultat.
+         dtime=pdtphys
+         radpas = NINT( 86400./dtime/nbapp_rad)
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+
          CALL phyetat0 ("startphy.nc",dtime,co2_ppm_etat0,solaire_etat0,
      .       rlat,rlon,pctsrf, ftsol,
@@ -1601 +1612 @@
       ENDDO
 
-         radpas = NINT( 86400./dtime/nbapp_rad)
 c
 C on remet le calendrier a zero