%IF %DECLARED ( %BASIC$QUADWORD_DECLARED ) = 0 %THEN
	RECORD BASIC$QUADWORD
		LONG FILL ( 2 )
	END RECORD
    %LET %BASIC$QUADWORD_DECLARED = 1
    %END %IF
    %IF %DECLARED ( %BASIC$OCTAWORD_DECLARED ) = 0 %THEN
	RECORD BASIC$OCTAWORD
		LONG FILL ( 4 )
	END RECORD
    %LET %BASIC$OCTAWORD_DECLARED = 1
    %END %IF
    %IF %DECLARED ( %BASIC$F_FLOATING_COMPLEX_DECL ) = 0 %THEN
    	RECORD BASIC$F_FLOATING_COMPLEX
    		SINGLE REAL_PART
    		SINGLE IMAGINARY_PART
    	END RECORD
    %LET %BASIC$F_FLOATING_COMPLEX_DECL = 1
    %END %IF
    %IF %DECLARED ( %BASIC$D_FLOATING_COMPLEX_DECL ) = 0 %THEN
    	RECORD BASIC$D_FLOATING_COMPLEX
    		DOUBLE REAL_PART
    		DOUBLE IMAGINARY_PART
    	END RECORD
    %LET %BASIC$D_FLOATING_COMPLEX_DECL = 1
    %END %IF
    %IF %DECLARED ( %BASIC$G_FLOATING_COMPLEX_DECL ) = 0 %THEN
    	RECORD BASIC$G_FLOATING_COMPLEX
    		GFLOAT REAL_PART
    		GFLOAT IMAGINARY_PART
    	END RECORD
    %LET %BASIC$G_FLOATING_COMPLEX_DECL = 1
    %END %IF
    %IF %DECLARED ( %BASIC$H_FLOATING_COMPLEX_DECL ) = 0 %THEN
    	RECORD BASIC$H_FLOATING_COMPLEX
    		HFLOAT REAL_PART
    		HFLOAT IMAGINARY_PART
    	END RECORD
    %LET %BASIC$H_FLOATING_COMPLEX_DECL = 1
    %END %IF
    
    
      DECLARE LONG CONSTANT PR670$_TODR = 27
      DECLARE LONG CONSTANT PR670$_CSRS = 28
      DECLARE LONG CONSTANT PR670$_CSRD = 29
      DECLARE LONG CONSTANT PR670$_CSTS = 30
      DECLARE LONG CONSTANT PR670$_CSTD = 31
      DECLARE LONG CONSTANT PR670$_MCESR = 38
      DECLARE LONG CONSTANT PR670$_ACCS = 40
      DECLARE LONG CONSTANT PR670$_SAVPC = 42
      DECLARE LONG CONSTANT PR670$_SAVPSL = 43
      DECLARE LONG CONSTANT PR670$_TBTAG = 47
      DECLARE LONG CONSTANT PR670$_IORESET = 55
      DECLARE LONG CONSTANT PR670$_TBDATA = 59
      DECLARE LONG CONSTANT PR670$_BCBTS = 113
      DECLARE LONG CONSTANT PR670$_BCP1TS = 114
      DECLARE LONG CONSTANT PR670$_BCP2TS = 115
      DECLARE LONG CONSTANT PR670$_BCRFR = 116
      DECLARE LONG CONSTANT PR670$_BCIDX = 117
      DECLARE LONG CONSTANT PR670$_BCSTS = 118
      DECLARE LONG CONSTANT PR670$_BCCTL = 119
      DECLARE LONG CONSTANT PR670$_BCERR = 120
      DECLARE LONG CONSTANT PR670$_BCFBTS = 121
      DECLARE LONG CONSTANT PR670$_BCFPTS = 122
      DECLARE LONG CONSTANT PR670$_VINTSR = 123
      DECLARE LONG CONSTANT PR670$_PCTAG = 124
      DECLARE LONG CONSTANT PR670$_PCIDX = 125
      DECLARE LONG CONSTANT PR670$_PCERR = 126
      DECLARE LONG CONSTANT PR670$_PCSTS = 127
      DECLARE LONG CONSTANT PR670$M_BCBTS_VALID = x'0000003C'
      DECLARE LONG CONSTANT PR670$M_BCBTS_TAG = x'1FFE0000'
      DECLARE LONG CONSTANT PR670$M_BCBTS_PARITY = x'20000000'
      DECLARE LONG CONSTANT PR670$S_PR670_BCBTS = 4
      record PR670_BCBTS
         group PR670$R_BCBTS_OVERLAY
            variant
               case
                  group PR670$R_BCBTS_BITS
                     LONG BCBTS_FILL1_bits   ! COMMENT ADDED BY SDL - BCBTS_FILL1_bits contains bits BCBTS_FILL1 through  &
 ! BCBTS_FILL3
                  end group PR670$R_BCBTS_BITS
            end variant
         end group PR670$R_BCBTS_OVERLAY
      end record PR670_BCBTS
    
      DECLARE LONG CONSTANT PR670$M_BCPTS_VALID = x'00000004'
      DECLARE LONG CONSTANT PR670$M_BCPTS_TAG = x'1FFFF800'
      DECLARE LONG CONSTANT PR670$M_BCPTS_PARITY = x'20000000'
      DECLARE LONG CONSTANT PR670$S_PR670_BCPTS = 4
      record PR670_BCPTS
         group PR670$R_BCPTS_OVERLAY
            variant
               case
                  group PR670$R_BCPTS_BITS
                     LONG BCPTS_FILL1_bits   ! COMMENT ADDED BY SDL - BCPTS_FILL1_bits contains bits BCPTS_FILL1 through  &
 ! BCPTS_FILL3
                  end group PR670$R_BCPTS_BITS
            end variant
         end group PR670$R_BCPTS_OVERLAY
      end record PR670_BCPTS
    
      DECLARE LONG CONSTANT PR670$M_BCIDX_BTS_COL = x'000001C0'
      DECLARE LONG CONSTANT PR670$M_BCIDX_BTS_ROW = x'0001FE00'
      DECLARE LONG CONSTANT PR670$M_BCIDX_PTS_COL = x'000001F0'
      DECLARE LONG CONSTANT PR670$M_BCIDX_PTS_ROW = x'00000600'
      DECLARE LONG CONSTANT PR670$S_PR670_BCIDX = 4
      record PR670_BCIDX
         group PR670$R_BCIDX_OVERLAY
            variant
               case
                  group PR670$R_BCIDX_BTS_BITS
                     LONG BCIDX_BTS_FILL1_bits   ! COMMENT ADDED BY SDL - BCIDX_BTS_FILL1_bits contains bits BCIDX_BTS_FILL1  &
 ! through BCIDX_BTS_FILL2
                  end group PR670$R_BCIDX_BTS_BITS
               case
                  group PR670$R_BCIDX_PTS_BITS
                     LONG BCIDX_PTS_FILL1_bits   ! COMMENT ADDED BY SDL - BCIDX_PTS_FILL1_bits contains bits BCIDX_PTS_FILL1  &
 ! through BCIDX_PTS_FILL2
                  end group PR670$R_BCIDX_PTS_BITS
            end variant
         end group PR670$R_BCIDX_OVERLAY
      end record PR670_BCIDX
    
      DECLARE LONG CONSTANT PR670$M_BCSTS_LOCK = x'00000001'
      DECLARE LONG CONSTANT PR670$M_BCSTS_BTS_PE = x'00000002'
      DECLARE LONG CONSTANT PR670$M_BCSTS_P1TS_PE = x'00000004'
      DECLARE LONG CONSTANT PR670$M_BCSTS_P2TS_PE = x'00000008'
      DECLARE LONG CONSTANT PR670$M_BCSTS_BUS_ERR = x'00000010'
      DECLARE LONG CONSTANT PR670$M_BCSTS_BTS_CMP = x'00020000'
      DECLARE LONG CONSTANT PR670$M_BCSTS_BTS_HIT = x'00040000'
      DECLARE LONG CONSTANT PR670$M_BCSTS_P1TS_HIT = x'00080000'
      DECLARE LONG CONSTANT PR670$M_BCSTS_P2TS_HIT = x'00100000'
      DECLARE LONG CONSTANT PR670$M_BCSTS_RDAL_CMD = x'01E00000'
      DECLARE LONG CONSTANT PR670$M_BCSTS_IBUS_CYC = x'02000000'
      DECLARE LONG CONSTANT PR670$M_BCSTS_PARITY = x'04000000'
      DECLARE LONG CONSTANT PR670$S_PR670_BCSTS = 4
      record PR670_BCSTS
         group PR670$R_BCSTS_OVERLAY
            variant
               case
                  group PR670$R_BCSTS_BITS
                     LONG BCSTS_LOCK_bits   ! COMMENT ADDED BY SDL - BCSTS_LOCK_bits contains bits BCSTS_LOCK through BCSTS_FILL2
                  end group PR670$R_BCSTS_BITS
            end variant
         end group PR670$R_BCSTS_OVERLAY
      end record PR670_BCSTS
    
      DECLARE LONG CONSTANT PR670$M_BCCTL_FORCE_BHIT = x'00000001'
      DECLARE LONG CONSTANT PR670$M_BCCTL_ENA_BTS = x'00000002'
      DECLARE LONG CONSTANT PR670$M_BCCTL_ENA_PTS = x'00000004'
      DECLARE LONG CONSTANT PR670$M_BCCTL_ENA_RFR = x'00000008'
      DECLARE LONG CONSTANT PR670$M_BCCTL_TWO_CYC = x'00000010'
      DECLARE LONG CONSTANT PR670$S_PR670_BCCTL = 4
      record PR670_BCCTL
         group PR670$R_BCCTL_OVERLAY
            variant
               case
                  group PR670$R_BCCTL_BITS
                     LONG BCCTL_FORCE_BHIT_bits   ! COMMENT ADDED BY SDL - BCCTL_FORCE_BHIT_bits contains bits BCCTL_FORCE_BHIT  &
 ! through BCCTL_FILL1
                  end group PR670$R_BCCTL_BITS
            end variant
         end group PR670$R_BCCTL_OVERLAY
      end record PR670_BCCTL
    
      DECLARE LONG CONSTANT PR670$M_BCERR_ADDR = x'3FFFFFF8'
      DECLARE LONG CONSTANT PR670$S_PR670_BCERR = 4
      record PR670_BCERR
         group PR670$R_BCERR_OVERLAY
            variant
               case
                  group PR670$R_BCERR_BITS
                     LONG BCERR_FILL1_bits   ! COMMENT ADDED BY SDL - BCERR_FILL1_bits contains bits BCERR_FILL1 through  &
 ! BCERR_FILL2
                  end group PR670$R_BCERR_BITS
            end variant
         end group PR670$R_BCERR_OVERLAY
      end record PR670_BCERR
    
      DECLARE LONG CONSTANT PR670$M_PCTAG_TAG = x'1FFFF800'
      DECLARE LONG CONSTANT PR670$M_PCTAG_PARITY = x'40000000'
      DECLARE LONG CONSTANT PR670$M_PCTAG_VALID = x'80000000'
      DECLARE LONG CONSTANT PR670$S_PR670_PCTAG = 4
      record PR670_PCTAG
         group PR670$R_PCTAG_OVERLAY
            variant
               case
                  group PR670$R_PCTAG_BITS
                     LONG PCTAG_FILL1_bits   ! COMMENT ADDED BY SDL - PCTAG_FILL1_bits contains bits PCTAG_FILL1 through  &
 ! PCTAG_VALID
                  end group PR670$R_PCTAG_BITS
            end variant
         end group PR670$R_PCTAG_OVERLAY
      end record PR670_PCTAG
    
      DECLARE LONG CONSTANT PR670$M_PCIDX_INDEX = x'000007F8'
      DECLARE LONG CONSTANT PR670$S_PR670_PCIDX = 4
      record PR670_PCIDX
         group PR670$R_PCIDX_OVERLAY
            variant
               case
                  group PR670$R_PCIDX_BITS
                     LONG PCIDX_FILL1_bits   ! COMMENT ADDED BY SDL - PCIDX_FILL1_bits contains bits PCIDX_FILL1 through  &
 ! PCIDX_FILL2
                  end group PR670$R_PCIDX_BITS
            end variant
         end group PR670$R_PCIDX_OVERLAY
      end record PR670_PCIDX
    
      DECLARE LONG CONSTANT PR670$M_PCERR_ADDR = x'3FFFFFFF'
      DECLARE LONG CONSTANT PR670$S_PR670_PCERR = 4
      record PR670_PCERR
         group PR670$R_PCERR_OVERLAY
            variant
               case
                  group PR670$R_PCERR_BITS
                     LONG PCERR_ADDR_bits   ! COMMENT ADDED BY SDL - PCERR_ADDR_bits contains bits PCERR_ADDR through PCERR_FILL1
                  end group PR670$R_PCERR_BITS
            end variant
         end group PR670$R_PCERR_OVERLAY
      end record PR670_PCERR
    
      DECLARE LONG CONSTANT PR670$M_PCSTS_FORCE_HIT = x'00000001'
      DECLARE LONG CONSTANT PR670$M_PCSTS_ENA_PTS = x'00000002'
      DECLARE LONG CONSTANT PR670$M_PCSTS_FLUSH = x'00000004'
      DECLARE LONG CONSTANT PR670$M_PCSTS_ENA_RFR = x'00000008'
      DECLARE LONG CONSTANT PR670$M_PCSTS_PC_HIT = x'00000010'
      DECLARE LONG CONSTANT PR670$M_PCSTS_INT = x'00000020'
      DECLARE LONG CONSTANT PR670$M_PCSTS_TRAP2 = x'00000040'
      DECLARE LONG CONSTANT PR670$M_PCSTS_TRAP1 = x'00000080'
      DECLARE LONG CONSTANT PR670$M_PCSTS_TAG_PE = x'00000100'
      DECLARE LONG CONSTANT PR670$M_PCSTS_RDAL_PE = x'00000200'
      DECLARE LONG CONSTANT PR670$M_PCSTS_DATA_PE = x'00000400'
      DECLARE LONG CONSTANT PR670$M_PCSTS_BUS_ERR = x'00000800'
      DECLARE LONG CONSTANT PR670$M_PCSTS_BC_HIT = x'00001000'
      DECLARE LONG CONSTANT PR670$S_PR670_PCSTS = 4
      record PR670_PCSTS
         group PR670$R_PCSTS_OVERLAY
            variant
               case
                  group PR670$R_PCSTS_BITS
                     LONG PCSTS_FORCE_HIT_bits   ! COMMENT ADDED BY SDL - PCSTS_FORCE_HIT_bits contains bits PCSTS_FORCE_HIT  &
 ! through PCSTS_FILL1
                  end group PR670$R_PCSTS_BITS
            end variant
         end group PR670$R_PCSTS_OVERLAY
      end record PR670_PCSTS