Changeset 2265 for LMDZ5/trunk/libf/phylmd/write_histrac.h

Timestamp:

Apr 18, 2015, 5:06:36 PM (9 years ago)

Author:

jyg

Message:

Bug fixes concerning the number "nqo" of water
phases in "q" array: part II (sequel of fixes of
revision 2262).

Modified files:

carbon_cycle_mod.F90
ini_histrac.h
phyredem.F90
phyetat0.F90
traclmdz_mod.F90
write_histrac.h

File:

• LMDZ5/trunk/libf/phylmd/write_histrac.h (modified) (1 diff)

LMDZ5/trunk/libf/phylmd/write_histrac.h

@@ -17 +17 @@
 !----------------
      DO it=1,nbtr
-        iiq=niadv(it+2)
+!!        iiq=niadv(it+2)                                                           ! jyg
+        iiq=niadv(it+nqo)                                                           ! jyg
 
 ! CONCENTRATIONS