Changeset 2708 for trunk/LMDZ.GENERIC/libf/phystd/generic_cloud_common_h.F90

Timestamp:

Jun 21, 2022, 11:05:39 AM (2 years ago)

Author:

aslmd

Message:

error messages when setting a traceur.def with wrong names , or with vap/ice tracer missing for the same specie , or if the specie is not in table_tracers_condensable

File:

• trunk/LMDZ.GENERIC/libf/phystd/generic_cloud_common_h.F90 (modified) (1 diff)

trunk/LMDZ.GENERIC/libf/phystd/generic_cloud_common_h.F90

@@ -150 +150 @@
             
         end do
-        ! RLVTT
-
-        !if (is_master)
+
+        if (ios .eq. -1) then ! If the file has been read but there is no data on the speci, then we have ios equal to -1
+
+            write(*,*), "ERROR : the following traceur is not referenced in the table_tracers_condensable : ", specname
+
+        end if
+        
         close(117)