IBM XL Fortran for AIX, V12.1 (5724-U82) Version 12.01.0000.0001 --- ../params/elev/llm.F 03/09/11 11:04:14
 
>>>>> 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 "../params/elev/llm.F"
          1 |subroutine llm(msg)
          2 |
          3 |! !USES:
          4 |   use spmdMod, only : iam
          5 |
          6 |   implicit none
          7 |
          8 |!INPUT PARAMETERS:
          9 |   character(len=*), intent(in) :: msg
         10 |
         11 |!LOCAL VARIABLES:
         12 |   character(len=8)  :: date
         13 |   character(len=10) :: time
         14 |   character(len=5)  :: zone
         15 |   integer, dimension(8) :: values
         16 |   character(len=24+len(msg)+8) :: full_msg
         17 |   character(len=3) :: ciam
         18 |!EOP
         19 |
         20 |!BOC
         21 |   print*,'len of full_msg ',len(full_msg)
         22 |   call date_and_time(date,time,zone,values)
         23 |
         24 |   write(ciam,'(i3)') iam
         25 |   full_msg = date(1:4)//'-'//date(5:6)//'-'//date(7:8)//'T'//  &
         26 |              time(1:2)//':'//time(3:4)//':'//time(5:10)//' '// &
         27 |              trim(msg)//' ( '//trim(adjustl(ciam))//' )'
         28 |   print*, trim(full_msg)
         29 |!EOC
         30 |end subroutine llm
 
>>>>> ATTRIBUTE AND CROSS REFERENCE SECTION <<<<<
 
 
 
IDENTIFIER NAME                  CROSS REFERENCE AND ATTRIBUTES
 
adjustl                          Pure Intrinsic
                                 0-27.38
 
ciam                             Automatic, Character(3), Offset: 0, Alignment: full word
                                 0-17.24$  0-24.10  0-27.46
 
date                             Automatic, Character(8), Offset: 0, Alignment: full word
                                 0-12.25$  0-22.23  0-25.15  0-25.31  0-25.47
 
date_and_time                    Intrinsic
                                 0-22.9
 
full_msg                         Controlled Automatic, Character*(?), Offset: 0, Alignment: full word
                                 0-16.36$  0-21.34  0-25.4@  0-28.17
 
iam                              Use associated, Static, Integer(4), Offset: 4, Alignment: full word
                                 0-4.24$  0-24.23
 
len                              Pure Intrinsic
                                 0-16.21  0-21.30
 
llm                              Subroutine
                                 0-1.12$
 
msg                              Reference argument, Intent (IN), Character*(*), Offset: 0, Alignment: byte
                                 0-9.36$  0-1.16  0-16.25  0-16.25  0-27.20
 
spmdmod                          Use associated, Nonintrinsic Module
                                 0-4.8$  0-4.8
 
time                             Automatic, Character(10), Offset: 0, Alignment: full word
                                 0-13.25$  0-22.28  0-26.15  0-26.31  0-26.47
 
trim                             Pure Intrinsic
                                 0-27.15  0-27.33  0-28.12
 
values                           Automatic, Integer(4) (1:8), Offset: 0, Alignment: full word
                                 0-15.29$  0-22.38
 
zone                             Automatic, Character(5), Offset: 0, Alignment: full word
                                 0-14.25$  0-22.33
 
** llm   === End of Compilation 1 ===
 
>>>>> FILE TABLE SECTION <<<<<
 
 
                                       FILE CREATION        FROM
FILE NO   FILENAME                    DATE       TIME       FILE    LINE
     0    ../params/elev/llm.F        03/09/11   11:04:14
 
 
>>>>> 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.......................................      31
1501-510  Compilation successful for file llm.F.
1501-543  Object file created.