source: LMDZ5/branches/IPSLCM5A2.1_ISO/libf/phyiso/rrtm/sucape.intfb.h @ 3331

Last change on this file since 3331 was 3331, checked in by acozic, 7 years ago

Add modification for isotopes

  • Property svn:executable set to *
File size: 144 bytes
Line 
1INTERFACE
2SUBROUTINE SUCAPE(KULOUT)
3USE PARKIND1 ,ONLY : JPIM ,JPRB
4INTEGER(KIND=JPIM),INTENT(IN) :: KULOUT
5END SUBROUTINE SUCAPE
6END INTERFACE
Note: See TracBrowser for help on using the repository browser.