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/coare30_flux_cnrm_mod.F90

    r5099 r5101  
    7070
    7171
    72 !USE MODD_SEAFLUX_n, ONLY : SEAFLUX_t
     72!USE MODD_SEAFLUX_n, ONLY: SEAFLUX_t
    7373
    7474!----------Rajout Olive ---------
    … …  
    7979!--------------------------------
    8080
    81 USE MODD_CSTS,       ONLY : XKARMAN, XG, XSTEFAN, XRD, XRV, XPI, &
     81USE MODD_CSTS,       ONLY: XKARMAN, XG, XSTEFAN, XRD, XRV, XPI, &
    8282                            XLVTT, XCL, XCPD, XCPV, XRHOLW, XTT, &
    8383                            XP00
    8484
    85 !USE MODD_SURF_ATM,   ONLY : XVZ0CM
    86 
    87 !USE MODD_SURF_PAR,   ONLY : XUNDEF, XSURF_EPSILON
     85!USE MODD_SURF_ATM,   ONLY: XVZ0CM
     86
     87!USE MODD_SURF_PAR,   ONLY: XUNDEF, XSURF_EPSILON
    8888!USE MODD_WATER_PAR
    8989
    … …  
    9898
    9999
    100 !USE YOMHOOK   ,ONLY : LHOOK,   DR_HOOK
    101 !USE PARKIND1  ,ONLY : JPRB
     100!USE YOMHOOK   ,ONLY: LHOOK,   DR_HOOK
     101!USE PARKIND1  ,ONLY: JPRB
    102102
    103103IMPLICIT NONE
Note: See TracChangeset for help on using the changeset viewer.