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

    r5099 r5101  
    2727  INTEGER,INTENT(IN) :: nqtot ! number of tracers
    2828  CHARACTER(len=*),INTENT(IN) :: tname(nqtot) ! tracer names
    29   LOGICAL,INTENT(IN) :: debut_split ! .true. if very first call to physics
    30   LOGICAL,INTENT(IN) :: lafin_split ! .true. if last call to physics
     29  LOGICAL,INTENT(IN) :: debut_split ! .true. if very first CALL to physics
     30  LOGICAL,INTENT(IN) :: lafin_split ! .true. if last CALL to physics
    3131  REAL,INTENT(IN) :: JD_cur ! Julian day
    3232  REAL,INTENT(IN) :: JH_cur_split ! Julian hour (fraction of day)
Note: See TracChangeset for help on using the changeset viewer.