Changeset 2443 for LMDZ5/trunk/libf/phylmd/physiq_mod.F90

Timestamp:

Feb 15, 2016, 3:31:52 PM (8 years ago)

Author:

acozic

Message:

add some validation tests for aerosols parameters (config_inca, aerosol_couple, flag_aerosol)

File:

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

LMDZ5/trunk/libf/phylmd/physiq_mod.F90

@@ -1063 +1063 @@
         CALL getin_p('config_inca',config_inca)
 
+     ELSE 
+        config_inca='none' ! default
      END IF
+     
+     IF (aerosol_couple .AND. (config_inca /= "aero" .AND. config_inca /= "aeNP ")) THEN
+        abort_message = 'if aerosol_couple is activated, config_inca need to be aero or aeNP'
+        CALL abort_physic (modname,abort_message,1)
+     ENDIF
+
+
 
      rnebcon0(:,:) = 0.0
@@ -1366 +1375 @@
              cell_area, &
              latitude_deg, &
-             longitude_de, &
+             longitude_deg, &
              presnivs, &
              calday, &