27-Dec-1987 12:59:38	VAX FORTRAN V4.5-219                Page   1
								27-Dec-1987 12:59:32	USER$LIB:[SXES_SOURCE.CALENDAR]IPAGE.FOR;1  

0001    	SUBROUTINE IPAGE(PAGE,ROW,COL)
0002    	
0003    	CHARACTER*(*)	PAGE(*)
0004    	INTEGER		ROW,COL,I,J
0005     
0006    	DO 100 I = 1,COL
0007    	    DO 200 J = 1,ROW
0008    		PAGE(J)(I:I) = ' '
0009     200	    CONTINUE
0010     100	CONTINUE
0011     
0012    	RETURN
0013    	END




PROGRAM SECTIONS

    Name				 Bytes   Attributes

  0 $CODE                                   94   PIC CON REL LCL   SHR   EXE   RD NOWRT LONG
  2 $LOCAL                                  52   PIC CON REL LCL NOSHR NOEXE   RD   WRT LONG

    Total Space Allocated                  146


ENTRY POINTS

    Address  Type  Name          

  0-00000000       IPAGE         


VARIABLES

    Address  Type  Name              Address  Type  Name              Address  Type  Name              Address  Type  Name          

 AP-0000000C@ I*4  COL             2-00000000  I*4  I                   **      I*4  J              AP-00000008@ I*4  ROW           


ARRAYS

    Address  Type  Name                Bytes  Dimensions

 AP-00000004@ CHAR PAGE                   **  (*)


LABELS

    Address   Label       Address   Label   

      **      100           **      200     

                               					27-Dec-1987 12:59:38	VAX FORTRAN V4.5-219                Page   2
								27-Dec-1987 12:59:32	USER$LIB:[SXES_SOURCE.CALENDAR]IPAGE.FOR;1  

0001     


COMMAND QUALIFIERS

  FOR/LIS IPAGE

  /CHECK=(NOBOUNDS,OVERFLOW,NOUNDERFLOW)
  /DEBUG=(NOSYMBOLS,TRACEBACK)
  /STANDARD=(NOSYNTAX,NOSOURCE_FORM)
  /SHOW=(NOPREPROCESSOR,NOINCLUDE,MAP,NODICTIONARY,SINGLE)
  /WARNINGS=(GENERAL,NODECLARATIONS,NOULTRIX)
  /CONTINUATIONS=19  /NOCROSS_REFERENCE  /NOD_LINES  /NOEXTEND_SOURCE  /F77
  /NOG_FLOATING  /I4  /NOMACHINE_CODE  /OPTIMIZE


COMPILATION STATISTICS

  Run Time:           0.97 seconds
  Elapsed Time:       2.37 seconds
  Page Faults:        600
  Dynamic Memory:     450 pages