Changeset 107 for trunk/libf/phytitan

Timestamp:

Mar 28, 2011, 9:10:44 PM (14 years ago)

Author:

slebonnois

Message:

SL : juste correction d'une erreur dans sorties des opacites...

File:

• trunk/libf/phytitan/ini_histins.h (modified) (10 diffs)

trunk/libf/phytitan/ini_histins.h

@@ -116 +116 @@
          CALL histdef(nid_ins, tname(iq), ttext(iq), "n/m2",
      .                iim,jjmp1,nhori, klev,1,klev,nvert, 32,
-     .                "ave(X)", zsto,zout)
+     .                "ins(X)", zsto,zout)
            ENDDO
           endif
@@ -123 +123 @@
          CALL histdef(nid_ins, tname(iq), ttext(iq), "ppm",
      .                iim,jjmp1,nhori, klev,1,klev,nvert, 32,
-     .                "ave(X)", zsto,zout)
+     .                "ins(X)", zsto,zout)
            ENDDO
           endif
@@ -158 +158 @@
          CALL histdef(nid_ins,"thv"//str1,"Haze Opa Vis",
      .                "--",iim,jjmp1,nhori,klev,1,klev,nvert,32,
-     .                "ave(X)",zsto1,zout)
+     .                "ins(X)",zsto,zout)
          ENDDO
 c
@@ -165 +165 @@
          CALL histdef(nid_ins,"khv"//str1,"Haze ext Vis ",
      .                "m-1",iim,jjmp1,nhori,klev,1,klev,nvert,32,
-     .                "ave(X)",zsto1,zout)
+     .                "ins(X)",zsto,zout)
          ENDDO
 c
@@ -172 +172 @@
          CALL histdef(nid_ins,"tgv"//str1,"Haze Opa Vis",
      .                "--",iim,jjmp1,nhori,klev,1,klev,nvert,32,
-     .                "ave(X)",zsto1,zout)
+     .                "ins(X)",zsto,zout)
          ENDDO
 c
@@ -179 +179 @@
          CALL histdef(nid_ins,"kgv"//str1,"Haze ext Vis ",
      .                "m-1",iim,jjmp1,nhori,klev,1,klev,nvert,32,
-     .                "ave(X)",zsto1,zout)
+     .                "ins(X)",zsto,zout)
          ENDDO
 c
@@ -186 +186 @@
          CALL histdef(nid_ins,"thi"//str1,"Haze Opa IR",
      .                "--",iim,jjmp1,nhori,klev,1,klev,nvert,32,
-     .                "ave(X)",zsto1,zout)
+     .                "ins(X)",zsto,zout)
          ENDDO
 c
@@ -193 +193 @@
          CALL histdef(nid_ins,"khi"//str1,"Haze ext IR ",
      .                "m-1",iim,jjmp1,nhori,klev,1,klev,nvert,32,
-     .                "ave(X)",zsto1,zout)
+     .                "ins(X)",zsto,zout)
          ENDDO
 c
@@ -200 +200 @@
          CALL histdef(nid_ins,"tgi"//str1,"Haze Opa IR",
      .                "--",iim,jjmp1,nhori,klev,1,klev,nvert,32,
-     .                "ave(X)",zsto1,zout)
+     .                "ins(X)",zsto,zout)
          ENDDO
 c
@@ -207 +207 @@
          CALL histdef(nid_ins,"kgi"//str1,"Haze ext IR ",
      .                "m-1",iim,jjmp1,nhori,klev,1,klev,nvert,32,
-     .                "ave(X)",zsto1,zout)
+     .                "ins(X)",zsto,zout)
          ENDDO
 c