
                               					20-May-1983 10:29:02	VAX-11 FORTRAN V3.2-37              Page   1
								10-May-1983 10:08:38	CAD$VOLSET:[GARY.STATS.SOURCE]REPLAY.FOR;8  

0001    !
0002    !			  COPYRIGHT (c) 1982 BY
0003    !	      MOSTEK CORPORATION, CARROLLTON TX
0004    !
0005    ! This software is furnished under a license and may be used and  copied
0006    ! only  in  accordance  with  the  terms  of  such  license and with the
0007    ! inclusion of the above copyright notice.  This software or  any  other
0008    ! copies  thereof may not be provided or otherwise made available to any
0009    ! other person.  No title to and ownership of  the  software  is  hereby
0010    ! transferred.
0011    !
0012    ! The information in this software is subject to change  without  notice
0013    ! and  should  not  be  construed  as  a commitment by MOSTEK
0014    ! CORPORATION.
0015    !
0016    ! MOSTEK assumes no responsibility for the use or  reliability  of  its
0017    ! software on equipment which is not supplied by MOSTEK.
0018    !
0019     
0020    !++
0021    ! FACILITY:
0022    !   MOSTEK CORPORATION
0023    !
0024    ! ABSTRACT: Replay the components collected by MOUSE
0025    !   
0026    !
0027    ! ENVIRONMENT: VAX VMS unpriv
0028    !   
0029    !
0030    ! AUTHOR: Gary Smith, CREATION DATE: 8/23/1982
0031    !
0032    ! MODIFIED BY:
0033    !
0034    !--
0035    !
0036    ! TABLE OF CONTENTS:
0037    !
0038    !
0039    ! INCLUDE FILES: statsubs.for
0040    !                defrec.for
0041    !                mousesubs.for
0042    !
0043    !
0044    ! MACROS: none
0045    !
0046    !
0047    ! EQUATED SYMBOLS: see statsubs.for
0048    !                      mousesubs.for
0049    !                      defrec.for
0050    !
0051    !
0052    ! EXTERNAL REFERENCES: read_nest
0053    !
0054     
0055    !++
0056    ! FUNCTIONAL DESCRIPTION: REPLAY replays the information gleaned from
0057    !                         the RATSNEST file and diplays it to the user

                               					20-May-1983 10:29:02	VAX-11 FORTRAN V3.2-37              Page   2
								10-May-1983 10:08:38	CAD$VOLSET:[GARY.STATS.SOURCE]REPLAY.FOR;8  

0058    !                         in a hopefully comprehensible form. The RATSNEST
0059    !                         file is keyed by time. REPLAY uses start_time as
0060    !                         the beginning with keyed read. It then reads 
0061    !                         sequentially until the key returned is greater
0062    !                         than the end_time.
0063    !
0064    !
0065    !
0066    ! FORMAL PARAMETERS: start_time -> the beginning key to start reading
0067    !                    end_time   -> the end point of reading
0068    !                    category   -> the base class of option
0069    !                    type       -> the particular thing to plot
0070    !
0071    !
0072    ! IMPLICIT INPUTS: info read from the RATSNEST file
0073    !
0074    !
0075    !
0076    ! IMPLICIT OUTPUTS: a replay of the values gathered
0077    !
0078    !
0079    !
0080    ! ROUTINE VALUE and
0081    ! COMPLETION CODES: none
0082    !
0083    !
0084    !
0085    ! SIDE EFFECTS: none to date
0086    !
0087    !
0088    !
0089    !--
0090              SUBROUTINE REPLAY( start_time, end_time, category, type )
0091     
0092              include 'mousesubs.for'
0295              include 'statsubs.for'
0348              include 'defrec.for'
0450              include 'catdef.for'
0681     
0682              common / io_com / in_unit, out_unit 
0683              common / category / cat_state, cat_title, cat_len
0684     
0685              character * 16  start_time, end_time, nest_key
0686              character * 16  sav_start_time, sav_end_time, ascii_mid_nite
0687              character * 23  begin, finish, ascii_start_time
0688              character * 23  key_to_date
0689              character * 80  x_title, y_title
0690              character * 63  cat_title(rec_size)
0691     
0692              integer category, count
0693              integer in_unit, out_unit, type
0694              integer cat_state(max_cat,max_ent), cat_len(rec_size)
0695     
0696              real     maximum, minimum
0697     
0698              nest_key = start_time
0699     

