Changeset 5158 for LMDZ6/branches/Amaury_dev/libf/phylmd/lmdz_flux_arp.f90

Timestamp:

Aug 2, 2024, 2:12:03 PM (3 months ago)

Author:

abarral

Message:

Add missing klon on strataer_emiss_mod.F90
Correct various missing explicit declarations
Replace tabs by spaces (tabs are not part of the fortran charset)
Continue cleaning modules
Removed unused arguments and variables

File:

• LMDZ6/branches/Amaury_dev/libf/phylmd/lmdz_flux_arp.f90 (modified) (1 diff)

LMDZ6/branches/Amaury_dev/libf/phylmd/lmdz_flux_arp.f90

@@ -4 +4 @@
 
 MODULE lmdz_flux_arp
-  PRIVATE NONE; PRIVATE
+  IMPLICIT NONE; PRIVATE
   PUBLIC fsens, flat, betaevap, ust, tg, ok_flux_surf, ok_prescr_ust, ok_prescr_beta, ok_forc_tsurf