Changeset 5371


Ignore:
Timestamp:
Dec 3, 2024, 5:44:38 PM (16 hours ago)
Author:
Laurent Fairhead
Message:

Declaring some variables that were implicit

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/phylmd/rrtm/set99.F

    r1990 r5371  
    22      REAL             TRIGS(N)
    33      INTEGER IFAX(*),JFAX(10),NLFAX(7)
     4      INTEGER N, NU, IFAC, IL, IXXX, K, NIL, NHL, I, NFAX
     5      REAL ANGLE, DEL
    46C
    57C     SUBROUTINE 'SET99' - COMPUTES FACTORS OF N & TRIGONOMETRIC
Note: See TracChangeset for help on using the changeset viewer.