Ignore:
Timestamp:
Aug 3, 2024, 2:56:58 PM (3 months ago)
Author:
abarral
Message:

Put .h into modules

File:
1 edited

Legend:

Unmodified
Added
Removed

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

    r5144 r5160  
    106106
    107107  IF (prt_level >= 10) THEN
    108     print *, '-> calwake, wake_s, awake_s, wgen input ', wake_s(1), awake_s(1), wgen(1)
     108    PRINT *, '-> calwake, wake_s, awake_s, wgen input ', wake_s(1), awake_s(1), wgen(1)
    109109  ENDIF
    110110
    … …  
    319319  !>jyg
    320320  IF (prt_level >= 10) THEN
    321     print *, 'calwake ->, wake_s, awake_s ', wake_s(1), awake_s(1)
     321    PRINT *, 'calwake ->, wake_s, awake_s ', wake_s(1), awake_s(1)
    322322  ENDIF
    323323
Note: See TracChangeset for help on using the changeset viewer.