%EXTERNALROUTINESPEC RECODE(%INTEGER S,F,AD)
%EXTERNALROUTINESPEC CODEOUT
%EXTERNALROUTINESPEC PTLATE(%INTEGER WORD)
%EXTERNALROUTINESPEC PWORD(%INTEGER WORD)
%EXTERNALROUTINESPEC PB1(%INTEGER OPCODE)
%EXTERNALROUTINESPEC PB2(%INTEGER OPCODE,BYTE)
%EXTERNALROUTINESPEC PB3(%INTEGER OPCODE,BYTE1,BYTE2)
%EXTERNALROUTINESPEC PB4(%INTEGER OPCODE,B1,B3,B3)
%EXTERNALROUTINESPEC PBW(%INTEGER OPCODE,WORD)
%EXTERNALROUTINESPEC PB2W(%INTEGER OPCODE,BYTE1,WORD)
%EXTERNALROUTINESPEC PERM
%EXTERNALROUTINESPEC CAB
%EXTERNALROUTINESPEC CNOP(%INTEGER I, J)
%EXTERNALROUTINESPEC PGLA(%INTEGER BDRY, L, INF ADR)
%EXTERNALROUTINESPEC PLUG(%INTEGER AREA, AT, VALUE, BYTES)
%EXTERNALROUTINESPEC GXREF(%STRING(31) NAME,%INTEGER MODE,XTRA,AT)
%EXTERNALROUTINESPEC CXREF(%STRING(255) NAME,
                  %INTEGER MODE,AT,%INTEGERNAME AT)
%EXTERNALROUTINESPEC PINITCALL(%STRING(31) S)
%EXTERNALROUTINESPEC CSTOP
%EXTERNALROUTINESPEC CIOCP(%INTEGER N)
%EXTERNALROUTINESPEC RELOCATE(%INTEGER BITS,GLARAD,AREA)
%EXTERNALROUTINESPEC DEFINEEP(%STRING(255)NAME,%INTEGER ADR,AT,MAIN)
%EXTERNALROUTINESPEC PRHEX(%INTEGER VALUE,PLACES)
%EXTERNALROUTINESPEC ABORT
%EXTERNALROUTINESPEC DUMP CONSTS
%EXTERNALROUTINESPEC PERQPROLOGUE
%EXTERNALROUTINESPEC REPEAT PROLOGUE
%EXTERNALROUTINESPEC PERQEPILOGUE(%INTEGERNAME LOGEPDISP,EXPEPDISP,
         %ROUTINE POP(%INTEGERNAME A,B,C,D))
%DYNAMICROUTINESPEC QPUT(%INTEGER A,B,C,D)
%EXTERNALROUTINESPEC FAULT(%INTEGER A,B,C)
%EXTERNALROUTINESPEC WARN(%INTEGER N,V)

%EXTERNALROUTINESPEC ERASE(%INTEGER WORDS)
%EXTERNALROUTINESPEC ILSHIFT(%INTEGER CONST)
%EXTERNALROUTINESPEC IRSHIFT(%INTEGER CONST)
%EXTERNALREALFNSPEC ICLREALTOPERQ(%REAL ICLREAL)

%EXTERNALROUTINESPEC PRINTTRIPS(%RECORD(TRIPF)%ARRAYNAME T)
! END OF "ERCC07.PERQ_XSPECS"