REPLAY                         					20-May-1983 10:29:02	VAX-11 FORTRAN V3.2-37              Page   3
								10-May-1983 10:08:38	CAD$VOLSET:[GARY.STATS.SOURCE]REPLAY.FOR;8  

0700    !++
0701    ! replay the particular category and type
0702    !--
0703     
0704              continue
0705     
0706              maximum = 1.0*10E-10
0707              minimum = maxint
0708              call read_nest( keyed_read, nest_key, ios )
0709              sav_start_time = nest_key
0710              begin = key_to_date( nest_key )
0711     
0712     
0713    !++
0714    ! fiddle about so that the thing is centered
0715    !--
0716     
0717              iindxx = cat_state(category, type)
0718              column = 39 - MK$LENGTH(cat_title(iindxx)) / 2
0719              write( out_unit, 100 ) cat_title(iindxx)
0720         .           (1:MK$LENGTH(cat_title(iindxx)))
0721    100       format( /, ' ', t<column>, A )
0722              write( out_unit, 105 )
0723    105       format( /, t11, 'Time', t33, 'Current', t52, 'Max', t67,
0724         .            'Min', / )
0725    !++
0726    ! Run thru the current nest file until we overstep our bounds.
0727    ! Note the special-casing of response.
0728    !--
0729     
0730              do while ( key_compare(end_time, nest_key) .eq. greater )
0731                 if ( cat_state(category,type) .ne. c_response) then
0732                    current_val = stats_rec(cat_state(category,type))
0733                 else
0734                    current_val = real(rec_response) / 100.0
0735                 end if
0736                 if ( current_val .gt. maximum ) 
0737         .          maximum = current_val
0738     
0739                 if ( current_val .lt. minimum ) 
0740         .          minimum = current_val
0741     
0742    !++
0743    ! write out the time and the current value, maximum and minimum
0744    !--
0745     
0746                 write( out_unit, 110 ) begin, current_val, maximum,
0747         .                              minimum
0748    110          format( ' ', A t30, f10.2, t45, f10.2, t60, f10.2 )
0749                 call read_nest( seq_read, nest_key, ios )
0750                 begin = key_to_date( nest_key )
0751                 if ( ios .eq. eof ) goto 1001
0752              end do
0753     
0754    1001      continue
0755     
0756              return

REPLAY                         					20-May-1983 10:29:02	VAX-11 FORTRAN V3.2-37              Page   4
								10-May-1983 10:08:38	CAD$VOLSET:[GARY.STATS.SOURCE]REPLAY.FOR;8  

0757     
0758             end




PROGRAM SECTIONS

    Name				 Bytes   Attributes

  0 $CODE                                  475   PIC CON REL LCL   SHR   EXE   RD NOWRT LONG
  1 $PDATA                                  76   PIC CON REL LCL   SHR NOEXE   RD NOWRT LONG
  2 $LOCAL                                 444   PIC CON REL LCL NOSHR NOEXE   RD   WRT LONG
  3 REC_COMMON                             348   PIC OVR REL GBL   SHR NOEXE   RD   WRT LONG
  4 IO_COM                                   8   PIC OVR REL GBL   SHR NOEXE   RD   WRT LONG
  5 CATEGORY                              6693   PIC OVR REL GBL   SHR NOEXE   RD   WRT LONG

    Total Space Allocated                 8044


ENTRY POINTS

    Address  Type  Name                                        References

  0-00000000       REPLAY                                         90     


