Ignore:
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:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/branches/Amaury_dev/libf/phylmd/StratAer/ocs_to_so2.F90

    r5099 r5101  
    44SUBROUTINE ocs_to_so2(pdtphys,tr_seri,t_seri,pplay,paprs,is_strato)
    55
    6   USE dimphy, ONLY : klon,klev
     6  USE dimphy, ONLY: klon,klev
    77  USE aerophys
    88  USE infotrac_phy
    9   USE lmdz_yomcst, ONLY : RG
    10   USE phys_local_var_mod, ONLY : OCS_lifetime, budg_3D_ocs_to_so2, budg_ocs_to_so2
    11   USE strataer_local_var_mod, ONLY : flag_min_rreduce
     9  USE lmdz_yomcst, ONLY: RG
     10  USE phys_local_var_mod, ONLY: OCS_lifetime, budg_3D_ocs_to_so2, budg_ocs_to_so2
     11  USE strataer_local_var_mod, ONLY: flag_min_rreduce
    1212
    1313  IMPLICIT NONE
Note: See TracChangeset for help on using the changeset viewer.