Changeset 5135 for LMDZ6/branches/Amaury_dev/libf/phylmd/dyn1d/mod_1D_cases_read.F90

Timestamp:

Jul 26, 2024, 7:20:23 PM (3 months ago)

Author:

abarral

Message:

Put iotd* into lmdz_iotd.f90

File:

• LMDZ6/branches/Amaury_dev/libf/phylmd/dyn1d/mod_1D_cases_read.F90 (modified) (1 diff)

LMDZ6/branches/Amaury_dev/libf/phylmd/dyn1d/mod_1D_cases_read.F90

@@ -5 +5 @@
 !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 !Declarations specifiques au cas standard
-        character*80 :: fich_cas
+        CHARACTER*80 :: fich_cas
 ! Discr?tisation
         INTEGER nlev_cas, nt_cas