VARIABLES

    Address  Type  Name                            Attributes  References

  2-00000030  CHAR ASCII_MID_NITE                                686     
  2-0000006E  CHAR ASCII_START_TIME                              687     
  2-00000040  CHAR BEGIN                                         687       710=      746       750=    
 AP-0000000C@ I*4  CATEGORY                                       90       692       717       731       732     
  2-0000013C  R*4  COLUMN                                        718=      721     

  2-00000128  I*4  COUNT                                         692     
  2-00000140  R*4  CURRENT_VAL                                   732=      734=      736(2)    739(2)    746     
 AP-00000008@ CHAR END_TIME                                       90       685       730A    
  2-00000057  CHAR FINISH                                        687     
  2-00000138  I*4  IINDXX                                        717=      718       719(2)  

  4-00000000  I*4  IN_UNIT                         COMM          682       693     
  2-00000134  I*4  IOS                                           708A      749A      751     
  2-0000012C  R*4  MAXIMUM                                       696       706=      736(2)=   746     
  2-00000130  R*4  MINIMUM                                       696       707=      739(2)=   746     
  2-00000000  CHAR NEST_KEY                                      685       698=      708A      709       710A      730A    
							         749A      750A    

  4-00000004  I*4  OUT_UNIT                        COMM          682       693       719       722       746     
  3-00000108  I*4  REC_RESPONSE                    COMM EQUIV    351       408       734     
  2-00000020  CHAR SAV_END_TIME                                  686     
  2-00000010  CHAR SAV_START_TIME                                686       709=    
 AP-00000004@ CHAR START_TIME                                     90       685       698     

 AP-00000010@ I*4  TYPE                                           90       693       717       731       732     

REPLAY                         					20-May-1983 10:29:02	VAX-11 FORTRAN V3.2-37              Page   5
								10-May-1983 10:08:38	CAD$VOLSET:[GARY.STATS.SOURCE]REPLAY.FOR;8  

  2-00000085  CHAR X_TITLE                                       689     
  2-000000D5  CHAR Y_TITLE                                       689     


ARRAYS

    Address  Type  Name                            Attributes        Bytes  Dimensions       References

  5-000018C9  I*4  CAT_LEN                         COMM               348  (87)                683       694     
  5-00000000  I*4  CAT_STATE                       COMM               864  (12, 18)            683       694       717     
											       731       732     
  5-00000360  CHAR CAT_TITLE                       COMM              5481  (87)                683       690       718A    
											       719(2)A 
  3-00000000  I*4  REC_CPU_MODES                   COMM EQUIV          36  (9)                 353       365     
  3-00000024  I*4  REC_FCP                         COMM EQUIV          20  (5)                 359       372     

  3-00000120  I*4  REC_LOCK_MODES                  COMM EQUIV          28  (7)                 361       427     
  3-00000080  I*4  REC_MEM_MODES                   COMM EQUIV           8  (2)                 354       377     
  3-00000038  I*4  REC_MISC                        COMM EQUIV          72  (18)                356       374     
  3-0000010C  I*4  REC_NET_MODES                   COMM EQUIV          20  (5)                 360       417     
  3-00000088  I*4  REC_PGFLT                       COMM EQUIV          28  (7)                 358       381     

  3-0000013C  I*4  REC_POOL_MODES                  COMM EQUIV          32  (8)                 362       438     
  3-000000A4  I*4  REC_SCH_STATE                   COMM EQUIV          56  (14)                357       386     
  3-000000DC  I*4  REC_SWAP                        COMM EQUIV          36  (9)                 355       392     
  3-00000100  I*4  REC_TIME                        COMM EQUIV           8  (2)                 352       399     
  3-00000000  I*4  STATS_REC                       COMM EQUIV         348  (87)                349       363       365     
											       372       374       377     
											       381       386       392     
											       399       408       417     
											       427       438       732     



PARAMETER CONSTANTS

  Type  Name                                                   References

   I*2  ARRLOCPK                                                 239#      589     
   I*2  ARRTRAPK                                                 240#      593     
   CHAR ASCII_DELTA_TIME                                          97        98#    
   I*2  BIGHOLE                                                  273#      656     
   I*2  BJOBCNT                                                  129#      462     

   I*2  BUFIO                                                    150#      478     
   I*2  CEF                                                      196#      530     
   I*2  COLPG                                                    194#      526     
   I*2  COM                                                      205#      548     
   I*2  COMO                                                     206#      550     

   I*2  COMPAT                                                   127#      460     
   I*2  CPU_SIZE                                                 132#      289       353       372       374       377     
							         381       386       392       399       408       417     
							         427       438       468       469       470       471     
							         472       477       478       479       480       481     
							         482       483       484       485       486       487     
							         488       489       490       491       492       493     

