Changeset 2585 for LMDZ5/trunk/libf/phylmd/simu_airs.F90

Timestamp:

Jul 1, 2016, 2:53:50 PM (8 years ago)

Author:

idelkadi

Message:

Corrections des erreurs pour l'implementation du simulateur AIRS

File:

• LMDZ5/trunk/libf/phylmd/simu_airs.F90 (modified) (2 diffs)

LMDZ5/trunk/libf/phylmd/simu_airs.F90

@@ -1164 +1164 @@
         real, dimension(klon),intent(out) :: map_deltaz_hc, map_pcld_hc
         real, dimension(klon),intent(out) :: map_tcld_hc
-        real, dimension(klon),intent(out) :: map_emis_Cb,map_pcld_Cb,map_tcld_Cb
+        real, dimension(klon),intent(out) :: map_emis_Cb,map_pcld_Cb,map_tcld_Cb 
         real, dimension(klon),intent(out) :: &
      & map_emis_ThCi,map_pcld_ThCi,map_tcld_ThCi
@@ -1172 +1172 @@
      & map_emis_hist,map_iwp_hist,map_deltaz_hist,&
      & map_rad_hist
-        real, dimension(klon),intent(out) :: map_ntot,map_hc,map_hist
-        real, dimension(klon),intent(out) :: map_Cb,map_ThCi,map_Anv
+       real, dimension(klon),intent(out) :: map_ntot,map_hc,map_hist
+       real, dimension(klon),intent(out) :: map_Cb,map_ThCi,map_Anv