Changeset 1452 for trunk/LMDZ.VENUS/libf/phyvenus/physiq.F

Timestamp:

Jun 16, 2015, 1:26:46 PM (9 years ago)

Author:

slebonnois

Message:

SL: converging photochemistry/high atm, with bug corrections and rho output

File:

• trunk/LMDZ.VENUS/libf/phyvenus/physiq.F (modified) (2 diffs)

trunk/LMDZ.VENUS/libf/phyvenus/physiq.F

@@ -881 +881 @@
          endif
 
+!         Pas appel concentrations car BUG ... comprend pas
+!         valeur de mmean trop hautes 5,25E+29
+!         call concentrations2(pplay,t_seri,d_t,tr_seri, nqmax)
+
          if (ok_deltatemp) then
 ! Utilisation du champ de temperature modifie         
@@ -1224 +1228 @@
 
       if(callthermos) then
-         call concentrations2(pplay,t_seri,d_t,tr_seri, nqmax,
-     &                        pdtphys)
+         call concentrations2(pplay,t_seri,d_t,tr_seri, nqmax)
 
       endif