REPLAY                         					20-May-1983 10:29:02	VAX-11 FORTRAN V3.2-37              Page   6
								10-May-1983 10:08:38	CAD$VOLSET:[GARY.STATS.SOURCE]REPLAY.FOR;8  

							         494       499       501       507       509       511     
							         513       515       517       519       526       528     
							         530       532       534       536       538       540     
							         542       544       546       548       550       552     
							         559       562       565       568       571       574     
							         582       589       593       597       601       605     
							         614       618       622       626       630       634     
							         638       648       652       656       660       664     
							         668       672       676     
   I*2  CUR                                                      207#      552     
   I*2  C_ARRLOCPK                                               589#    
   I*2  C_ARRTRAPK                                               593#    

   I*2  C_BIGHOLE                                                656#    
   I*2  C_BJOBCNT                                                462#    
   I*2  C_BUFIO                                                  478#    
   I*2  C_CACHE                                                  469#    
   I*2  C_CALL                                                   468#    

   I*2  C_CEF                                                    530#    
   I*2  C_COLPG                                                  526#    
   I*2  C_COM                                                    548#    
   I*2  C_COMO                                                   550#    
   I*2  C_COMPAT                                                 460#    

   I*2  C_CPU                                                    470#    
   I*2  C_CUR                                                    552#    
   I*2  C_DEPLOCPK                                               597#    
   I*2  C_DEQ                                                    622#    
   I*2  C_DIRHIT                                                 487#    

   I*2  C_DIRIO                                                  477#    
   I*2  C_DIRMISS                                                488#    
   I*2  C_DLCKFND                                                626#    
   I*2  C_DLCKSRCH                                               630#    
   I*2  C_DZROFLTS                                               507#    

   I*2  C_ENQCVT                                                 634#    
   I*2  C_ENQNEW                                                 614#    
   I*2  C_ENQNOTQD                                               638#    
   I*2  C_ENQWAIT                                                618#    
   I*2  C_EXEC                                                   457#    

   I*2  C_EXTHIT                                                 489#    
   I*2  C_EXTMISS                                                490#    
   I*2  C_FAULTS                                                 509#    
   I*2  C_FIDHIT                                                 491#    
   I*2  C_FIDMISS                                                492#    

   I*2  C_FPG                                                    546#    
   I*2  C_FREECNT                                                499#    
   I*2  C_HIB                                                    538#    
   I*2  C_HIBO                                                   540#    
   I*2  C_HISWPCNT                                               574#    

   I*2  C_HIT                                                    484#    
   I*2  C_HOLECNT                                                652#    

