IBM XL Fortran for AIX, V12.1 (5724-U82) Version 12.01.0000.0001 --- ../lsms/noah.20071219/noahdrv_module.F 03/09/11 11:04:09 >>>>> OPTIONS SECTION <<<<< *** Options In Effect *** == On / Off Options == CR DBG ESCAPE FULLPATH I4 INLGLUE NOLIBESSL NOLIBPOSIX OBJECT SOURCE STRICT SWAPOMP THREADED UNWIND ZEROSIZE == Options Of Integer Type == ALIAS_SIZE(65536) MAXMEM(-1) OPTIMIZE(2) SPILLSIZE(2000) STACKTEMP(0) == Options Of Character Type == 64(LARGETYPE) ALIAS(STD,NOINTPTR) ALIGN(BINDC(POWER),STRUCT(NATURAL)) ARCH(PWR6) ATTR(FULL) AUTODBL(NONE) DESCRIPTOR(V1) DIRECTIVE(IBM*,IBMT) ENUM() FLAG(I,I) FLOAT(RNDSNGL,MAF,FOLD,RNGCHK,SINGLE) FREE(F90) HALT(S) IEEE(NEAR) INTSIZE(4) LANGLVL(EXTENDED) REALSIZE(4) NOSAVE() TUNE(PWR6) UNROLL(AUTO) XREF(FULL) XLF2003(NOPOLYMORPHIC,NOBOZLITARGS,NOSTOPEXCEPT,NOVOLATILE,NOAUTOREALLOC,OLDNANINF) XLF77(LEADZERO,BLANKPAD) XLF90(NOSIGNEDZERO,NOAUTODEALLOC,OLDPAD) >>>>> SOURCE SECTION <<<<< 1 |#line 1 "../lsms/noah.20071219/noahdrv_module.F" 1 |!------------------------------------------------------------------------- 2 |! NASA GSFC Land Information Systems LIS 2.3 ! 3 |!------------------------------------------------------------------------- 4 |!BOP 5 |! 6 |! !MODULE: noahdrv_module.F90 7 |! 8 |! !DESCRIPTION: 9 |! Module for runtime specific Noah variables 10 |! 11 |! !REVISION HISTORY: 12 |! 13 |! 14 Oct 2003; Sujay Kumar, Initial Version 14 |! 15 |! !INTERFACE: 16 |module noahdrv_module 17 |! !ARGUMENTS: 18 | type noahdrvdec 19 | integer :: noahopen !Keeps track of opening files 20 | integer :: numoutnh !Counts number of output times for Noah 21 | integer :: noah_nvegp !Number of static vegetation parameter 22 | integer :: noah_nsoilp !Number of static soil parameters 23 | integer :: noah_zst !Number of Zobler soil classes 24 | integer :: noah_gflag !Time flag to update gfrac files 25 | integer :: noah_albtime !Time flag to update albedo files 26 | integer :: noah_aflag !Time flag to update albedo files 27 | integer :: noah_albdchk !Day check to interpolate alb values 28 | integer :: noah_gfracdchk !Day check to interpolate gfrac value 29 | character*40 :: NOAH_RFILE !NOAH Active Restart File 30 |! character*40 :: NOAH_MFILE !NOAH model init. restart file 31 | CHARACTER*40 :: NOAH_VFILE !NOAH Static Vegetation Parameter File 32 | CHARACTER*40 :: NOAH_SFILE !NOAH Soil Parameter File 33 | CHARACTER*40 :: NOAH_SLPFILE!NOAH Slope Type File 34 | CHARACTER*40 :: NOAH_MGFILE !NOAH Monthly Veg. Green Frac. 35 | CHARACTER*40 :: NOAH_ALBFILE !NOAH Quart. Snow-free albedo 36 | CHARACTER*50 :: NOAH_MXSNAL !NOAH GLDAS max snow albedo 37 | CHARACTER*50 :: NOAH_TBOT !NOAH GLDAS Bottom Temp 38 | REAL*8 :: NOAH_GFRACTIME !Time flag to update gfrac files 39 | REAL :: NOAH_ISM !NOAH Initial Soil Moisture (m3/m3) 40 | REAL :: NOAH_IT !NOAH Initial Soil Temperature (K) 41 | REAL :: WRITEINTN !NOAH Output Interval (hours) 42 | end type noahdrvdec 43 |!EOC 44 |end module noahdrv_module >>>>> ATTRIBUTE AND CROSS REFERENCE SECTION <<<<< IDENTIFIER NAME CROSS REFERENCE AND ATTRIBUTES noah_aflag Integer(4), Component of Derived type definition: noahdrvdec, Offset: 28, Alignment: full word 0-26.17$ noah_albdchk Integer(4), Component of Derived type definition: noahdrvdec, Offset: 32, Alignment: full word 0-27.17$ noah_albfile Character(40), Component of Derived type definition: noahdrvdec, Offset: 240, Alignment: byte 0-35.22$ noah_albtime Integer(4), Component of Derived type definition: noahdrvdec, Offset: 24, Alignment: full word 0-25.17$ noah_gflag Integer(4), Component of Derived type definition: noahdrvdec, Offset: 20, Alignment: full word 0-24.17$ noah_gfracdchk Integer(4), Component of Derived type definition: noahdrvdec, Offset: 36, Alignment: full word 0-28.17$ noah_gfractime Real(8), Component of Derived type definition: noahdrvdec, Offset: 384, Alignment: double word 0-38.16$ noah_ism Real(4), Component of Derived type definition: noahdrvdec, Offset: 392, Alignment: full word 0-39.14$ noah_it Real(4), Component of Derived type definition: noahdrvdec, Offset: 396, Alignment: full word 0-40.14$ noah_mgfile Character(40), Component of Derived type definition: noahdrvdec, Offset: 200, Alignment: byte 0-34.22$ noah_mxsnal Character(50), Component of Derived type definition: noahdrvdec, Offset: 280, Alignment: byte 0-36.22$ noah_nsoilp Integer(4), Component of Derived type definition: noahdrvdec, Offset: 12, Alignment: full word 0-22.17$ noah_nvegp Integer(4), Component of Derived type definition: noahdrvdec, Offset: 8, Alignment: full word 0-21.17$ noah_rfile Character(40), Component of Derived type definition: noahdrvdec, Offset: 40, Alignment: byte 0-29.22$ noah_sfile Character(40), Component of Derived type definition: noahdrvdec, Offset: 120, Alignment: byte 0-32.22$ noah_slpfile Character(40), Component of Derived type definition: noahdrvdec, Offset: 160, Alignment: byte 0-33.22$ noah_tbot Character(50), Component of Derived type definition: noahdrvdec, Offset: 330, Alignment: byte 0-37.22$ noah_vfile Character(40), Component of Derived type definition: noahdrvdec, Offset: 80, Alignment: byte 0-31.22$ noah_zst Integer(4), Component of Derived type definition: noahdrvdec, Offset: 16, Alignment: full word 0-23.17$ noahdrv_module Nonintrinsic Module 0-16.8$ noahdrvdec Public, Derived type definition 0-18.8$ noahopen Integer(4), Component of Derived type definition: noahdrvdec, Offset: 0, Alignment: full word 0-19.17$ numoutnh Integer(4), Component of Derived type definition: noahdrvdec, Offset: 4, Alignment: full word 0-20.17$ writeintn Real(4), Component of Derived type definition: noahdrvdec, Offset: 400, Alignment: full word 0-41.14$ ** noahdrv_module === End of Compilation 1 === >>>>> FILE TABLE SECTION <<<<< FILE CREATION FROM FILE NO FILENAME DATE TIME FILE LINE 0 ../lsms/noah.20071219/noahdrv_module.F 03/09/11 11:04:09 >>>>> COMPILATION EPILOGUE SECTION <<<<< FORTRAN Summary of Diagnosed Conditions TOTAL UNRECOVERABLE SEVERE ERROR WARNING INFORMATIONAL (U) (S) (E) (W) (I) 0 0 0 0 0 0 Source records read....................................... 45 1501-510 Compilation successful for file noahdrv_module.F. 1501-543 Object file created.