Christine 30/01/2014 : manque LEI

src/MNH/ini_posprofilern.f90

@@ -198,6 +198,7 @@ ALLOCATE(TPROFILER%MER10M  (ISTORE,NUMBPROFILER))
 ALLOCATE(TPROFILER%RN      (ISTORE,NUMBPROFILER))
 ALLOCATE(TPROFILER%H       (ISTORE,NUMBPROFILER))
 ALLOCATE(TPROFILER%LE      (ISTORE,NUMBPROFILER))
+ALLOCATE(TPROFILER%LEI     (ISTORE,NUMBPROFILER))
 ALLOCATE(TPROFILER%GFLUX   (ISTORE,NUMBPROFILER))
 ALLOCATE(TPROFILER%LW      (ISTORE,NUMBPROFILER))
 ALLOCATE(TPROFILER%SW      (ISTORE,NUMBPROFILER))
@@ -228,6 +229,7 @@ TPROFILER%RN       = XUNDEF
 TPROFILER%H        = XUNDEF
 TPROFILER%LE       = XUNDEF
 TPROFILER%GFLUX    = XUNDEF
+TPROFILER%LEI      = XUNDEF
 TPROFILER%LW       = XUNDEF
 TPROFILER%SW       = XUNDEF
 TPROFILER%TKE_DISS = XUNDEF

src/MNH/ini_surfstationn.f90

@@ -196,6 +196,7 @@ ALLOCATE(TSTATION%RN      (ISTORE,NUMBSTAT))
 ALLOCATE(TSTATION%H       (ISTORE,NUMBSTAT))
 ALLOCATE(TSTATION%LE      (ISTORE,NUMBSTAT))
 ALLOCATE(TSTATION%GFLUX   (ISTORE,NUMBSTAT))
+ALLOCATE(TSTATION%LEI     (ISTORE,NUMBSTAT))
 ALLOCATE(TSTATION%SW      (ISTORE,NUMBSTAT))
 ALLOCATE(TSTATION%LW      (ISTORE,NUMBSTAT))
 ALLOCATE(TSTATION%DSTAOD  (ISTORE,NUMBSTAT))
@@ -222,6 +223,7 @@ TSTATION%RN      = XUNDEF
 TSTATION%H       = XUNDEF
 TSTATION%LE      = XUNDEF
 TSTATION%GFLUX   = XUNDEF
+TSTATION%LEI     = XUNDEF
 TSTATION%SW      = XUNDEF
 TSTATION%LW      = XUNDEF
 TSTATION%DSTAOD  = XUNDEF