REPLAY                         					20-May-1983 10:29:02	VAX-11 FORTRAN V3.2-37              Page   7
								10-May-1983 10:08:38	CAD$VOLSET:[GARY.STATS.SOURCE]REPLAY.FOR;8  

   I*2  C_HOLESUM                                                668#    
   I*2  C_HOSWPCNT                                               571#    
   I*2  C_IDLE                                                   461#    

   I*2  C_IJOBCNT                                                463#    
   I*2  C_INT                                                    459#    
   I*2  C_IRPCNT                                                 648#    
   I*2  C_ISPAGCNT                                               559#    
   I*2  C_ISWPCNT                                                562#    

   I*2  C_KERNEL                                                 455#    
   I*2  C_LEF                                                    534#    
   I*2  C_LEFO                                                   536#    
   I*2  C_LOGNAM                                                 479#    
   I*2  C_LRPCNT                                                 672#    

   I*2  C_MBREADS                                                480#    
   I*2  C_MBWRITES                                               481#    
   I*2  C_MFYCNT                                                 501#    
   I*2  C_MWAIT                                                  528#    
   I*2  C_OPEN                                                   486#    

   I*2  C_OPENS                                                  485#    
   I*2  C_OSWPCNT                                                568#    
   I*2  C_PFW                                                    532#    
   I*2  C_PREADIO                                                511#    
   I*2  C_PREADS                                                 515#    

   I*2  C_PROCCNT                                                565#    
   I*2  C_PWRITES                                                517#    
   I*2  C_PWRITIO                                                513#    
   I*2  C_QUOHIT                                                 493#    
   I*2  C_QUOMISS                                                494#    

   I*2  C_RCVBUFFL                                               601#    
   I*2  C_RDFLTS                                                 519#    
   I*2  C_READ                                                   471#    
   I*2  C_RESPONSE                                               582#      731     
   I*2  C_SMALLCNT                                               664#    

   I*2  C_SMALLHOLE                                              660#    
   I*2  C_SPLIT                                                  483#    
   I*2  C_SRPCNT                                                 676#    
   I*2  C_SUPER                                                  456#    
   I*2  C_SUSP                                                   542#    

   I*2  C_SUSPO                                                  544#    
   I*2  C_TRCNGLOS                                               605#    
   I*2  C_TURN                                                   482#    
   I*2  C_USER                                                   458#    
   I*2  C_WRITE                                                  472#    

   I*2  DEPLOCPK                                                 241#      597     
   I*2  DEQ                                                      255#      622     
   I*2  DIRHIT                                                   159#      487     
   I*2  DIRIO                                                    149#      477     
   I*2  DIRMISS                                                  160#      488     

REPLAY                         					20-May-1983 10:29:02	VAX-11 FORTRAN V3.2-37              Page   8
								10-May-1983 10:08:38	CAD$VOLSET:[GARY.STATS.SOURCE]REPLAY.FOR;8  


   I*2  DLCKFND                                                  256#      626     
   I*2  DLCKSRCH                                                 257#      630     
   I*2  DZROFLTS                                                 181#      507     
   I*2  ENQCVT                                                   258#      634     
   I*2  ENQNEW                                                   253#      614     

   I*2  ENQNOTQD                                                 259#      638     
   I*2  ENQWAIT                                                  254#      618     
   I*2  EOF                                                      347#      751     
   I*2  EQUAL                                                    322#    
   I*2  EXEC                                                     124#      457     

   I*2  EXTHIT                                                   161#      489     
   I*2  EXTMISS                                                  162#      490     
   I*2  FAILURE                                                  307#    
   I*2  FAULTS                                                   182#      509     
   I*2  FCP_CACHE                                                139#      469     

   I*2  FCP_CALLS                                                138#      468     
   I*2  FCP_CPU                                                  140#      470     
   I*2  FCP_READ                                                 141#      471     
   I*2  FCP_SIZE                                                 144#      289       359       374       377       381     
							         386       392       399       408       417       427     
							         438       477       478       479       480       481     
							         482       483       484       485       486       487     
							         488       489       490       491       492       493     
							         494       499       501       507       509       511     
							         513       515       517       519       526       528     
							         530       532       534       536       538       540     
							         542       544       546       548       550       552     
							         559       562       565       568       571       574     
							         582       589       593       597       601       605     
							         614       618       622       626       630       634     
							         638       648       652       656       660       664     
							         668       672       676     
   I*2  FCP_WRITE                                                142#      472     

   I*2  FIDHIT                                                   163#      491     
   I*2  FIDMISS                                                  164#      492     
   I*2  FPG                                                      204#      546     
   I*2  FREECNT                                                  173#      499     
   I*2  GETDVI_EF                                                112#    

   I*2  GREATER                                                  323#      730     
   I*2  HIB                                                      200#      538     
   I*2  HIBO                                                     201#      540     
   I*2  HISWPCNT                                                 219#      574     
   I*2  HIT                                                      156#      484     

   I*2  HOLECNT                                                  272#      652     
   I*2  HOLESUM                                                  276#      668     
   I*2  HOSWPCNT                                                 218#      571     
   I*2  IDLE                                                     128#      461     
   I*2  IJOBCNT                                                  130#      463     

   I*2  INT                                                      126#      459     

