Ignore:
Timestamp:
Jul 23, 2024, 8:22:55 AM (4 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:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/branches/Amaury_dev/libf/phylmd/lmdz_cloudth.F90

    r5099 r5101  
    819819!===========================================================================
    820820
    821       use lmdz_cloudth_ini, only : iflag_cloudth_vert,iflag_ratqs
    822       use lmdz_cloudth_ini, only : vert_alpha,vert_alpha_th, sigma1s_factor, sigma1s_power , sigma2s_factor , sigma2s_power , cloudth_ratqsmin , iflag_cloudth_vert_noratqs
     821      use lmdz_cloudth_ini, ONLY: iflag_cloudth_vert,iflag_ratqs
     822      use lmdz_cloudth_ini, ONLY: vert_alpha,vert_alpha_th, sigma1s_factor, sigma1s_power , sigma2s_factor , sigma2s_power , cloudth_ratqsmin , iflag_cloudth_vert_noratqs
    823823
    824824      IMPLICIT NONE
    … …  
    21232123!=============================================================================
    21242124
    2125     use phys_state_var_mod, ONLY : fm_therm, detr_therm, entr_therm
     2125    use phys_state_var_mod, ONLY: fm_therm, detr_therm, entr_therm
    21262126
    21272127    IMPLICIT none
Note: See TracChangeset for help on using the changeset viewer.