source: dynamico_lmdz/aquaplanet/LMDZ5/libf/phylmd/rrtm/sugwd.intfb.h

Last change on this file was 3990, checked in by millour, 8 years ago

An updated LMDZ5 (based on LMDZ rev 2786) to play with.
EM

File size: 283 bytes
RevLine 
[3990]1INTERFACE
2SUBROUTINE SUGWD(KULOUT,KLEV,PVAH,PVBH)
3USE PARKIND1 ,ONLY : JPIM ,JPRB
4INTEGER(KIND=JPIM),INTENT(IN) :: KLEV
5INTEGER(KIND=JPIM),INTENT(IN) :: KULOUT
6REAL(KIND=JPRB) ,INTENT(IN) :: PVAH(KLEV+1)
7REAL(KIND=JPRB) ,INTENT(IN) :: PVBH(KLEV+1)
8END SUBROUTINE SUGWD
9END INTERFACE
Note: See TracBrowser for help on using the repository browser.