IBM XL Fortran for AIX, V12.1 (5724-U82) Version 12.01.0000.0001 --- ../core/time_manager.F 03/09/11 11:03:31 >>>>> 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 "../core/time_manager.F" 1 |!------------------------------------------------------------------------- 2 |! NASA Goddard Space Flight Center Land Information System (LIS) V3.0 3 |! Released May 2004 4 |! 5 |! See SOFTWARE DISTRIBUTION POLICY for software distribution policies 6 |! 7 |! The LIS source code and documentation are in the public domain, 8 |! available without fee for educational, research, non-commercial and 9 |! commercial purposes. Users may distribute the binary or source 10 |! code to third parties provided this statement appears on all copies and 11 |! that no charge is made for such copies. 12 |! 13 |! NASA GSFC MAKES NO REPRESENTATIONS ABOUT THE SUITABILITY OF THE 14 |! SOFTWARE FOR ANY PURPOSE. IT IS PROVIDED AS IS WITHOUT EXPRESS OR 15 |! IMPLIED WARRANTY. NEITHER NASA GSFC NOR THE US GOVERNMENT SHALL BE 16 |! LIABLE FOR ANY DAMAGES SUFFERED BY THE USER OF THIS SOFTWARE. 17 |! 18 |! See COPYRIGHT.TXT for copyright details. 19 |! 20 |!------------------------------------------------------------------------- 21 | 22 |!BOP 23 |! !MODULE: time_manager.F90 24 |! 25 |! !DESCRIPTION: 26 |! 27 |! This module contains wrapper functions that uses the ESMF time manager 28 |! for time managment 29 |! 30 |! !INTERFACE: 31 |module time_manager 32 | 33 | use spmdMod, only: masterproc 34 | use lis_module 35 | use precision 36 | 37 |!EOP 38 | implicit none 39 | 40 |! Public methods 41 |!BOP 42 |! !ARGUMENTS: 43 | public :: & 44 | timemgr_init, &! time manager initialization 45 | advance_timestep, &! increment timestep number 46 | get_step_size, &! return step size in seconds 47 | get_nstep, &! return timestep number 48 | get_curr_date, &! return date components at end of current timestep 49 | get_prev_date, &! return date components at beginning of current timestep 50 | get_start_date, &! return date components of the start date 51 | get_ref_date, &! return date components of the reference date 52 | get_curr_time, &! return components of elapsed time since reference date 53 | get_curr_calday, &! return calendar day at end of current timestep 54 | is_last_step, &! return true on last timestep 55 | timemgr_write_restart, &! write info to file needed to restart the time manager 56 | timemgr_read_restart, &! read info from file needed to restart the time manager 57 | timemgr_restart, &! restart the time manager 58 | tick, & 59 | date2time 60 |#line 62 62 |!========================================================================================= 63 |contains 64 |!========================================================================================= 65 |!BOP 66 |! !ROUTINE: timemgr_init 67 |! 68 |! !DESCRIPTION: 69 |! 70 |! Initialize the ESMF time manager. 71 |! 72 |! NOTE - This assumes that the namelist variables 73 |! have been set before this routine is called. 74 |! 75 |! !INTERFACE: 76 |subroutine timemgr_init(lt) 77 |!EOP 78 | implicit none 79 | type(listime) :: lt 80 | 81 |! Local variables 82 | call date2time(lt%etime,lt%edoy,lt%egmt, & 83 | lt%eyr,lt%emo,lt%eda,lt%ehr,lt%emn,lt%ess) 84 | lt%tscount = 0 85 |!----------------------------------------------------------------------- 86 |! Print configuration summary to log file (stdout). 87 |!----------------------------------------------------------------------- 88 | if (masterproc) then 89 | call timemgr_print(lt) 90 | end if 91 |!EOC 92 |end subroutine timemgr_init 93 |#line 95 95 |!BOP 96 |! !ROUTINE: timemgr_print 97 |! 98 |! !DESCRIPTION: 99 |! 100 |! Restart the ESMF time manager. 101 |! 102 |! NOTE - Assumptions: 103 |! 1) The namelist variables have been set before this routine is called.\\ 104 |! The stop date is the only thing that can be changed by the user on a restart.\\ 105 |! 2) Restart data have been read on the master process before this routine is called.\\ 106 |! (timemgr$_-$read$_-$restart called from control/restart.F90::read$_-$restart)\\ 107 |! 108 |! !INTERFACE: 109 |subroutine timemgr_restart() 110 |!EOP 111 | implicit none 112 | 113 |! Local variables 114 | 115 |!----------------------------------------------------------------------- 116 |! Print configuration summary to log file (stdout). 117 |!----------------------------------------------------------------------- 118 |! if (masterproc) then 119 |! call timemgr_print() 120 |! end if 121 |!EOC 122 |end subroutine timemgr_restart 123 |!========================================================================================= 124 |!BOP 125 |! !ROUTINE: timemgr_print 126 |! 127 |! !DESCRIPTION: 128 |! 129 |! Prints the time manager information 130 |! 131 |! !INTERFACE: 132 |subroutine timemgr_print(lt) 133 |!EOP 134 | implicit none 135 | type(listime) :: lt 136 |! Local variables 137 | 138 | write(6,*)' ************************************************' 139 | 140 | write(6,*)' Timestep size (seconds): ', lt%ts 141 | write(6,*)' Start date (ymd tod): ', lt%syr, lt%smo, lt%sda 142 | write(6,*)' Stop date (ymd tod): ', lt%eyr, lt%emo, lt%eda 143 | write(6,*)' Current step number: ', lt%tscount 144 | write(6,*)' Current date (ymd tod): ', lt%yr, lt%mo, lt%da 145 | 146 | write(6,*)' ************************************************' 147 |!EOC 148 |end subroutine timemgr_print 149 |!========================================================================================= 150 |!BOP 151 |! !ROUTINE: advance_timestep 152 |! 153 |! !DESCRIPTION: 154 |! 155 |! Increment the timestep number. 156 |! 157 |! !INTERFACE: 158 |subroutine advance_timestep(lt) 159 |!EOP 160 | 161 | implicit none 162 | 163 | type(listime) :: lt 164 |! Local variables 165 | integer :: days(12) 166 | data days /31,28,31,30,31,30,31,31,30,31,30,31/ 167 |!BOC 168 | lt%ss = lt%ss + lt%ts 169 | 170 | do while(lt%ss .gt. 59) 171 | lt%ss = lt%ss - 60 172 | lt%mn = lt%mn + 1 173 | enddo 174 | 175 | do while(lt%mn .gt.59) 176 | lt%mn = lt%mn -60 177 | lt%hr = lt%hr+1 178 | enddo 179 | 180 | do while(lt%hr .ge.24) 181 | lt%hr = lt%hr -24 182 | lt%da = lt%da +1 183 | enddo 184 | 185 | if((mod(lt%yr,4) .eq. 0 .and. mod(lt%yr, 100).ne.0) &!leap year 186 | .or.(mod(lt%yr,400) .eq.0)) then 187 | days(2) = 29 188 | else 189 | days(2) = 28 190 | endif 191 | 192 | do while(lt%da.gt.days(lt%mo)) 193 | lt%da = lt%da - days(lt%mo) 194 | lt%mo = lt%mo + 1 195 | enddo 196 | 197 | do while(lt%mo .gt. 12) 198 | lt%mo = lt%mo-12 199 | lt%yr = lt%yr +1 200 | enddo 201 | 202 | call date2time(lt%time,lt%doy,lt%gmt,& 203 | lt%yr, lt%mo, lt%da, lt%hr, lt%mn, lt%ss) 204 | 205 | lt%tscount = lt%tscount + 1 206 | 207 | write(*,24)'GSFC-LIS time: ',lt%mo,'/',lt%da,'/', & 208 | lt%yr,lt%hr,':',lt%mn,':',lt%ss 209 |24 format(a16,i2,a1,i2,a1,i4,1x,i2,a1,i2,a1,i2) 210 | 211 | if(lt%endcode.eq.0)then !end at real-time date (tbd) 212 | write(*,*)'warning: do not know how to stop in real-time' 213 | ! write(79,*)'warning: do not know how to stop in real-time' 214 | endif 215 | if(lt%endcode.eq.1)then !end on date specified in lis.crd file 216 | call date2time(lt%etime,lt%edoy,lt%egmt, & 217 | lt%eyr,lt%emo,lt%eda,lt%ehr,lt%emn,lt%ess) 218 | if(lt%time.ge.lt%etime)then 219 | lt%endtime=1 220 | write(*,*) 'GSFC-LDAS run completed' 221 | ! write(79,*) 'GSFC-LDAS run completed' 222 | endif 223 | endif 224 | 225 |!EOC 226 |end subroutine advance_timestep 227 |!========================================================================================= 228 |!BOP 229 |! !ROUTINE: get_step_size 230 |! 231 |! !DESCRIPTION: 232 |! 233 |! Return the step size in seconds. 234 |! 235 |! !INTERFACE: 236 |function get_step_size(lt) 237 |!EOP 238 | 239 | implicit none 240 | type(listime) :: lt 241 |! Return value 242 | integer :: get_step_size 243 | 244 |! Local variables 245 | get_step_size = lt%ts 246 |!EOC 247 |end function get_step_size 248 |!========================================================================================= 249 |!BOP 250 |! !ROUTINE: get_nstep 251 |! 252 |! !DESCRIPTION: 253 |! 254 |! Return the timestep number. 255 |! 256 |! !INTERFACE: 257 |function get_nstep(lt) 258 |!EOP 259 | implicit none 260 | type(listime) :: lt 261 |! Return value 262 | integer :: get_nstep 263 | 264 |! Local variables 265 | get_nstep = lt%tscount 266 |!EOC 267 |end function get_nstep 268 |!========================================================================================= 269 |!BOP 270 |! !ROUTINE: get_curr_day 271 |! 272 |! !DESCRIPTION: 273 |! 274 |! Return date components valid at end of current timestep with an optional 275 |! offset (positive or negative) in seconds. 276 |! 277 |! !INTERFACE: 278 |subroutine get_curr_date(lt, yr, mon, day, tod, offset) 279 |!EOP 280 | implicit none 281 | 282 |! Arguments 283 | type(listime) :: lt 284 | integer, intent(out) ::& 285 | yr, &! year 286 | mon, &! month 287 | day, &! day of month 288 | tod ! time of day (seconds past 0Z) 289 | 290 | integer, optional, intent(in) :: offset ! Offset from current time in seconds. 291 | ! Positive for future times, negative 292 | ! for previous times. 293 | yr = lt%yr 294 | mon = lt%mo 295 | day = lt%da 296 | tod = lt%ss+lt%mn*60+lt%hr*3600 297 |!EOC 298 |end subroutine get_curr_date 299 |!========================================================================================= 300 |!BOP 301 |! !ROUTINE: get_prev_date 302 |! 303 |! !DESCRIPTION: 304 |! 305 |! Return date components valid at beginning of current timestep. 306 |! 307 |! !INTERFACE: 308 |subroutine get_prev_date(yr, mon, day, tod) 309 |!EOP 310 | implicit none 311 | 312 |! Arguments 313 | integer, intent(out) ::& 314 | yr, &! year 315 | mon, &! month 316 | day, &! day of month 317 | tod ! time of day (seconds past 0Z) 318 | 319 | print*, 'get_prev_date not implemented, stopping..' 320 | call endrun 321 |!EOC 322 |end subroutine get_prev_date 323 |!========================================================================================= 324 |!BOP 325 |! !ROUTINE: get_start_date 326 |! 327 |! !DESCRIPTION: 328 |! 329 |! Return date components valid at beginning of initial run. 330 |! 331 |! !INTERFACE: 332 |! 333 |subroutine get_start_date(yr, mon, day, tod) 334 |!EOP 335 | implicit none 336 | 337 |! Arguments 338 | integer, intent(out) ::& 339 | yr, &! year 340 | mon, &! month 341 | day, &! day of month 342 | tod ! time of day (seconds past 0Z) 343 | 344 |! Local variables 345 | print*, 'get_start_date not implemented, stopping..' 346 | call endrun 347 |!EOC 348 |end subroutine get_start_date 349 |!========================================================================================= 350 |!BOP 351 |! !ROUTINE: get_ref_date 352 |! 353 |! !DESCRIPTION: 354 |! 355 |! Return date components of the reference date. 356 |! 357 |! !INTERFACE: 358 |subroutine get_ref_date(yr, mon, day, tod) 359 |!EOP 360 | implicit none 361 | 362 |! Arguments 363 | integer, intent(out) ::& 364 | yr, &! year 365 | mon, &! month 366 | day, &! day of month 367 | tod ! time of day (seconds past 0Z) 368 | 369 |! Local variables 370 | print*, 'get_ref_date not implemented, stopping..' 371 | call endrun 372 |!EOC 373 |end subroutine get_ref_date 374 |!========================================================================================= 375 |!BOP 376 |! !ROUTINE: get_curr_time 377 |! 378 |! !DESCRIPTION: 379 |! 380 |! Return time components valid at end of current timestep. 381 |! Current time is the time interval between the current date and the reference date. 382 |! 383 |! !INTERFACE: 384 |subroutine get_curr_time(days, seconds) 385 |!EOP 386 | 387 | implicit none 388 | 389 |! Arguments 390 | integer, intent(out) ::& 391 | days, &! number of whole days in time interval 392 | seconds ! remaining seconds in time interval 393 | 394 |! Local variables 395 | 396 |!EOC 397 |end subroutine get_curr_time 398 |!========================================================================================= 399 |!BOP 400 |! !ROUTINE: get_curr_calday 401 |! 402 |! !DESCRIPTION: 403 |! 404 |! Return calendar day at end of current timestep with optional offset. 405 |! Calendar day 1.0 = 0Z on Jan 1. 406 |! 407 |! !INTERFACE: 408 |function get_curr_calday(lt,offset) 409 |!EOP 410 | 411 | implicit none 412 | 413 |! Arguments 414 | type(listime) :: lt 415 | integer, optional, intent(in) :: offset ! Offset from current time in seconds. 416 | ! Positive for future times, negative 417 | ! for previous times. 418 |! Return value 419 | real(r8) :: get_curr_calday 420 | integer :: days(12) 421 | integer :: i 422 | data days /31,28,31,30,31,30,31,31,30,31,30,31/ 423 | 424 | get_curr_calday = 0 425 | if((mod(lt%yr,4) .eq. 0 .and. mod(lt%yr, 100).ne.0) &!leap year 426 | .or.(mod(lt%yr,400) .eq.0)) then 427 | days(2) = 29 428 | else 429 | days(2) = 28 430 | endif 431 | if(lt%mo .ne. 1) then 432 | do i=1,lt%mo-1 433 | get_curr_calday = get_curr_calday+days(i) 434 | enddo 435 | endif 436 | get_curr_calday = get_curr_calday + real(lt%da) + real(lt%hr)/24 + & 437 | real(lt%mn)/(24*60) + real(lt%ss)/(24*60*60) 438 | 439 | if (present(offset)) then 440 | if (offset > 0) then 441 | get_curr_calday = get_curr_calday + real(offset)/(24*60*60) 442 | else if (offset < 0) then 443 | get_curr_calday = get_curr_calday - real(offset)/(24*60*60) 444 | endif 445 | endif 446 | 447 |!EOC 448 |end function get_curr_calday 449 |#line 451 451 |!========================================================================================= 452 |!BOP 453 |! !ROUTINE: is_last_step 454 |! 455 |! !DESCRIPTION: 456 |! 457 |! Return true on last timestep. 458 |! 459 |! !INTERFACE: 460 |function is_last_step(lt) 461 |!EOP 462 | implicit none 463 | type(listime) :: lt 464 |! Return value 465 | logical :: is_last_step 466 | 467 |! Local variables 468 | is_last_step = .false. 469 | if(lt%time .ge. lt%etime) then 470 | is_last_step = .true. 471 | endif 472 |end function is_last_step 473 |!========================================================================================= 474 |!BOP 475 |! !ROUTINE: timemgr_write_restart 476 |! 477 |! !DESCRIPTION: 478 |! 479 |! Write information needed on restart to a binary Fortran file. 480 |! It is assumed that this routine is called only from the master proc if in mode. 481 |! 482 |! !INTERFACE: 483 |subroutine timemgr_write_restart(ftn_unit) 484 |!EOP 485 | 486 | implicit none 487 | 488 |! Arguments 489 | integer, intent(in) :: ftn_unit ! Fortran unit number 490 |#line 492 492 |end subroutine timemgr_write_restart 493 |!========================================================================================= 494 |!BOP 495 |! !ROUTINE: timemgr_read_restart 496 |! 497 |! !DESCRIPTION: 498 |! 499 |! Read information needed on restart from a binary Fortran file. 500 |! It is assumed that this routine is called only from the master proc if in mode. 501 |! 502 |! !INTERFACE: 503 |subroutine timemgr_read_restart(ftn_unit) 504 |!EOP 505 | implicit none 506 | 507 |! Arguments 508 | integer, intent(in) :: ftn_unit ! Fortran unit number 509 | 510 |end subroutine timemgr_read_restart 511 |!BOP 512 |! 513 |! !DESCRIPTION: 514 |! determines time in years, based on year, month, day hour etc.. 515 |! or reverse (date2time). 516 |! 517 |! !REVISION HISTORY: 518 |! 15 oct 1999: paul houser; initial code 519 |! 21 feb 2002: brian cosgrove; corrected leap year code line. days(2) 520 |! was not being reset to 28 after leaving a leap year, 521 |! it was staying 29 522 |! !INTERFACE: 523 | subroutine date2time(time,doy,gmt,yr,mo,da,hr,mn,ss) 524 | 525 | implicit none 526 |! !ARGUMENTS: 527 | integer yr,mo,da,hr,mn,ss,yrdays,doy,days(13),k 528 | real*8 time 529 | real gmt 530 |!EOP 531 | data days /31,28,31,30,31,30,31,31,30,31,30,31,30/ 532 |!BOC 533 | if((mod(yr,4).eq.0.and.mod(yr,100).ne.0) & !correct for leap year 534 | .or.(mod(yr,400).eq.0))then !correct for y2k 535 | yrdays=366 536 | else 537 | yrdays=365 538 | endif 539 | 540 | doy=0 541 | do k=1,(mo-1) 542 | doy=doy+days(k) 543 | enddo 544 | doy=doy+da 545 | 546 | if(yrdays.eq.366.and.mo.gt.2)doy=doy+1 547 | 548 | time=(dfloat(yr)+((((((dfloat(ss)/60.d0)+dfloat(mn))/60.d0)+ & 549 | dfloat(hr))/24.d0)+dfloat(doy-1))/dfloat(yrdays)) 550 | 551 | gmt=( ( (float(ss)/60.0) +float(mn)) /60.0)+float(hr) 552 | return 553 |!EOC 554 | end subroutine date2time 555 | 556 |!BOP 557 |! 558 |! !DESCRIPTION: 559 |! advance (or retract) time variables a specified amount 560 |! (a nonmodular version of ticktime.f.) 561 |! 562 |! !REVISION HISTORY: 563 |! 1 oct 1999: jared entin; initial code 564 |! 15 oct 1999: paul houser; significant f90 revision 565 |! 566 |! !INTERFACE: 567 | subroutine tick(time,doy,gmt,yr,mo,da,hr,mn,ss,ts) 568 | implicit none 569 |! !ARGUMENTS: 570 | real*8 time 571 | integer days(13) 572 | integer yr,mo,da,hr,mn,ss,ts,doy 573 | real gmt 574 |!EOP 575 | 576 | integer prvmo !previous month 577 |#line 579 579 | data days/31,28,31,30,31,30,31,31,30,31,30,31,31/ 580 | 581 |!=== end variable list =================================================== 582 |!BOC 583 |143 format(a1,' yr',i6,' mo',i5,' dy',i5,' hr',i5, & 584 | ' mn',i6,' ss',i8,' ts',i8) 585 | ss=ss+ts 586 | do while(ss.gt.59) 587 | ss=ss-60 588 | mn=mn+1 589 | enddo 590 | do while(ss.lt.0) 591 | ss=ss+60 592 | mn=mn-1 593 | enddo 594 | do while(mn.gt.59) 595 | mn=mn-60 596 | hr=hr+1 597 | enddo 598 | 599 | do while(mn.lt.0) 600 | mn=mn+60 601 | hr=hr-1 602 | enddo 603 | do while(hr.gt.23) 604 | hr=hr-24 605 | da=da+1 606 | enddo 607 | 608 | do while(hr.lt.0) 609 | hr=hr+24 610 | da=da-1 611 | enddo 612 | 613 | if((mod(yr,4).eq.0.and.mod(yr,100).ne.0) & !correct for leap year 614 | .or.(mod(yr,400).eq.0))then !correct for y2k 615 | days(2)=29 616 | else 617 | days(2)=28 618 | endif 619 | 620 | do while(da.gt.days(mo)) 621 | da=da-days(mo) 622 | mo=mo+1 623 | enddo 624 | 625 | do while(da.lt.1) 626 | 627 | prvmo=mo-1 628 | if(mo.eq.1) prvmo=12 629 | 630 | da=da+days(prvmo) 631 | 632 | if(prvmo.eq.12) then 633 | mo=prvmo 634 | yr=yr-1 635 | else 636 | mo=prvmo 637 | endif 638 | enddo 639 | do while(mo.gt.12) 640 | mo=mo-12 641 | yr=yr+1 642 | enddo 643 | 644 | do while(mo.lt.1) 645 | mo=mo+12 646 | yr=yr-1 647 | enddo 648 | call date2time(time,doy,gmt,yr,mo,da,hr,mn,ss) 649 | return 650 |!EOC 651 | end subroutine tick 652 | 653 | subroutine time2date(time,doy,gmt,yr,mo,da,hr,mn) 654 | 655 | implicit none 656 | integer yr,mo,da,hr,mn,ss,yrdays,doy,days(13) 657 | real*8 time,tmp 658 | real gmt 659 | data days /31,28,31,30,31,30,31,31,30,31,30,31,30/ 660 | 661 | yr = dint(time) 662 | tmp = (time) 663 | 664 | if((mod(yr,4).eq.0.and.mod(yr,100).ne.0) & !correct for leap year 665 | .or.(mod(yr,400).eq.0))then !correct for y2k 666 | yrdays=366 667 | else 668 | yrdays=365 669 | endif 670 | if (yrdays.eq.366) then 671 | days(2)=29 672 | else 673 | days(2)=28 674 | endif 675 | 676 | doy = dint((tmp-yr)*dfloat(yrdays))+1 677 | tmp = ((tmp-yr)*dfloat(yrdays))+1 678 | hr = nint((tmp-doy)*24.d0) 679 | tmp = ((tmp-doy)*24.d0) 680 | 681 | mn = dint((tmp-hr)*60.d0) 682 | tmp = ((tmp-hr)*60.d0) 683 | 684 | ss = dint((tmp-mn)*60.d0) 685 | mo=1 686 | do while (doy.gt.0) 687 | doy=doy-days(mo) 688 | mo=mo+1 689 | enddo 690 | mo=mo-1 691 | da=doy+days(mo) 692 | 693 | gmt=(((float(ss)/60.0)+float(mn))/60.0)+float(hr) 694 | 695 | if(gmt.eq.24) then 696 | gmt=0 697 | da=da+1 698 | if (da.gt.days(mo)) then 699 | da=1 700 | mo=mo+1 701 | if (mo.gt.12) then 702 | mo=1 703 | yr=yr+1 704 | endif 705 | endif 706 | endif 707 | return 708 | end subroutine time2date 709 |#line 731 731 |end module time_manager >>>>> ATTRIBUTE AND CROSS REFERENCE SECTION <<<<< IDENTIFIER NAME CROSS REFERENCE AND ATTRIBUTES a Use associated, Derived type: lisassimil, Component of Derived type definition: lisdec, Offset: 1276, Alignment: full word 0-34.8$ advance_timestep Public, Module Subroutine 0-158.12$ 0-45.7$ avhrrdir Use associated, Character(40), Component of Derived type definition: lisparameters, Offset: 400, Alignment: byte 0-34.8$ clfile Use associated, Character(40), Component of Derived type definition: lisparameters, Offset: 160, Alignment: byte 0-34.8$ d Use associated, Derived type: lisdomain, Component of Derived type definition: lisdec, Offset: 0, Alignment: full word 0-34.8$ da Reference argument, Integer(4), Offset: 0, Alignment: full word 0-656.19$ 0-653.43 0-691.5@ 0-697.8@ 0-697.11 0-698.12 0-699.11@ da Reference argument, Integer(4), Offset: 0, Alignment: full word 0-572.19$ 0-567.38 0-605.8@ 0-605.11 0-610.8@ 0-610.11 0-620.14 0-621.8@ 0-621.11 0-625.14 0-630.8@ 0-630.11 0-648.39 da Reference argument, Integer(4), Offset: 0, Alignment: full word 0-527.19$ 0-523.43 0-544.13 da Use associated, Integer(4), Component of Derived type definition: listime, Offset: 88, Alignment: full word 0-34.8$ date2time Public, Module Subroutine 0-523.14$ 0-59.7$ 0-82.9 0-202.8 0-216.11 0-648.10 day Reference argument, Intent (OUT), Integer(4), Offset: 0, Alignment: full word 0-341.7$ 0-333.36 day Reference argument, Intent (OUT), Integer(4), Offset: 0, Alignment: full word 0-287.7$ 0-278.39 0-295.4@ day Reference argument, Intent (OUT), Integer(4), Offset: 0, Alignment: full word 0-316.7$ 0-308.35 day Reference argument, Intent (OUT), Integer(4), Offset: 0, Alignment: full word 0-366.7$ 0-358.34 days Static, Integer(4) (1:12), Offset: 0, Alignment: full word 0-165.14$ 0-166.8* 0-187.6@ 0-189.6@ 0-192.21 0-193.22 days Reference argument, Intent (OUT), Integer(4), Offset: 0, Alignment: full word 0-391.7$ 0-384.26 days Static, Integer(4) (1:13), Offset: 0, Alignment: full word 0-656.42$ 0-659.10* 0-671.8@ 0-673.8@ 0-687.16 0-691.12 0-698.18 days Static, Integer(4) (1:13), Offset: 0, Alignment: full word 0-571.13$ 0-579.10* 0-615.8@ 0-617.8@ 0-620.20 0-621.14 0-630.14 days Static, Integer(4) (1:13), Offset: 0, Alignment: full word 0-527.42$ 0-531.10* 0-542.16 days Static, Integer(4) (1:12), Offset: 0, Alignment: full word 0-420.15$ 0-422.9* 0-427.7@ 0-429.7@ 0-433.44 dfile Use associated, Character(40), Component of Derived type definition: lisoutput, Offset: 92, Alignment: byte 0-34.8$ dfloat Pure Intrinsic 0-676.26 0-677.26 dfloat Pure Intrinsic 0-548.11 0-548.28 0-548.46 0-549.10 0-549.29 0-549.44 dint Pure Intrinsic Real(8) 0-661.11 0-676.12 0-681.11 0-684.11 domain Use associated, Integer(4), Component of Derived type definition: lisdomain, Offset: 28, Alignment: full word 0-34.8$ doy Use associated, Integer(4), Component of Derived type definition: listime, Offset: 76, Alignment: full word 0-34.8$ doy Reference argument, Integer(4), Offset: 0, Alignment: full word 0-527.38$ 0-523.29 0-540.5@ 0-542.8@ 0-542.12 0-544.5@ 0-544.9 0-546.34@ 0-546.38 0-549.36 doy Reference argument, Integer(4), Offset: 0, Alignment: full word 0-572.34$ 0-567.24 0-648.25 doy Reference argument, Integer(4), Offset: 0, Alignment: full word 0-656.38$ 0-653.29 0-676.5@ 0-678.21 0-679.21 0-686.15 0-687.8@ 0-687.12 0-691.8 ecor Use associated, Integer(4), Component of Derived type definition: lisforcing, Offset: 4, Alignment: full word 0-34.8$ eda Use associated, Integer(4), Component of Derived type definition: listime, Offset: 48, Alignment: full word 0-34.8$ edoy Use associated, Integer(4), Component of Derived type definition: listime, Offset: 40, Alignment: full word 0-34.8$ egmt Use associated, Real(4), Component of Derived type definition: listime, Offset: 132, Alignment: full word 0-34.8$ ehr Use associated, Integer(4), Component of Derived type definition: listime, Offset: 44, Alignment: full word 0-34.8$ elev Use associated, Integer(4), Component of Derived type definition: lisdomain, Offset: 12, Alignment: full word 0-34.8$ elev_griddesc Use associated, Real(4) (1:6), Component of Derived type definition: lisdomain, Offset: 296, Alignment: full word 0-34.8$ elevfile Use associated, Character(40), Component of Derived type definition: lisparameters, Offset: 520, Alignment: byte 0-34.8$ emn Use associated, Integer(4), Component of Derived type definition: listime, Offset: 36, Alignment: full word 0-34.8$ emo Use associated, Integer(4), Component of Derived type definition: listime, Offset: 52, Alignment: full word 0-34.8$ endcode Use associated, Integer(4), Component of Derived type definition: listime, Offset: 28, Alignment: full word 0-34.8$ endrun External Subroutine 0-320.9 endrun External Subroutine 0-371.9 endrun External Subroutine 0-346.9 endtime Use associated, Integer(4), Component of Derived type definition: listime, Offset: 104, Alignment: full word 0-34.8$ ess Use associated, Integer(4), Component of Derived type definition: listime, Offset: 32, Alignment: full word 0-34.8$ etime Use associated, Real(8), Component of Derived type definition: listime, Offset: 120, Alignment: double word 0-34.8$ expcode Use associated, Integer(4), Component of Derived type definition: lisoutput, Offset: 20, Alignment: full word 0-34.8$ eyr Use associated, Integer(4), Component of Derived type definition: listime, Offset: 56, Alignment: full word 0-34.8$ f Use associated, Derived type: lisforcing, Component of Derived type definition: lisdec, Offset: 344, Alignment: full word 0-34.8$ f00_flag Use associated, Integer(4), Component of Derived type definition: lisforcing, Offset: 60, Alignment: full word 0-34.8$ f06_flag Use associated, Integer(4), Component of Derived type definition: lisforcing, Offset: 64, Alignment: full word 0-34.8$ fidgm Use associated, Integer(4), Component of Derived type definition: lisoutput, Offset: 36, Alignment: full word 0-34.8$ fidtm Use associated, Integer(4), Component of Derived type definition: lisoutput, Offset: 44, Alignment: full word 0-34.8$ findagrtime1 Use associated, Integer(4), Component of Derived type definition: lisforcing, Offset: 52, Alignment: full word 0-34.8$ findagrtime2 Use associated, Integer(4), Component of Derived type definition: lisforcing, Offset: 56, Alignment: full word 0-34.8$ findtime1 Use associated, Integer(4), Component of Derived type definition: lisforcing, Offset: 44, Alignment: full word 0-34.8$ findtime2 Use associated, Integer(4), Component of Derived type definition: lisforcing, Offset: 48, Alignment: full word 0-34.8$ float Pure Intrinsic 0-551.14 0-551.31 0-551.49 float Pure Intrinsic 0-693.12 0-693.28 0-693.45 force Use associated, Integer(4), Component of Derived type definition: lisforcing, Offset: 0, Alignment: full word 0-34.8$ foropen Use associated, Integer(4), Component of Derived type definition: lisoutput, Offset: 28, Alignment: full word 0-34.8$ ftn_unit Reference argument, Intent (IN), Integer(4), Offset: 0, Alignment: full word 0-489.27$ 0-483.34 ftn_unit Reference argument, Intent (IN), Integer(4), Offset: 0, Alignment: full word 0-508.27$ 0-503.33 get_curr_calday Public, Module Function Real(4) 0-53.7$ 0-408.10$ get_curr_calday Function Real(4) 0-419.16$ 0-424.4@ 0-433.10@ 0-433.28 0-436.4@ 0-436.22 0-441.10@ 0-441.28 0-443.10@ 0-443.28 get_curr_date Public, Module Subroutine 0-278.12$ 0-48.7$ get_curr_time Public, Module Subroutine 0-384.12$ 0-52.7$ get_nstep Function Integer(4) 0-262.15$ 0-265.4@ get_nstep Public, Module Function Integer(4) 0-47.7$ 0-257.10$ get_prev_date Public, Module Subroutine 0-308.12$ 0-49.7$ get_ref_date Public, Module Subroutine 0-358.12$ 0-51.7$ get_start_date Public, Module Subroutine 0-333.12$ 0-50.7$ get_step_size Function Integer(4) 0-242.15$ 0-245.4@ get_step_size Public, Module Function Integer(4) 0-46.7$ 0-236.10$ glbnch Use associated, Integer(4), Component of Derived type definition: lisdomain, Offset: 16, Alignment: full word 0-34.8$ glbngrid Use associated, Integer(4), Component of Derived type definition: lisdomain, Offset: 24, Alignment: full word 0-34.8$ gmt Use associated, Real(4), Component of Derived type definition: listime, Offset: 128, Alignment: full word 0-34.8$ gmt Reference argument, Real(4), Offset: 0, Alignment: full word 0-529.10$ 0-523.33 0-551.5@ gmt Reference argument, Real(4), Offset: 0, Alignment: full word 0-573.10$ 0-567.28 0-648.29 gmt Reference argument, Real(4), Offset: 0, Alignment: full word 0-658.10$ 0-653.33 0-693.5@ 0-695.8 0-696.8@ gnc Use associated, Integer(4), Component of Derived type definition: lisdomain, Offset: 36, Alignment: full word 0-34.8$ gnr Use associated, Integer(4), Component of Derived type definition: lisdomain, Offset: 40, Alignment: full word 0-34.8$ gpcpsrc Use associated, Integer(4), Component of Derived type definition: lisforcing, Offset: 68, Alignment: full word 0-34.8$ gridchange Use associated, Integer(4), Component of Derived type definition: lisforcing, Offset: 24, Alignment: full word 0-34.8$ griddesc Use associated, Real(4) (1:50), Component of Derived type definition: lisdomain, Offset: 72, Alignment: full word 0-34.8$ hhmmss Use associated, Integer(4), Component of Derived type definition: listime, Offset: 72, Alignment: full word 0-34.8$ hr Use associated, Integer(4), Component of Derived type definition: listime, Offset: 92, Alignment: full word 0-34.8$ hr Reference argument, Integer(4), Offset: 0, Alignment: full word 0-656.22$ 0-653.46 0-678.5@ 0-681.21 0-682.21 0-693.51 hr Reference argument, Integer(4), Offset: 0, Alignment: full word 0-527.22$ 0-523.46 0-549.17 0-551.55 hr Reference argument, Integer(4), Offset: 0, Alignment: full word 0-572.22$ 0-567.41 0-596.8@ 0-596.11 0-601.8@ 0-601.11 0-603.14 0-604.8@ 0-604.11 0-608.14 0-609.8@ 0-609.11 0-648.42 i Automatic, Integer(4), Offset: 0, Alignment: full word 0-421.15$ 0-432.10@ 0-433.49 i8 Use associated, Public, Parameter, Integer(4) 0-35.8$ ic Use associated, Integer(4), Component of Derived type definition: lisdomain, Offset: 52, Alignment: full word 0-34.8$ interp Use associated, Integer(4), Component of Derived type definition: lisforcing, Offset: 28, Alignment: full word 0-34.8$ ir Use associated, Integer(4), Component of Derived type definition: lisdomain, Offset: 56, Alignment: full word 0-34.8$ is_last_step Function Logical(4) 0-465.15$ 0-468.4@ 0-470.7@ is_last_step Public, Module Function Logical(4) 0-54.7$ 0-460.10$ iscfile Use associated, Character(40), Component of Derived type definition: lisparameters, Offset: 480, Alignment: byte 0-34.8$ k Automatic, Integer(4), Offset: 0, Alignment: full word 0-527.51$ 0-541.8@ 0-542.21 lai Use associated, Integer(4), Component of Derived type definition: lisparameters, Offset: 0, Alignment: full word 0-34.8$ laiflag Use associated, Integer(4), Component of Derived type definition: lisparameters, Offset: 12, Alignment: full word 0-34.8$ laitime Use associated, Real(8), Component of Derived type definition: lisparameters, Offset: 560, Alignment: double word 0-34.8$ landcover Use associated, Integer(4), Component of Derived type definition: lisdomain, Offset: 32, Alignment: full word 0-34.8$ latmax Use associated, Integer(4), Component of Derived type definition: lisforcing, Offset: 32, Alignment: full word 0-34.8$ lc_griddesc Use associated, Real(4) (1:6), Component of Derived type definition: lisdomain, Offset: 320, Alignment: full word 0-34.8$ lis_module Use associated, Nonintrinsic Module 0-34.8$ 0-34.8 lisassimil Use associated, Public, Derived type definition 0-34.8$ lisdec Use associated, Public, Derived type definition 0-34.8$ lisdomain Use associated, Public, Derived type definition 0-34.8$ lisforcing Use associated, Public, Derived type definition 0-34.8$ lisoutput Use associated, Public, Derived type definition 0-34.8$ lisparameters Use associated, Public, Derived type definition 0-34.8$ listime Use associated, Public, Derived type definition 0-34.8$ 0-79.9 0-135.9 0-163.9 0-240.9 0-260.9 0-283.9 0-414.9 0-463.9 lnc Use associated, Integer(4), Component of Derived type definition: lisdomain, Offset: 44, Alignment: full word 0-34.8$ lnr Use associated, Integer(4), Component of Derived type definition: lisdomain, Offset: 48, Alignment: full word 0-34.8$ longflag Use associated, Integer(4), Component of Derived type definition: lisforcing, Offset: 40, Alignment: full word 0-34.8$ lsm Use associated, Integer(4), Component of Derived type definition: lisdomain, Offset: 4, Alignment: full word 0-34.8$ lt Reference argument, Derived type: listime, Offset: 0, Alignment: double word 0-135.21$ 0-132.26 lt Reference argument, Derived type: listime, Offset: 0, Alignment: double word 0-283.21$ 0-278.26 lt Reference argument, Derived type: listime, Offset: 0, Alignment: double word 0-463.21$ 0-460.23 lt Reference argument, Derived type: listime, Offset: 0, Alignment: double word 0-414.21$ 0-408.26 lt Reference argument, Derived type: listime, Offset: 0, Alignment: double word 0-260.21$ 0-257.20 lt Reference argument, Derived type: listime, Offset: 0, Alignment: double word 0-240.21$ 0-236.24 lt Reference argument, Derived type: listime, Offset: 0, Alignment: double word 0-163.21$ 0-158.29 lt Reference argument, Derived type: listime, Offset: 0, Alignment: double word 0-79.21$ 0-76.25 0-89.26 lt%da Reference argument, Integer(4), Offset: 88, Alignment: double word 0-79.21$ lt%da Reference argument, Integer(4), Offset: 88, Alignment: double word 0-163.21$ 0-182.6@ 0-182.14 0-192.12 0-193.6@ 0-193.14 0-203.22 0-207.42 lt%da Reference argument, Integer(4), Offset: 88, Alignment: double word 0-135.21$ 0-144.59 lt%da Reference argument, Integer(4), Offset: 88, Alignment: double word 0-260.21$ lt%da Reference argument, Integer(4), Offset: 88, Alignment: double word 0-240.21$ lt%da Reference argument, Integer(4), Offset: 88, Alignment: double word 0-414.21$ 0-436.45 lt%da Reference argument, Integer(4), Offset: 88, Alignment: double word 0-463.21$ lt%da Reference argument, Integer(4), Offset: 88, Alignment: double word 0-283.21$ 0-295.10 lt%doy Reference argument, Integer(4), Offset: 76, Alignment: full word 0-260.21$ lt%doy Reference argument, Integer(4), Offset: 76, Alignment: full word 0-414.21$ lt%doy Reference argument, Integer(4), Offset: 76, Alignment: full word 0-135.21$ lt%doy Reference argument, Integer(4), Offset: 76, Alignment: full word 0-240.21$ lt%doy Reference argument, Integer(4), Offset: 76, Alignment: full word 0-79.21$ lt%doy Reference argument, Integer(4), Offset: 76, Alignment: full word 0-163.21$ 0-202.26 lt%doy Reference argument, Integer(4), Offset: 76, Alignment: full word 0-283.21$ lt%doy Reference argument, Integer(4), Offset: 76, Alignment: full word 0-463.21$ lt%eda Reference argument, Integer(4), Offset: 48, Alignment: quadruple word 0-260.21$ lt%eda Reference argument, Integer(4), Offset: 48, Alignment: quadruple word 0-414.21$ lt%eda Reference argument, Integer(4), Offset: 48, Alignment: quadruple word 0-240.21$ lt%eda Reference argument, Integer(4), Offset: 48, Alignment: quadruple word 0-463.21$ lt%eda Reference argument, Integer(4), Offset: 48, Alignment: quadruple word 0-283.21$ lt%eda Reference argument, Integer(4), Offset: 48, Alignment: quadruple word 0-135.21$ 0-142.61 lt%eda Reference argument, Integer(4), Offset: 48, Alignment: quadruple word 0-163.21$ 0-217.25 lt%eda Reference argument, Integer(4), Offset: 48, Alignment: quadruple word 0-79.21$ 0-83.23 lt%edoy Reference argument, Integer(4), Offset: 40, Alignment: double word 0-463.21$ lt%edoy Reference argument, Integer(4), Offset: 40, Alignment: double word 0-283.21$ lt%edoy Reference argument, Integer(4), Offset: 40, Alignment: double word 0-240.21$ lt%edoy Reference argument, Integer(4), Offset: 40, Alignment: double word 0-135.21$ lt%edoy Reference argument, Integer(4), Offset: 40, Alignment: double word 0-260.21$ lt%edoy Reference argument, Integer(4), Offset: 40, Alignment: double word 0-414.21$ lt%edoy Reference argument, Integer(4), Offset: 40, Alignment: double word 0-163.21$ 0-216.30 lt%edoy Reference argument, Integer(4), Offset: 40, Alignment: double word 0-79.21$ 0-82.28 lt%egmt Reference argument, Real(4), Offset: 132, Alignment: full word 0-414.21$ lt%egmt Reference argument, Real(4), Offset: 132, Alignment: full word 0-283.21$ lt%egmt Reference argument, Real(4), Offset: 132, Alignment: full word 0-163.21$ 0-216.38 lt%egmt Reference argument, Real(4), Offset: 132, Alignment: full word 0-240.21$ lt%egmt Reference argument, Real(4), Offset: 132, Alignment: full word 0-463.21$ lt%egmt Reference argument, Real(4), Offset: 132, Alignment: full word 0-79.21$ 0-82.36 lt%egmt Reference argument, Real(4), Offset: 132, Alignment: full word 0-260.21$ lt%egmt Reference argument, Real(4), Offset: 132, Alignment: full word 0-135.21$ lt%ehr Reference argument, Integer(4), Offset: 44, Alignment: full word 0-260.21$ lt%ehr Reference argument, Integer(4), Offset: 44, Alignment: full word 0-135.21$ lt%ehr Reference argument, Integer(4), Offset: 44, Alignment: full word 0-163.21$ 0-217.32 lt%ehr Reference argument, Integer(4), Offset: 44, Alignment: full word 0-283.21$ lt%ehr Reference argument, Integer(4), Offset: 44, Alignment: full word 0-463.21$ lt%ehr Reference argument, Integer(4), Offset: 44, Alignment: full word 0-414.21$ lt%ehr Reference argument, Integer(4), Offset: 44, Alignment: full word 0-240.21$ lt%ehr Reference argument, Integer(4), Offset: 44, Alignment: full word 0-79.21$ 0-83.30 lt%emn Reference argument, Integer(4), Offset: 36, Alignment: full word 0-79.21$ 0-83.37 lt%emn Reference argument, Integer(4), Offset: 36, Alignment: full word 0-414.21$ lt%emn Reference argument, Integer(4), Offset: 36, Alignment: full word 0-135.21$ lt%emn Reference argument, Integer(4), Offset: 36, Alignment: full word 0-260.21$ lt%emn Reference argument, Integer(4), Offset: 36, Alignment: full word 0-240.21$ lt%emn Reference argument, Integer(4), Offset: 36, Alignment: full word 0-283.21$ lt%emn Reference argument, Integer(4), Offset: 36, Alignment: full word 0-463.21$ lt%emn Reference argument, Integer(4), Offset: 36, Alignment: full word 0-163.21$ 0-217.39 lt%emo Reference argument, Integer(4), Offset: 52, Alignment: full word 0-260.21$ lt%emo Reference argument, Integer(4), Offset: 52, Alignment: full word 0-135.21$ 0-142.53 lt%emo Reference argument, Integer(4), Offset: 52, Alignment: full word 0-79.21$ 0-83.16 lt%emo Reference argument, Integer(4), Offset: 52, Alignment: full word 0-240.21$ lt%emo Reference argument, Integer(4), Offset: 52, Alignment: full word 0-463.21$ lt%emo Reference argument, Integer(4), Offset: 52, Alignment: full word 0-163.21$ 0-217.18 lt%emo Reference argument, Integer(4), Offset: 52, Alignment: full word 0-414.21$ lt%emo Reference argument, Integer(4), Offset: 52, Alignment: full word 0-283.21$ lt%endcode Reference argument, Integer(4), Offset: 28, Alignment: full word 0-163.21$ 0-211.6 0-215.6 lt%endcode Reference argument, Integer(4), Offset: 28, Alignment: full word 0-414.21$ lt%endcode Reference argument, Integer(4), Offset: 28, Alignment: full word 0-79.21$ lt%endcode Reference argument, Integer(4), Offset: 28, Alignment: full word 0-283.21$ lt%endcode Reference argument, Integer(4), Offset: 28, Alignment: full word 0-463.21$ lt%endcode Reference argument, Integer(4), Offset: 28, Alignment: full word 0-240.21$ lt%endcode Reference argument, Integer(4), Offset: 28, Alignment: full word 0-135.21$ lt%endcode Reference argument, Integer(4), Offset: 28, Alignment: full word 0-260.21$ lt%endtime Reference argument, Integer(4), Offset: 104, Alignment: double word 0-135.21$ lt%endtime Reference argument, Integer(4), Offset: 104, Alignment: double word 0-240.21$ lt%endtime Reference argument, Integer(4), Offset: 104, Alignment: double word 0-163.21$ 0-219.9@ lt%endtime Reference argument, Integer(4), Offset: 104, Alignment: double word 0-260.21$ lt%endtime Reference argument, Integer(4), Offset: 104, Alignment: double word 0-414.21$ lt%endtime Reference argument, Integer(4), Offset: 104, Alignment: double word 0-283.21$ lt%endtime Reference argument, Integer(4), Offset: 104, Alignment: double word 0-79.21$ lt%endtime Reference argument, Integer(4), Offset: 104, Alignment: double word 0-463.21$ lt%ess Reference argument, Integer(4), Offset: 32, Alignment: quadruple word 0-79.21$ 0-83.44 lt%ess Reference argument, Integer(4), Offset: 32, Alignment: quadruple word 0-163.21$ 0-217.46 lt%ess Reference argument, Integer(4), Offset: 32, Alignment: quadruple word 0-283.21$ lt%ess Reference argument, Integer(4), Offset: 32, Alignment: quadruple word 0-414.21$ lt%ess Reference argument, Integer(4), Offset: 32, Alignment: quadruple word 0-240.21$ lt%ess Reference argument, Integer(4), Offset: 32, Alignment: quadruple word 0-135.21$ lt%ess Reference argument, Integer(4), Offset: 32, Alignment: quadruple word 0-463.21$ lt%ess Reference argument, Integer(4), Offset: 32, Alignment: quadruple word 0-260.21$ lt%etime Reference argument, Real(8), Offset: 120, Alignment: double word 0-79.21$ 0-82.19 lt%etime Reference argument, Real(8), Offset: 120, Alignment: double word 0-283.21$ lt%etime Reference argument, Real(8), Offset: 120, Alignment: double word 0-260.21$ lt%etime Reference argument, Real(8), Offset: 120, Alignment: double word 0-240.21$ lt%etime Reference argument, Real(8), Offset: 120, Alignment: double word 0-135.21$ lt%etime Reference argument, Real(8), Offset: 120, Alignment: double word 0-414.21$ lt%etime Reference argument, Real(8), Offset: 120, Alignment: double word 0-163.21$ 0-216.21 0-218.20 lt%etime Reference argument, Real(8), Offset: 120, Alignment: double word 0-463.21$ 0-469.20 lt%eyr Reference argument, Integer(4), Offset: 56, Alignment: double word 0-135.21$ 0-142.45 lt%eyr Reference argument, Integer(4), Offset: 56, Alignment: double word 0-240.21$ lt%eyr Reference argument, Integer(4), Offset: 56, Alignment: double word 0-163.21$ 0-217.11 lt%eyr Reference argument, Integer(4), Offset: 56, Alignment: double word 0-283.21$ lt%eyr Reference argument, Integer(4), Offset: 56, Alignment: double word 0-463.21$ lt%eyr Reference argument, Integer(4), Offset: 56, Alignment: double word 0-260.21$ lt%eyr Reference argument, Integer(4), Offset: 56, Alignment: double word 0-414.21$ lt%eyr Reference argument, Integer(4), Offset: 56, Alignment: double word 0-79.21$ 0-83.9 lt%gmt Reference argument, Real(4), Offset: 128, Alignment: quadruple word 0-414.21$ lt%gmt Reference argument, Real(4), Offset: 128, Alignment: quadruple word 0-463.21$ lt%gmt Reference argument, Real(4), Offset: 128, Alignment: quadruple word 0-163.21$ 0-202.33 lt%gmt Reference argument, Real(4), Offset: 128, Alignment: quadruple word 0-79.21$ lt%gmt Reference argument, Real(4), Offset: 128, Alignment: quadruple word 0-283.21$ lt%gmt Reference argument, Real(4), Offset: 128, Alignment: quadruple word 0-260.21$ lt%gmt Reference argument, Real(4), Offset: 128, Alignment: quadruple word 0-240.21$ lt%gmt Reference argument, Real(4), Offset: 128, Alignment: quadruple word 0-135.21$ lt%hhmmss Reference argument, Integer(4), Offset: 72, Alignment: double word 0-283.21$ lt%hhmmss Reference argument, Integer(4), Offset: 72, Alignment: double word 0-414.21$ lt%hhmmss Reference argument, Integer(4), Offset: 72, Alignment: double word 0-79.21$ lt%hhmmss Reference argument, Integer(4), Offset: 72, Alignment: double word 0-135.21$ lt%hhmmss Reference argument, Integer(4), Offset: 72, Alignment: double word 0-163.21$ lt%hhmmss Reference argument, Integer(4), Offset: 72, Alignment: double word 0-260.21$ lt%hhmmss Reference argument, Integer(4), Offset: 72, Alignment: double word 0-463.21$ lt%hhmmss Reference argument, Integer(4), Offset: 72, Alignment: double word 0-240.21$ lt%hr Reference argument, Integer(4), Offset: 92, Alignment: full word 0-463.21$ lt%hr Reference argument, Integer(4), Offset: 92, Alignment: full word 0-260.21$ lt%hr Reference argument, Integer(4), Offset: 92, Alignment: full word 0-135.21$ lt%hr Reference argument, Integer(4), Offset: 92, Alignment: full word 0-240.21$ lt%hr Reference argument, Integer(4), Offset: 92, Alignment: full word 0-79.21$ lt%hr Reference argument, Integer(4), Offset: 92, Alignment: full word 0-163.21$ 0-177.6@ 0-177.14 0-180.12 0-181.6@ 0-181.14 0-203.29 0-208.14 lt%hr Reference argument, Integer(4), Offset: 92, Alignment: full word 0-414.21$ 0-436.59 lt%hr Reference argument, Integer(4), Offset: 92, Alignment: full word 0-283.21$ 0-296.25 lt%mn Reference argument, Integer(4), Offset: 96, Alignment: quadruple word 0-414.21$ 0-437.14 lt%mn Reference argument, Integer(4), Offset: 96, Alignment: quadruple word 0-260.21$ lt%mn Reference argument, Integer(4), Offset: 96, Alignment: quadruple word 0-135.21$ lt%mn Reference argument, Integer(4), Offset: 96, Alignment: quadruple word 0-163.21$ 0-172.6@ 0-172.14 0-175.12 0-176.6@ 0-176.14 0-203.36 0-208.24 lt%mn Reference argument, Integer(4), Offset: 96, Alignment: quadruple word 0-240.21$ lt%mn Reference argument, Integer(4), Offset: 96, Alignment: quadruple word 0-283.21$ 0-296.16 lt%mn Reference argument, Integer(4), Offset: 96, Alignment: quadruple word 0-463.21$ lt%mn Reference argument, Integer(4), Offset: 96, Alignment: quadruple word 0-79.21$ lt%mo Reference argument, Integer(4), Offset: 84, Alignment: full word 0-79.21$ lt%mo Reference argument, Integer(4), Offset: 84, Alignment: full word 0-260.21$ lt%mo Reference argument, Integer(4), Offset: 84, Alignment: full word 0-135.21$ 0-144.52 lt%mo Reference argument, Integer(4), Offset: 84, Alignment: full word 0-414.21$ 0-431.7 0-432.14 lt%mo Reference argument, Integer(4), Offset: 84, Alignment: full word 0-240.21$ lt%mo Reference argument, Integer(4), Offset: 84, Alignment: full word 0-163.21$ 0-192.26 0-193.27 0-194.6@ 0-194.14 0-197.12 0-198.6@ 0-198.14 0-203.15 0-207.32 lt%mo Reference argument, Integer(4), Offset: 84, Alignment: full word 0-463.21$ lt%mo Reference argument, Integer(4), Offset: 84, Alignment: full word 0-283.21$ 0-294.10 lt%pda Reference argument, Integer(4), Offset: 108, Alignment: full word 0-283.21$ lt%pda Reference argument, Integer(4), Offset: 108, Alignment: full word 0-463.21$ lt%pda Reference argument, Integer(4), Offset: 108, Alignment: full word 0-414.21$ lt%pda Reference argument, Integer(4), Offset: 108, Alignment: full word 0-163.21$ lt%pda Reference argument, Integer(4), Offset: 108, Alignment: full word 0-240.21$ lt%pda Reference argument, Integer(4), Offset: 108, Alignment: full word 0-79.21$ lt%pda Reference argument, Integer(4), Offset: 108, Alignment: full word 0-135.21$ lt%pda Reference argument, Integer(4), Offset: 108, Alignment: full word 0-260.21$ lt%sda Reference argument, Integer(4), Offset: 16, Alignment: quadruple word 0-240.21$ lt%sda Reference argument, Integer(4), Offset: 16, Alignment: quadruple word 0-463.21$ lt%sda Reference argument, Integer(4), Offset: 16, Alignment: quadruple word 0-260.21$ lt%sda Reference argument, Integer(4), Offset: 16, Alignment: quadruple word 0-163.21$ lt%sda Reference argument, Integer(4), Offset: 16, Alignment: quadruple word 0-135.21$ 0-141.61 lt%sda Reference argument, Integer(4), Offset: 16, Alignment: quadruple word 0-79.21$ lt%sda Reference argument, Integer(4), Offset: 16, Alignment: quadruple word 0-414.21$ lt%sda Reference argument, Integer(4), Offset: 16, Alignment: quadruple word 0-283.21$ lt%sdoy Reference argument, Integer(4), Offset: 4, Alignment: full word 0-414.21$ lt%sdoy Reference argument, Integer(4), Offset: 4, Alignment: full word 0-135.21$ lt%sdoy Reference argument, Integer(4), Offset: 4, Alignment: full word 0-163.21$ lt%sdoy Reference argument, Integer(4), Offset: 4, Alignment: full word 0-240.21$ lt%sdoy Reference argument, Integer(4), Offset: 4, Alignment: full word 0-283.21$ lt%sdoy Reference argument, Integer(4), Offset: 4, Alignment: full word 0-260.21$ lt%sdoy Reference argument, Integer(4), Offset: 4, Alignment: full word 0-79.21$ lt%sdoy Reference argument, Integer(4), Offset: 4, Alignment: full word 0-463.21$ lt%sgmt Reference argument, Real(4), Offset: 136, Alignment: double word 0-283.21$ lt%sgmt Reference argument, Real(4), Offset: 136, Alignment: double word 0-240.21$ lt%sgmt Reference argument, Real(4), Offset: 136, Alignment: double word 0-135.21$ lt%sgmt Reference argument, Real(4), Offset: 136, Alignment: double word 0-463.21$ lt%sgmt Reference argument, Real(4), Offset: 136, Alignment: double word 0-260.21$ lt%sgmt Reference argument, Real(4), Offset: 136, Alignment: double word 0-79.21$ lt%sgmt Reference argument, Real(4), Offset: 136, Alignment: double word 0-414.21$ lt%sgmt Reference argument, Real(4), Offset: 136, Alignment: double word 0-163.21$ lt%shr Reference argument, Integer(4), Offset: 12, Alignment: full word 0-414.21$ lt%shr Reference argument, Integer(4), Offset: 12, Alignment: full word 0-135.21$ lt%shr Reference argument, Integer(4), Offset: 12, Alignment: full word 0-463.21$ lt%shr Reference argument, Integer(4), Offset: 12, Alignment: full word 0-283.21$ lt%shr Reference argument, Integer(4), Offset: 12, Alignment: full word 0-260.21$ lt%shr Reference argument, Integer(4), Offset: 12, Alignment: full word 0-79.21$ lt%shr Reference argument, Integer(4), Offset: 12, Alignment: full word 0-240.21$ lt%shr Reference argument, Integer(4), Offset: 12, Alignment: full word 0-163.21$ lt%smn Reference argument, Integer(4), Offset: 8, Alignment: double word 0-135.21$ lt%smn Reference argument, Integer(4), Offset: 8, Alignment: double word 0-79.21$ lt%smn Reference argument, Integer(4), Offset: 8, Alignment: double word 0-283.21$ lt%smn Reference argument, Integer(4), Offset: 8, Alignment: double word 0-260.21$ lt%smn Reference argument, Integer(4), Offset: 8, Alignment: double word 0-414.21$ lt%smn Reference argument, Integer(4), Offset: 8, Alignment: double word 0-240.21$ lt%smn Reference argument, Integer(4), Offset: 8, Alignment: double word 0-163.21$ lt%smn Reference argument, Integer(4), Offset: 8, Alignment: double word 0-463.21$ lt%smo Reference argument, Integer(4), Offset: 20, Alignment: full word 0-163.21$ lt%smo Reference argument, Integer(4), Offset: 20, Alignment: full word 0-135.21$ 0-141.53 lt%smo Reference argument, Integer(4), Offset: 20, Alignment: full word 0-240.21$ lt%smo Reference argument, Integer(4), Offset: 20, Alignment: full word 0-79.21$ lt%smo Reference argument, Integer(4), Offset: 20, Alignment: full word 0-283.21$ lt%smo Reference argument, Integer(4), Offset: 20, Alignment: full word 0-463.21$ lt%smo Reference argument, Integer(4), Offset: 20, Alignment: full word 0-260.21$ lt%smo Reference argument, Integer(4), Offset: 20, Alignment: full word 0-414.21$ lt%ss Reference argument, Integer(4), Offset: 100, Alignment: full word 0-283.21$ 0-296.10 lt%ss Reference argument, Integer(4), Offset: 100, Alignment: full word 0-79.21$ lt%ss Reference argument, Integer(4), Offset: 100, Alignment: full word 0-163.21$ 0-168.3@ 0-168.11 0-170.12 0-171.6@ 0-171.14 0-203.43 0-208.34 lt%ss Reference argument, Integer(4), Offset: 100, Alignment: full word 0-414.21$ 0-437.36 lt%ss Reference argument, Integer(4), Offset: 100, Alignment: full word 0-260.21$ lt%ss Reference argument, Integer(4), Offset: 100, Alignment: full word 0-463.21$ lt%ss Reference argument, Integer(4), Offset: 100, Alignment: full word 0-135.21$ lt%ss Reference argument, Integer(4), Offset: 100, Alignment: full word 0-240.21$ lt%sss Reference argument, Integer(4), Offset: 0, Alignment: quadruple word 0-260.21$ lt%sss Reference argument, Integer(4), Offset: 0, Alignment: quadruple word 0-135.21$ lt%sss Reference argument, Integer(4), Offset: 0, Alignment: quadruple word 0-283.21$ lt%sss Reference argument, Integer(4), Offset: 0, Alignment: quadruple word 0-463.21$ lt%sss Reference argument, Integer(4), Offset: 0, Alignment: quadruple word 0-79.21$ lt%sss Reference argument, Integer(4), Offset: 0, Alignment: quadruple word 0-414.21$ lt%sss Reference argument, Integer(4), Offset: 0, Alignment: quadruple word 0-163.21$ lt%sss Reference argument, Integer(4), Offset: 0, Alignment: quadruple word 0-240.21$ lt%syr Reference argument, Integer(4), Offset: 24, Alignment: double word 0-260.21$ lt%syr Reference argument, Integer(4), Offset: 24, Alignment: double word 0-135.21$ 0-141.45 lt%syr Reference argument, Integer(4), Offset: 24, Alignment: double word 0-414.21$ lt%syr Reference argument, Integer(4), Offset: 24, Alignment: double word 0-79.21$ lt%syr Reference argument, Integer(4), Offset: 24, Alignment: double word 0-463.21$ lt%syr Reference argument, Integer(4), Offset: 24, Alignment: double word 0-163.21$ lt%syr Reference argument, Integer(4), Offset: 24, Alignment: double word 0-283.21$ lt%syr Reference argument, Integer(4), Offset: 24, Alignment: double word 0-240.21$ lt%time Reference argument, Real(8), Offset: 112, Alignment: quadruple word 0-463.21$ 0-469.7 lt%time Reference argument, Real(8), Offset: 112, Alignment: quadruple word 0-283.21$ lt%time Reference argument, Real(8), Offset: 112, Alignment: quadruple word 0-260.21$ lt%time Reference argument, Real(8), Offset: 112, Alignment: quadruple word 0-135.21$ lt%time Reference argument, Real(8), Offset: 112, Alignment: quadruple word 0-79.21$ lt%time Reference argument, Real(8), Offset: 112, Alignment: quadruple word 0-163.21$ 0-202.18 0-218.9 lt%time Reference argument, Real(8), Offset: 112, Alignment: quadruple word 0-414.21$ lt%time Reference argument, Real(8), Offset: 112, Alignment: quadruple word 0-240.21$ lt%ts Reference argument, Integer(4), Offset: 60, Alignment: full word 0-79.21$ lt%ts Reference argument, Integer(4), Offset: 60, Alignment: full word 0-135.21$ 0-140.45 lt%ts Reference argument, Integer(4), Offset: 60, Alignment: full word 0-283.21$ lt%ts Reference argument, Integer(4), Offset: 60, Alignment: full word 0-414.21$ lt%ts Reference argument, Integer(4), Offset: 60, Alignment: full word 0-260.21$ lt%ts Reference argument, Integer(4), Offset: 60, Alignment: full word 0-163.21$ 0-168.19 lt%ts Reference argument, Integer(4), Offset: 60, Alignment: full word 0-463.21$ lt%ts Reference argument, Integer(4), Offset: 60, Alignment: full word 0-240.21$ 0-245.20 lt%tscount Reference argument, Integer(4), Offset: 64, Alignment: quadruple word 0-240.21$ lt%tscount Reference argument, Integer(4), Offset: 64, Alignment: quadruple word 0-260.21$ 0-265.16 lt%tscount Reference argument, Integer(4), Offset: 64, Alignment: quadruple word 0-163.21$ 0-205.3@ 0-205.16 lt%tscount Reference argument, Integer(4), Offset: 64, Alignment: quadruple word 0-463.21$ lt%tscount Reference argument, Integer(4), Offset: 64, Alignment: quadruple word 0-135.21$ 0-143.45 lt%tscount Reference argument, Integer(4), Offset: 64, Alignment: quadruple word 0-283.21$ lt%tscount Reference argument, Integer(4), Offset: 64, Alignment: quadruple word 0-79.21$ 0-84.4@ lt%tscount Reference argument, Integer(4), Offset: 64, Alignment: quadruple word 0-414.21$ lt%yr Reference argument, Integer(4), Offset: 80, Alignment: quadruple word 0-414.21$ 0-425.12 0-425.38 0-426.18 lt%yr Reference argument, Integer(4), Offset: 80, Alignment: quadruple word 0-283.21$ 0-293.9 lt%yr Reference argument, Integer(4), Offset: 80, Alignment: quadruple word 0-260.21$ lt%yr Reference argument, Integer(4), Offset: 80, Alignment: quadruple word 0-163.21$ 0-185.11 0-185.37 0-186.17 0-199.6@ 0-199.14 0-203.8 0-208.8 lt%yr Reference argument, Integer(4), Offset: 80, Alignment: quadruple word 0-135.21$ 0-144.45 lt%yr Reference argument, Integer(4), Offset: 80, Alignment: quadruple word 0-240.21$ lt%yr Reference argument, Integer(4), Offset: 80, Alignment: quadruple word 0-79.21$ lt%yr Reference argument, Integer(4), Offset: 80, Alignment: quadruple word 0-463.21$ lt%yyyymmdd Reference argument, Integer(4), Offset: 68, Alignment: full word 0-240.21$ lt%yyyymmdd Reference argument, Integer(4), Offset: 68, Alignment: full word 0-79.21$ lt%yyyymmdd Reference argument, Integer(4), Offset: 68, Alignment: full word 0-163.21$ lt%yyyymmdd Reference argument, Integer(4), Offset: 68, Alignment: full word 0-135.21$ lt%yyyymmdd Reference argument, Integer(4), Offset: 68, Alignment: full word 0-414.21$ lt%yyyymmdd Reference argument, Integer(4), Offset: 68, Alignment: full word 0-283.21$ lt%yyyymmdd Reference argument, Integer(4), Offset: 68, Alignment: full word 0-463.21$ lt%yyyymmdd Reference argument, Integer(4), Offset: 68, Alignment: full word 0-260.21$ masterproc Use associated, Public, Static, Logical(4), Offset: 8, Alignment: double word 0-33.23$ 0-88.8 maxt Use associated, Integer(4), Component of Derived type definition: lisdomain, Offset: 60, Alignment: full word 0-34.8$ mfile Use associated, Character(50), Component of Derived type definition: lisparameters, Offset: 20, Alignment: byte 0-34.8$ mina Use associated, Real(4), Component of Derived type definition: lisdomain, Offset: 64, Alignment: full word 0-34.8$ mn Reference argument, Integer(4), Offset: 0, Alignment: full word 0-572.25$ 0-567.44 0-588.8@ 0-588.11 0-592.8@ 0-592.11 0-594.14 0-595.8@ 0-595.11 0-599.14 0-600.8@ 0-600.11 0-648.45 mn Reference argument, Integer(4), Offset: 0, Alignment: full word 0-527.25$ 0-523.49 0-548.53 0-551.37 mn Reference argument, Integer(4), Offset: 0, Alignment: full word 0-656.25$ 0-653.49 0-681.5@ 0-684.21 0-693.34 mn Use associated, Integer(4), Component of Derived type definition: listime, Offset: 96, Alignment: full word 0-34.8$ mo Use associated, Integer(4), Component of Derived type definition: listime, Offset: 84, Alignment: full word 0-34.8$ mo Reference argument, Integer(4), Offset: 0, Alignment: full word 0-527.16$ 0-523.40 0-541.13 0-546.26 mo Reference argument, Integer(4), Offset: 0, Alignment: full word 0-656.16$ 0-653.40 0-685.5@ 0-687.21 0-688.8@ 0-688.11 0-690.5@ 0-690.8 0-691.17 0-698.23 0-700.11@ 0-700.14 0-701.15 0-702.14@ mo Reference argument, Integer(4), Offset: 0, Alignment: full word 0-572.16$ 0-567.35 0-620.25 0-621.19 0-622.8@ 0-622.11 0-627.14 0-628.11 0-633.11@ 0-636.11@ 0-639.14 0-640.8@ 0-640.11 0-644.14 0-645.8@ 0-645.11 0-648.36 mod Pure Intrinsic 0-664.9 0-664.28 0-665.15 mod Pure Intrinsic 0-425.8 0-425.34 0-426.14 mod Pure Intrinsic 0-185.7 0-185.33 0-186.13 mod Pure Intrinsic 0-533.9 0-533.28 0-534.15 mod Pure Intrinsic 0-613.9 0-613.28 0-614.15 modisdir Use associated, Character(40), Component of Derived type definition: lisparameters, Offset: 440, Alignment: byte 0-34.8$ mon Reference argument, Intent (OUT), Integer(4), Offset: 0, Alignment: full word 0-340.7$ 0-333.31 mon Reference argument, Intent (OUT), Integer(4), Offset: 0, Alignment: full word 0-315.7$ 0-308.30 mon Reference argument, Intent (OUT), Integer(4), Offset: 0, Alignment: full word 0-286.7$ 0-278.34 0-294.4@ mon Reference argument, Intent (OUT), Integer(4), Offset: 0, Alignment: full word 0-365.7$ 0-358.29 nch Use associated, Integer(4), Component of Derived type definition: lisdomain, Offset: 0, Alignment: full word 0-34.8$ nf Use associated, Integer(4), Component of Derived type definition: lisforcing, Offset: 12, Alignment: full word 0-34.8$ nforce Use associated, Integer(4), Component of Derived type definition: lisforcing, Offset: 8, Alignment: full word 0-34.8$ ngrid Use associated, Integer(4), Component of Derived type definition: lisdomain, Offset: 20, Alignment: full word 0-34.8$ nint Pure Intrinsic 0-678.11 nmif Use associated, Integer(4), Component of Derived type definition: lisforcing, Offset: 16, Alignment: full word 0-34.8$ nt Use associated, Integer(4), Component of Derived type definition: lisparameters, Offset: 4, Alignment: full word 0-34.8$ numoutf Use associated, Integer(4), Component of Derived type definition: lisoutput, Offset: 32, Alignment: full word 0-34.8$ o Use associated, Derived type: lisoutput, Component of Derived type definition: lisdec, Offset: 1144, Alignment: full word 0-34.8$ odir Use associated, Character(40), Component of Derived type definition: lisoutput, Offset: 52, Alignment: byte 0-34.8$ offset Reference argument, Optional, Intent (IN), Integer(4), Offset: 0, Alignment: full word 0-415.37$ 0-408.29 0-439.16 0-440.11 0-441.51 0-442.16 0-443.51 offset Reference argument, Optional, Intent (IN), Integer(4), Offset: 0, Alignment: full word 0-290.37$ 0-278.49 p Use associated, Derived type: lisparameters, Component of Derived type definition: lisdec, Offset: 424, Alignment: double word 0-34.8$ pda Use associated, Integer(4), Component of Derived type definition: listime, Offset: 108, Alignment: full word 0-34.8$ po1file Use associated, Character(40), Component of Derived type definition: lisparameters, Offset: 200, Alignment: byte 0-34.8$ po2file Use associated, Character(40), Component of Derived type definition: lisparameters, Offset: 240, Alignment: byte 0-34.8$ po3file Use associated, Character(40), Component of Derived type definition: lisparameters, Offset: 280, Alignment: byte 0-34.8$ precision Use associated, Nonintrinsic Module 0-35.8$ 0-35.8 prvmo Automatic, Integer(4), Offset: 0, Alignment: full word 0-576.13$ 0-627.8@ 0-628.20@ 0-630.19 0-632.11 0-633.14 0-636.14 r4 Use associated, Public, Parameter, Integer(4) 0-35.8$ r8 Use associated, Public, Parameter, Integer(4) 0-35.8$ 0-419.9 radsrc Use associated, Integer(4), Component of Derived type definition: lisforcing, Offset: 72, Alignment: full word 0-34.8$ rbias Use associated, Integer(4), Component of Derived type definition: lisassimil, Offset: 4, Alignment: full word 0-34.8$ rcgm Use associated, Integer(4), Component of Derived type definition: lisoutput, Offset: 40, Alignment: full word 0-34.8$ rctm Use associated, Integer(4), Component of Derived type definition: lisoutput, Offset: 48, Alignment: full word 0-34.8$ rdbc Use associated, Integer(4), Component of Derived type definition: lisassimil, Offset: 12, Alignment: full word 0-34.8$ real Pure Intrinsic 0-436.40 0-436.54 0-437.9 0-437.31 0-441.46 0-443.46 ribc Use associated, Integer(4), Component of Derived type definition: lisassimil, Offset: 8, Alignment: full word 0-34.8$ rpsas Use associated, Integer(4), Component of Derived type definition: lisassimil, Offset: 0, Alignment: full word 0-34.8$ rsdbc Use associated, Integer(4), Component of Derived type definition: lisassimil, Offset: 16, Alignment: full word 0-34.8$ rstflag Use associated, Integer(4), Component of Derived type definition: lisforcing, Offset: 20, Alignment: full word 0-34.8$ safile Use associated, Character(40), Component of Derived type definition: lisparameters, Offset: 120, Alignment: byte 0-34.8$ saiflag Use associated, Integer(4), Component of Derived type definition: lisparameters, Offset: 16, Alignment: full word 0-34.8$ saitime Use associated, Real(8), Component of Derived type definition: lisparameters, Offset: 568, Alignment: double word 0-34.8$ sda Use associated, Integer(4), Component of Derived type definition: listime, Offset: 16, Alignment: full word 0-34.8$ sdoy Use associated, Integer(4), Component of Derived type definition: listime, Offset: 4, Alignment: full word 0-34.8$ seconds Reference argument, Intent (OUT), Integer(4), Offset: 0, Alignment: full word 0-392.7$ 0-384.32 selected_int_kind Use associated, Public, Pure Intrinsic 0-35.8$ selected_real_kind Use associated, Public, Pure Intrinsic 0-35.8$ sgmt Use associated, Real(4), Component of Derived type definition: listime, Offset: 136, Alignment: full word 0-34.8$ shortflag Use associated, Integer(4), Component of Derived type definition: lisforcing, Offset: 36, Alignment: full word 0-34.8$ shr Use associated, Integer(4), Component of Derived type definition: listime, Offset: 12, Alignment: full word 0-34.8$ sifile Use associated, Character(40), Component of Derived type definition: lisparameters, Offset: 360, Alignment: byte 0-34.8$ slfile Use associated, Character(40), Component of Derived type definition: lisparameters, Offset: 320, Alignment: byte 0-34.8$ smn Use associated, Integer(4), Component of Derived type definition: listime, Offset: 8, Alignment: full word 0-34.8$ smo Use associated, Integer(4), Component of Derived type definition: listime, Offset: 20, Alignment: full word 0-34.8$ soil Use associated, Integer(4), Component of Derived type definition: lisdomain, Offset: 8, Alignment: full word 0-34.8$ soil_griddesc Use associated, Real(4) (1:6), Component of Derived type definition: lisdomain, Offset: 272, Alignment: full word 0-34.8$ spmdmod Use associated, Nonintrinsic Module 0-33.8$ 0-33.8 ss Reference argument, Integer(4), Offset: 0, Alignment: full word 0-527.28$ 0-523.52 0-548.35 0-551.20 ss Reference argument, Integer(4), Offset: 0, Alignment: full word 0-572.28$ 0-567.47 0-585.5@ 0-585.8 0-586.14 0-587.8@ 0-587.11 0-590.14 0-591.8@ 0-591.11 0-648.48 ss Automatic, Integer(4), Offset: 0, Alignment: full word 0-656.28$ 0-684.5@ 0-693.18 ss Use associated, Integer(4), Component of Derived type definition: listime, Offset: 100, Alignment: full word 0-34.8$ sss Use associated, Integer(4), Component of Derived type definition: listime, Offset: 0, Alignment: full word 0-34.8$ startcode Use associated, Integer(4), Component of Derived type definition: lisoutput, Offset: 24, Alignment: full word 0-34.8$ syr Use associated, Integer(4), Component of Derived type definition: listime, Offset: 24, Alignment: full word 0-34.8$ t Use associated, Derived type: listime, Component of Derived type definition: lisdec, Offset: 1000, Alignment: double word 0-34.8$ tick Public, Module Subroutine 0-567.14$ 0-58.7$ time Reference argument, Real(8), Offset: 0, Alignment: double word 0-570.12$ 0-567.19 0-648.20 time Reference argument, Real(8), Offset: 0, Alignment: double word 0-528.12$ 0-523.24 0-548.5@ time Use associated, Real(8), Component of Derived type definition: listime, Offset: 112, Alignment: double word 0-34.8$ time Reference argument, Real(8), Offset: 0, Alignment: double word 0-657.12$ 0-653.24 0-661.16 0-662.16 time2date Public, Module Subroutine 0-653.14$ time_manager Nonintrinsic Module 0-31.8$ timemgr_init Public, Module Subroutine 0-76.12$ 0-44.7$ timemgr_print Public, Module Subroutine 0-132.12$ 0-89.12 timemgr_read_restart Public, Module Subroutine 0-503.12$ 0-56.7$ timemgr_restart Public, Module Subroutine 0-109.12$ 0-57.7$ timemgr_write_restart Public, Module Subroutine 0-483.12$ 0-55.7$ tmp Automatic, Real(8), Offset: 0, Alignment: double word 0-657.17$ 0-662.5@ 0-676.18 0-677.5@ 0-677.18 0-678.17 0-679.5@ 0-679.17 0-681.17 0-682.5@ 0-682.17 0-684.17 tod Reference argument, Intent (OUT), Integer(4), Offset: 0, Alignment: full word 0-342.7$ 0-333.41 tod Reference argument, Intent (OUT), Integer(4), Offset: 0, Alignment: full word 0-317.7$ 0-308.40 tod Reference argument, Intent (OUT), Integer(4), Offset: 0, Alignment: full word 0-288.7$ 0-278.44 0-296.4@ tod Reference argument, Intent (OUT), Integer(4), Offset: 0, Alignment: full word 0-367.7$ 0-358.39 ts Reference argument, Integer(4), Offset: 0, Alignment: full word 0-572.31$ 0-567.50 0-585.11 ts Use associated, Integer(4), Component of Derived type definition: listime, Offset: 60, Alignment: full word 0-34.8$ tscount Use associated, Integer(4), Component of Derived type definition: listime, Offset: 64, Alignment: full word 0-34.8$ udef Use associated, Real(4), Component of Derived type definition: lisdomain, Offset: 68, Alignment: full word 0-34.8$ vclass Use associated, Integer(4), Component of Derived type definition: lisparameters, Offset: 8, Alignment: full word 0-34.8$ vfile Use associated, Character(50), Component of Derived type definition: lisparameters, Offset: 70, Alignment: byte 0-34.8$ wfor Use associated, Integer(4), Component of Derived type definition: lisoutput, Offset: 0, Alignment: full word 0-34.8$ wout Use associated, Integer(4), Component of Derived type definition: lisoutput, Offset: 8, Alignment: full word 0-34.8$ wparam Use associated, Integer(4), Component of Derived type definition: lisoutput, Offset: 16, Alignment: full word 0-34.8$ wsingle Use associated, Integer(4), Component of Derived type definition: lisoutput, Offset: 12, Alignment: full word 0-34.8$ wtil Use associated, Integer(4), Component of Derived type definition: lisoutput, Offset: 4, Alignment: full word 0-34.8$ yr Use associated, Integer(4), Component of Derived type definition: listime, Offset: 80, Alignment: full word 0-34.8$ yr Reference argument, Integer(4), Offset: 0, Alignment: full word 0-527.13$ 0-523.37 0-533.13 0-533.32 0-534.19 0-548.18 yr Reference argument, Intent (OUT), Integer(4), Offset: 0, Alignment: full word 0-339.7$ 0-333.27 yr Reference argument, Intent (OUT), Integer(4), Offset: 0, Alignment: full word 0-314.7$ 0-308.26 yr Reference argument, Integer(4), Offset: 0, Alignment: full word 0-656.13$ 0-653.37 0-661.5@ 0-664.13 0-664.32 0-665.19 0-676.22 0-677.22 0-703.14@ 0-703.17 yr Reference argument, Intent (OUT), Integer(4), Offset: 0, Alignment: full word 0-364.7$ 0-358.25 yr Reference argument, Intent (OUT), Integer(4), Offset: 0, Alignment: full word 0-285.7$ 0-278.30 0-293.4@ yr Reference argument, Integer(4), Offset: 0, Alignment: full word 0-572.13$ 0-567.32 0-613.13 0-613.32 0-614.19 0-634.11@ 0-634.14 0-641.8@ 0-641.11 0-646.8@ 0-646.11 0-648.33 yrdays Automatic, Integer(4), Offset: 0, Alignment: full word 0-527.31$ 0-535.8@ 0-537.8@ 0-546.8 0-549.51 yrdays Automatic, Integer(4), Offset: 0, Alignment: full word 0-656.31$ 0-666.8@ 0-668.8@ 0-670.9 0-676.33 0-677.33 yyyymmdd Use associated, Integer(4), Component of Derived type definition: listime, Offset: 68, Alignment: full word 0-34.8$ ** time_manager === End of Compilation 1 === >>>>> FILE TABLE SECTION <<<<< FILE CREATION FROM FILE NO FILENAME DATE TIME FILE LINE 0 ../core/time_manager.F 03/09/11 11:03:31 >>>>> 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....................................... 706 1501-510 Compilation successful for file time_manager.F. 1501-543 Object file created.