REPLAY                         					20-May-1983 10:29:02	VAX-11 FORTRAN V3.2-37              Page   9
								10-May-1983 10:08:38	CAD$VOLSET:[GARY.STATS.SOURCE]REPLAY.FOR;8  

   I*2  IRPCNT                                                   271#      648     
   I*2  ISPAGCNT                                                 214#      559     
   I*2  ISWPCNT                                                  215#      562     
   I*2  KERNEL                                                   122#      455     

   I*2  KEYED_READ                                               313#      708     
   I*2  KEY_SIZE                                                 118#    
   I*2  LEF                                                      198#      534     
   I*2  LEFO                                                     199#      536     
   I*2  LESS                                                     321#    

   I*2  LOCK_SIZE                                                264#      289       361       438       648       652     
							         656       660       664       668       672       676     
   I*2  LOGNAM                                                   151#      479     
   I*2  LRPCNT                                                   277#      672     
   I*4  MAXINT                                                   346#      707     
   I*2  MAX_CAT                                                  329#      694     

   I*2  MAX_ENT                                                  330#      694     
   I*2  MBREADS                                                  152#      480     
   I*2  MBWRITES                                                 153#      481     
   I*2  MEM_SIZE                                                 176#      289       354       381       386       392     
							         399       408       417       427       438       507     
							         509       511       513       515       517       519     
							         526       528       530       532       534       536     
							         538       540       542       544       546       548     
							         550       552       559       562       565       568     
							         571       574       582       589       593       597     
							         601       605       614       618       622       626     
							         630       634       638       648       652       656     
							         660       664       668       672       676     
   I*2  MFYCNT                                                   174#      501     

   R*4  MINUTES_IN_DAY                                           340#    
   R*4  MINUTES_IN_HOUR                                          337#    
   I*2  MISC_SIZE                                                168#      289       356       377       381       386     
							         392       399       408       417       427       438     
							         499       501       507       509       511       513     
							         515       517       519       526       528       530     
							         532       534       536       538       540       542     
							         544       546       548       550       552       559     
							         562       565       568       571       574       582     
							         589       593       597       601       605       614     
							         618       622       626       630       634       638     
							         648       652       656       660       664       668     
							         672       676     
   I*2  MWAIT                                                    195#      528     
   I*2  NEST_CLOSE                                               315#    

   I*2  NEST_OPEN                                                312#    
   I*2  NET_SIZE                                                 248#      289       360       427       438       614     
							         618       622       626       630       634       638     
							         648       652       656       660       664       668     
							         672       676     
   I*2  NUM_MODES                                                133#    
   I*2  OPEN                                                     158#      486     
   I*2  OPENS                                                    157#      485     

REPLAY                         					20-May-1983 10:29:02	VAX-11 FORTRAN V3.2-37              Page  10
								10-May-1983 10:08:38	CAD$VOLSET:[GARY.STATS.SOURCE]REPLAY.FOR;8  


   I*2  OSWPCNT                                                  217#      568     
   I*2  PFW                                                      197#      532     
   I*2  PGFLT_SIZE                                               189#      289       358       386       392       399     
							         408       417       427       438       526       528     
							         530       532       534       536       538       540     
							         542       544       546       548       550       552     
							         559       562       565       568       571       574     
							         582       589       593       597       601       605     
							         614       618       622       626       630       634     
							         638       648       652       656       660       664     
							         668       672       676     
   I*2  POOL_SIZE                                                284#      289       362     
   I*2  PREADIO                                                  183#      511     

   I*2  PREADS                                                   185#      515     
   I*2  PROCCNT                                                  216#      565     
   I*2  PWRITES                                                  186#      517     
   I*2  PWRITIO                                                  184#      513     
   I*2  QUOHIT                                                   165#      493     

   I*2  QUOMISS                                                  166#      494     
   I*2  RCVBUFFL                                                 242#      601     
   I*2  RDFLTS                                                   187#      519     
   I*2  REC_SIZE                                                 289#      363       690       694     
   I*2  RES                                                      234#      582     

   I*2  RESPONSE_SIZE                                            233#      289       417       427       438       589     
							         593       597       601       605       614       618     
							         622       626       630       634       638       648     
							         652       656       660       664       668       672     
							         676     
   I*2  SCH_SIZE                                                 209#      289       357       392       399       408     
							         417       427       438       559       562       565     
							         568       571       574       582       589       593     
							         597       601       605       614       618       622     
							         626       630       634       638       648       652     
							         656       660       664       668       672       676     
   R*4  SECONDS_IN_DAY                                           339#    
   R*4  SECONDS_IN_HOUR                                          338#    
   R*4  SECONDS_IN_MINUTE                                        336#    

   I*2  SEQ_READ                                                 314#      749     
   I*2  SMALLCNT                                                 275#      664     
   I*2  SMALLHOLE                                                274#      660     
   I*2  SPLIT                                                    155#      483     
   I*2  SRPCNT                                                   278#      676     

   CHAR STANDARD_HELP_LIB                                        300       301#    
   CHAR STANDARD_NEST_FILE                                       104       105#    
   I*2  SUCCESS                                                  306#    
   I*2  SUPER                                                    123#      456     
   I*2  SUSP                                                     202#      542     

   I*2  SUSPO                                                    203#      544     
   I*2  SWAP_SIZE                                                221#      289       355       399       408       417     
							         427       438       582       589       593       597     

