%ENDOFLIST %REALSLONG ! %EXTERNALROUTINESPEC READ SEQUENCE(%STRINGNAME S,%STRING(1)T) %EXTERNALSTRINGFNSPEC TIDIED(%STRING(255)S) %EXTERNALSTRINGFNSPEC ITOS(%INTEGER N,DP) %EXTERNALINTEGERFNSPEC STOI(%STRING(31)S) %EXTERNALSTRINGFNSPEC SP (%INTEGER N) %EXTERNALSTRINGFNSPEC NEXT ITEM %EXTERNALSTRINGFNSPEC NEXT SIG ITEM %EXTERNALSTRINGFNSPEC SEM ! %EXTERNALINTEGERFNSPEC NEXT SYMBOL %EXTERNALINTEGERFNSPEC NEXT SIG SYMBOL %EXTERNALINTEGERFNSPEC EM ! %EXTERNALREALFNSPEC CPU TIME %EXTERNALSTRINGFNSPEC TIME %EXTERNALSTRINGFNSPEC DATE %EXTERNALROUTINESPEC SKIP ITEM %EXTERNALREALFNSPEC RANDOM REAL %EXTERNALINTEGERFNSPEC RANDOM INTEGER %EXTERNALROUTINESPEC RESTART RANDOMS %EXTERNALROUTINESPEC JUGGLE RANDOMS %EXTERNALINTEGERFNSPEC REM(%INTEGER A,B) %EXTERNALROUTINESPEC READ WORD(%STRINGNAME S) %EXTERNALREALFNSPEC LOGTEN(%REAL X) %EXTERNALROUTINESPEC PRINT HISTOGRAM(%INTEGERARRAYNAME F,%INTEGER A,B) %EXTERNALROUTINESPEC SWOP INTEGERS(%INTEGERNAME X,Y) %EXTERNALINTEGERFNSPEC POS BIG INTEGER(%INTEGERARRAYNAME X,%INTEGER A,B) %EXTERNALROUTINESPEC SORTINTEGERARRAY(%INTEGERARRAYNAME X,%INTEGER A,B) %EXTERNALROUTINESPEC SWOP STRINGS(%STRINGNAME S,T) %EXTERNALINTEGERFNSPEC POS BIG STRING(%STRINGARRAYNAME X,%INTEGER A,B) %EXTERNALROUTINESPEC SORT STRING ARRAY(%STRINGARRAYNAME S,%INTEGER A,B) PRINT STRING(' SPECS FOR SIMPLE INSERTED %BEGIN') %LIST ! %ENDOFFILE