Changeset 2955 for LMDZ5/trunk/libf/phylmd/cosp/cosp_constants.F90

Timestamp:

Jul 17, 2017, 5:52:31 PM (7 years ago)

Author:

musat

Message:

Ajout modifs de Rodrigo Guzman et Marine Bonazolla dans la version COSP/CMIP6
IM

File:

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

LMDZ5/trunk/libf/phylmd/cosp/cosp_constants.F90

@@ -54 +54 @@
 
     ! Number of possible output variables
-    integer,parameter :: N_OUT_LIST = 65
-    integer,parameter :: N3D = 10
-    integer,parameter :: N2D = 14
-    integer,parameter :: N1D = 40
+    integer,parameter :: N_OUT_LIST = 74 !OPAQ 65+7 !TIBO 72+2
+    integer,parameter :: N3D = 11                   !TIBO 10+1
+    integer,parameter :: N2D = 19        !OPAQ 14+4 !TIBO 18+1
+    integer,parameter :: N1D = 43        !OPAQ 40+3
 
     ! Value for forward model result from a level that is under the ground
@@ -96 +96 @@
     ! Other constants
     integer,parameter :: LIDAR_NCAT    =   4
+    integer,parameter :: LIDAR_NTYPE   =   3 !OPAQ
     integer,parameter :: PARASOL_NREFL =   5 ! parasol
     real,parameter,dimension(PARASOL_NREFL) :: PARASOL_SZA = (/0.0, 20.0, 40.0, 60.0, 80.0/)