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/phydev/phys_state_var_mod.F90

    r5099 r5101  
    77!======================================================================
    88
    9 !USE dimphy, only : klon
     9!USE dimphy, ONLY: klon
    1010 
    1111
    … …  
    1717!======================================================================
    1818  SUBROUTINE phys_state_var_init()
    19 !  use dimphy, only : klon
     19!  use dimphy, ONLY: klon
    2020
    2121!  if (.not.allocated(rlat)) then
    … …  
    2929!======================================================================
    3030  SUBROUTINE phys_state_var_end
    31 !  use dimphy, only : klon
     31!  use dimphy, ONLY: klon
    3232
    3333!  deallocate(rlat,rlon)
Note: See TracChangeset for help on using the changeset viewer.