Changeset 726 for LMDZ4/branches/V3_test/libf/dyn3dpar/advtrac.h

Timestamp:

Nov 6, 2006, 4:51:16 PM (18 years ago)

Author:

Laurent Fairhead

Message:

Modifications pour rendre INCA plus independant de LMDZ ACo
LF

File:

• LMDZ4/branches/V3_test/libf/dyn3dpar/advtrac.h (modified) (2 diffs)

LMDZ4/branches/V3_test/libf/dyn3dpar/advtrac.h

@@ -5 +5 @@
 c INCLUDE 'advtrac.h'
 
-      COMMON/advtr/iadv,hadv,vadv,tnom,tname,ttext,niadv
+      COMMON/advtr/iadv,hadv,vadv,tnom,tname,ttext,niadv,  
+     &     nbtrac, nprath, mmt_adj, hadv_flg, vadv_flg, conv_flg, 
+     &     pbl_flg, tracnam
       INTEGER iadv(nqmx) ! indice schema de transport 
       INTEGER hadv(nqmx) ! indice schema transport horizontal 
@@ -13 +15 @@
       character*10 tname(nqmx) ! nom du traceur pour restart
       character*13 ttext(nqmx) ! nom long du traceur pour sorties
+
+      integer nbtrac
+      integer nprath
+      real    mmt_adj(iim+1,jjm+1,llm, 1) 
+      integer hadv_flg(nqmx)
+      integer vadv_flg(nqmx)
+      integer conv_flg(nqmx-2) 
+      integer pbl_flg(nqmx-2)
+      character*8 tracnam(nqmx-2) 
 c-----------------------------------------------------------------------