Changeset 5101 for LMDZ6/branches/Amaury_dev/libf/phylmd/inlandsis

Timestamp:

Jul 23, 2024, 8:22:55 AM (13 months ago)

Author:

abarral

Message:

Handle DEBUG_IO in lmdz_cppkeys_wrapper.F90
Transform some files .F -> .[fF]90
[ne compile pas à cause de writefield_u non défini - en attente de réponse Laurent]

Location:

LMDZ6/branches/Amaury_dev/libf/phylmd/inlandsis

Files:

• VAR0SV.F90 (modified) (1 diff)
• VARtSV.F90 (modified) (1 diff)
• VARxSV.F90 (modified) (1 diff)
• VARySV.F90 (modified) (1 diff)
• surf_inlandsis_mod.F90 (modified) (2 diffs)

LMDZ6/branches/Amaury_dev/libf/phylmd/inlandsis/VAR0SV.F90

@@ -1 +1 @@
 MODULE VAR0SV
 
-USE VAR_SV, only : nsol, nsno 
-USE VARdSV, only : nsot
+USE VAR_SV, ONLY: nsol, nsno
+USE VARdSV, ONLY: nsot
 
 IMPLICIT NONE

LMDZ6/branches/Amaury_dev/libf/phylmd/inlandsis/VARtSV.F90

@@ -1 +1 @@
 MODULE VARtSV
 
-USE VAR_SV, only : nsol, nsno, klonv
+USE VAR_SV, ONLY: nsol, nsno, klonv
 
 IMPLICIT NONE

LMDZ6/branches/Amaury_dev/libf/phylmd/inlandsis/VARxSV.F90

@@ -1 +1 @@
 MODULE VARxSV                      
 
-USE VAR_SV, only : klonv, nsol, nsno, nb_wri
+USE VAR_SV, ONLY: klonv, nsol, nsno, nb_wri
                                                           
 IMPLICIT NONE                                                                                

LMDZ6/branches/Amaury_dev/libf/phylmd/inlandsis/VARySV.F90

@@ -1 +1 @@
 MODULE VARySV
 
-USE VAR_SV, only : klonv, nsol, nsno
+USE VAR_SV, ONLY: klonv, nsol, nsno
 
 

LMDZ6/branches/Amaury_dev/libf/phylmd/inlandsis/surf_inlandsis_mod.F90

@@ -50 +50 @@
         USE VARtSV
         USE VARphy
-        USE surface_data, only : iflag_tsurf_inlandsis, SnoMod, BloMod, ok_outfor
+        USE surface_data, ONLY: iflag_tsurf_inlandsis, SnoMod, BloMod, ok_outfor
 
         IMPLICIT NONE
@@ -751 +751 @@
         ! of SISVAT, therefore it's needed here.
 
-        USE mod_phys_lmdz_mpi_data, ONLY : is_mpi_root
+        USE mod_phys_lmdz_mpi_data, ONLY: is_mpi_root
         USE mod_phys_lmdz_para
         USE VAR_SV