Changeset 5101 for LMDZ6/branches/Amaury_dev/libf/phylmd/lmdz_ratqs_multi.F90

Timestamp:

Jul 23, 2024, 8:22:55 AM (2 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]

File:

• LMDZ6/branches/Amaury_dev/libf/phylmd/lmdz_ratqs_multi.F90 (modified) (4 diffs)

LMDZ6/branches/Amaury_dev/libf/phylmd/lmdz_ratqs_multi.F90

@@ -30 +30 @@
            ratqs_inter_)
 
-USE lmdz_ratqs_ini, ONLY : a_ratqs_cv,tau_var,fac_tau,tau_cumul,a_ratqs_wake, dqimpl
-USE lmdz_ratqs_ini, ONLY : RG
-USE lmdz_ratqs_ini, ONLY : povariance, var_conv
-USE lmdz_thermcell_dq,  ONLY : thermcell_dq
+USE lmdz_ratqs_ini, ONLY: a_ratqs_cv,tau_var,fac_tau,tau_cumul,a_ratqs_wake, dqimpl
+USE lmdz_ratqs_ini, ONLY: RG
+USE lmdz_ratqs_ini, ONLY: povariance, var_conv
+USE lmdz_thermcell_dq,  ONLY: thermcell_dq
 
 implicit none
@@ -214 +214 @@
 ! Etienne Vignon, November 2021: effect of subgrid orography on ratqs
 
-USE lmdz_ratqs_ini, ONLY : RG,RV,RD,RLSTT,RLVTT,RTT,nbsrf,is_lic,is_ter
+USE lmdz_ratqs_ini, ONLY: RG,RV,RD,RLSTT,RLVTT,RTT,nbsrf,is_lic,is_ter
 
 IMPLICIT NONE
@@ -296 +296 @@
 USE lmdz_lscp_tools, ONLY: CALC_QSAT_ECMWF
 
-USE lmdz_ratqs_ini, ONLY : RG,RD,RTT,nbsrf
+USE lmdz_ratqs_ini, ONLY: RG,RD,RTT,nbsrf
 
 IMPLICIT NONE
@@ -377 +377 @@
 ! model. J. Atmos. Sci. 73, 279???291. https://doi.org/10.1175/JAS-D-15-0021.
 
-USE lmdz_ratqs_ini, ONLY : RG,RV,RD,RCPD,RLSTT,RLVTT,RTT
+USE lmdz_ratqs_ini, ONLY: RG,RV,RD,RCPD,RLSTT,RLVTT,RTT
 
 IMPLICIT NONE