REPLAY                         					20-May-1983 10:29:02	VAX-11 FORTRAN V3.2-37              Page  11
								10-May-1983 10:08:38	CAD$VOLSET:[GARY.STATS.SOURCE]REPLAY.FOR;8  

							         601       605       614       618       622       626     
							         630       634       638       648       652       656     
							         660       664       668       672       676     
   I*2  SWAP_SPARES                                              222#    
   I*2  TIME_SIZE                                                227#      289       352       408       417       427     
							         438       582       589       593       597       601     
							         605       614       618       622       626       630     
							         634       638       648       652       656       660     
							         664       668       672       676     
   I*2  TRCNGLOS                                                 243#      605     

   I*2  TURN                                                     154#      482     
   I*2  USER                                                     125#      458     
   I*2  WAIT_EF                                                  111#    


LABELS

    Address   Label                                            References

  1-00000008  100'                                               719       721#    
  1-00000014  105'                                               722       723#    
  1-00000038  110'                                               746       748#    
  0-000001D0  1001                                               751       754#    


FUNCTIONS AND SUBROUTINES REFERENCED

  Type  Name                                                   References

   I*4  KEY_COMPARE                                              730     
   CHAR KEY_TO_DATE                                              688       710       750     
   I*4  MK$LENGTH                                                718       719     
        READ_NEST                                                708       749     


  +----------------------------------------------+
  |           KEY TO REFERENCE FLAGS             |
  |   =   - Value Modified                       |
  |   #   - Defining Reference                   |
  |   A   - Actual Argument, possibly modified   |
  |   D   - Data Initialization                  |
  |  (n)  - Number of occurrences on line        |
  +----------------------------------------------+



COMMAND QUALIFIERS

  FORTRAN /DEBUG/OBJECT=OBJ:REPLAY/LIST=LIS:REPLAY/CONT=99/CROSS/NOOPT SRC:REPLAY

  /CHECK=(NOBOUNDS,OVERFLOW,NOUNDERFLOW)
  /DEBUG=(SYMBOLS,TRACEBACK)
  /STANDARD=(NOSYNTAX,NOSOURCE_FORM)
  /SHOW=(NOPREPROCESSOR,NOINCLUDE,MAP)
  /F77  /NOG_FLOATING  /I4  /NOOPTIMIZE  /WARNINGS  /NOD_LINES  /CROSS_REFERENCE  /NOMACHINE_CODE  /CONTINUATIONS=99

REPLAY                         					20-May-1983 10:29:02	VAX-11 FORTRAN V3.2-37              Page  12
								10-May-1983 10:08:38	CAD$VOLSET:[GARY.STATS.SOURCE]REPLAY.FOR;8  

COMPILATION STATISTICS

  Run Time:           5.12 seconds
  Elapsed Time:       15.21 seconds
  Page Faults:        603
  Dynamic Memory:     882 pages
