source: LMDZ5/branches/IPSLCM5A2.1_ISO/libf/phyiso/rrtm/sucumf.intfb.h

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

Add modification for isotopes

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