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

    r5144 r5160  
    426426  ! --------------
    427427
    428   ! print *,' entree gwsetup'
     428  ! PRINT *,' entree gwsetup'
    429429
    430430  ! ------------------------------------------------------------------
    … …  
    971971  ! --------------
    972972
    973   ! print *,' entree gwprofil'
     973  ! PRINT *,' entree gwprofil'
    974974
    975975
    … …  
    13661366  ! do 2011 jl=kidia,kfdia
    13671367  ! IF(KTEST(JL).EQ.1) THEN
    1368   ! print *,' iknul= ',iknul(jl),'  iknub=',iknub(jl)
     1368  ! PRINT *,' iknul= ',iknul(jl),'  iknub=',iknub(jl)
    13691369  ! ENDIF
    13701370  ! 2011 continue
Note: See TracChangeset for help on using the changeset viewer.