(PROGN (PRIN1 "Use LOADDB to load database files!
" T) (ERROR!))
("16-Feb-86 17:56:46" . {QV}<IDL>SOURCES>GLOBAL.;34)
FNS (AELTTYPE ALLOC.SARRAY ARRAYTYPEP COPYIDLARRAY DIMENSIONP GETAELT GETARRAYPROP LEVELP MAKEOFFSETS 
NLOGICALELTS NPHYSICALELTS PRESERVE SERIALNUMBER SETARRAYPROP SETAELT VFROMR ZEROFORARRAY)
(READATABASE)
(
CALL AELTTYPE (SELECTQ SHOULDNT) ALLOC.SARRAY (SELECTQ NPHYSICALELTS) ARRAYTYPEP (SELECTQ SHOULDNT) 
COPYIDLARRAY (ALLOC.SARRAY SETUP NEXT GETAELT IVALUE FIXR) DIMENSIONP (BETWEEN) GETAELT (LOGAND 
CONSTANT LOGNOT LOGXOR SELECTQ SHOULDNT) GETARRAYPROP (FASSOC) LEVELP (BETWEEN GETRELT) MAKEOFFSETS (
CONSTANT ROWINTOF ITIMES GETRELT PLUS) NLOGICALELTS (IJKBOX ITIMES GETRELT PLUS) NPHYSICALELTS (
SELECTQ NLOGICALELTS IEQP GETRELT SYMELTLOC SHOULDNT) PRESERVE (ADD1 PRESERVE GETTITLE) SERIALNUMBER (
CONSTANT LIST RPLACA PLUS) SETARRAYPROP (CONS FETCHFIELD) SETAELT (LIST FLOAT SELECTQ SHOULDNT 
CONSTANT) VFROMR (ROWINTOF IJKBOX) ZEROFORARRAY (SELECTQ SHOULDNT) NIL
BIND AELTTYPE NIL ALLOC.SARRAY NIL ARRAYTYPEP NIL COPYIDLARRAY NIL DIMENSIONP NIL GETAELT NIL 
GETARRAYPROP NIL LEVELP NIL MAKEOFFSETS NIL NLOGICALELTS NIL NPHYSICALELTS NIL PRESERVE NIL 
SERIALNUMBER NIL SETARRAYPROP NIL SETAELT NIL VFROMR NIL ZEROFORARRAY NIL NIL
NLAMBDA AELTTYPE NIL ALLOC.SARRAY NIL ARRAYTYPEP NIL COPYIDLARRAY NIL DIMENSIONP NIL GETAELT NIL 
GETARRAYPROP NIL LEVELP NIL MAKEOFFSETS NIL NLOGICALELTS NIL NPHYSICALELTS NIL PRESERVE NIL 
SERIALNUMBER NIL SETARRAYPROP NIL SETAELT NIL VFROMR NIL ZEROFORARRAY NIL NIL
NOBIND AELTTYPE NIL ALLOC.SARRAY NIL ARRAYTYPEP NIL COPYIDLARRAY NIL DIMENSIONP NIL GETAELT NIL 
GETARRAYPROP NIL LEVELP NIL MAKEOFFSETS NIL NLOGICALELTS NIL NPHYSICALELTS NIL PRESERVE NIL 
SERIALNUMBER NIL SETARRAYPROP NIL SETAELT NIL VFROMR NIL ZEROFORARRAY NIL NIL
RECORD AELTTYPE (ARRAYFRAME SELARRAY) ALLOC.SARRAY (ROWINT SIMARRAY) ARRAYTYPEP (ARRAYFRAME) 
COPYIDLARRAY (ARRAYFRAME SIMARRAY GENSTATEBLOCK) DIMENSIONP (ARRAYFRAME) GETAELT (ARRAYFRAME AELTPTR) 
GETARRAYPROP (ARRAYFRAME) LEVELP (ARRAYFRAME) MAKEOFFSETS (ROWINT) NLOGICALELTS (ROWINT) NPHYSICALELTS
 (ROWINT) PRESERVE (ARRAYFRAME ROW ROWHEADER SELARRAY) SERIALNUMBER (ARRAYFRAME) SETARRAYPROP (
ARRAYFRAME) SETAELT (ARRAYFRAME AELTPTR SELARRAY) VFROMR (ROWSCALAR SIMARRAY) ZEROFORARRAY (ARRAYFRAME
) NIL
CREATE AELTTYPE NIL ALLOC.SARRAY (SIMARRAY ROWSCALAR) ARRAYTYPEP NIL COPYIDLARRAY NIL DIMENSIONP NIL 
GETAELT NIL GETARRAYPROP NIL LEVELP NIL MAKEOFFSETS (ROWINT) NLOGICALELTS NIL NPHYSICALELTS NIL 
PRESERVE (SIMARRAY LABELBLOCK SELARRAY) SERIALNUMBER (ID) SETARRAYPROP NIL SETAELT NIL VFROMR (
SIMARRAY) ZEROFORARRAY NIL NIL
FETCH AELTTYPE (RELTTYPE ELEMENTBLOCK TYPE BASEARRAY) ALLOC.SARRAY NIL ARRAYTYPEP (TYPE NDIMS) 
COPYIDLARRAY (SHAPE FORMAT AELTTYPE ORDER DONE) DIMENSIONP (NDIMS) GETAELT (SOURCE I PTR AELTTYPE F) 
GETARRAYPROP (SLOT5) LEVELP (SHAPE) MAKEOFFSETS (NELTS) NLOGICALELTS (NELTS) NPHYSICALELTS (NELTS) 
PRESERVE (TYPE LABELBLOCK DIMLABELBLOCK REFCOUNT BASEARRAY) SERIALNUMBER (SNF ID) SETARRAYPROP (SLOT5)
 SETAELT (SOURCE AELTTYPE PTR ELEMENTBLOCK TYPE BASEARRAY) VFROMR (NELTS) ZEROFORARRAY (AELTTYPE) NIL
REPLACE AELTTYPE NIL ALLOC.SARRAY (SHAPE FORMAT ELEMENTBLOCK NELTS RELTTYPE INIT) ARRAYTYPEP NIL 
COPYIDLARRAY NIL DIMENSIONP NIL GETAELT NIL GETARRAYPROP NIL LEVELP NIL MAKEOFFSETS (NELTS) 
NLOGICALELTS NIL NPHYSICALELTS NIL PRESERVE (LABELBLOCK REFCOUNT BASEARRAY ID) SERIALNUMBER (ID SNF) 
SETARRAYPROP (SLOT5) SETAELT (I F MAYHAVENIL) VFROMR (FORMAT SHAPE ELEMENTBLOCK) ZEROFORARRAY NIL NIL
REFFREE AELTTYPE NIL ALLOC.SARRAY NIL ARRAYTYPEP NIL COPYIDLARRAY NIL DIMENSIONP NIL GETAELT (MIN.FIXP
) GETARRAYPROP NIL LEVELP NIL MAKEOFFSETS NIL NLOGICALELTS NIL NPHYSICALELTS NIL PRESERVE NIL 
SERIALNUMBER NIL SETARRAYPROP NIL SETAELT (MIN.FIXP) VFROMR NIL ZEROFORARRAY NIL NIL
REF AELTTYPE (A VALUE) ALLOC.SARRAY (SHAPE FORMAT VALUE) ARRAYTYPEP (A TYPE) COPYIDLARRAY (A 
NEWELTTYPE VALUE RESULT GSBOLD GSBNEW) DIMENSIONP (ARY DIM VALUE) GETAELT (ARR AP X) GETARRAYPROP (A P
) LEVELP (A DIM LEV VALUE) MAKEOFFSETS (SHP VALUE Y) NLOGICALELTS (SHP VALUE) NPHYSICALELTS (SHP FMT 
VALUE) PRESERVE (A VALUE) SERIALNUMBER (VALUE) SETARRAYPROP (A P) SETAELT (ARY AP) VFROMR (R VALUE A) 
ZEROFORARRAY (A VALUE) NIL
SETFREE AELTTYPE NIL ALLOC.SARRAY NIL ARRAYTYPEP NIL COPYIDLARRAY NIL DIMENSIONP NIL GETAELT NIL 
GETARRAYPROP NIL LEVELP NIL MAKEOFFSETS NIL NLOGICALELTS NIL NPHYSICALELTS NIL PRESERVE NIL 
SERIALNUMBER NIL SETARRAYPROP NIL SETAELT NIL VFROMR NIL ZEROFORARRAY NIL NIL
SET AELTTYPE NIL ALLOC.SARRAY (RELTVAL) ARRAYTYPEP NIL COPYIDLARRAY (TEMP) DIMENSIONP NIL GETAELT NIL 
GETARRAYPROP NIL LEVELP NIL MAKEOFFSETS (VAL J) NLOGICALELTS (I C) NPHYSICALELTS NIL PRESERVE (NEWA) 
SERIALNUMBER NIL SETARRAYPROP NIL SETAELT NIL VFROMR NIL ZEROFORARRAY NIL NIL
SMASHFREE AELTTYPE NIL ALLOC.SARRAY NIL ARRAYTYPEP NIL COPYIDLARRAY NIL DIMENSIONP NIL GETAELT NIL 
GETARRAYPROP NIL LEVELP NIL MAKEOFFSETS NIL NLOGICALELTS NIL NPHYSICALELTS NIL PRESERVE NIL 
SERIALNUMBER NIL SETARRAYPROP NIL SETAELT NIL VFROMR NIL ZEROFORARRAY NIL NIL
SMASH AELTTYPE NIL ALLOC.SARRAY NIL ARRAYTYPEP NIL COPYIDLARRAY NIL DIMENSIONP NIL GETAELT NIL 
GETARRAYPROP NIL LEVELP NIL MAKEOFFSETS NIL NLOGICALELTS NIL NPHYSICALELTS NIL PRESERVE (NEWA PTR) 
SERIALNUMBER (A LST) SETARRAYPROP NIL SETAELT NIL VFROMR NIL ZEROFORARRAY NIL NIL
PROP AELTTYPE NIL ALLOC.SARRAY NIL ARRAYTYPEP NIL COPYIDLARRAY NIL DIMENSIONP NIL GETAELT NIL 
GETARRAYPROP NIL LEVELP NIL MAKEOFFSETS NIL NLOGICALELTS NIL NPHYSICALELTS NIL PRESERVE NIL 
SERIALNUMBER NIL SETARRAYPROP NIL SETAELT NIL VFROMR NIL ZEROFORARRAY NIL NIL
TEST AELTTYPE NIL ALLOC.SARRAY (RELTVAL) ARRAYTYPEP NIL COPYIDLARRAY (TEMP) DIMENSIONP NIL GETAELT (
VALUE) GETARRAYPROP NIL LEVELP NIL MAKEOFFSETS (J) NLOGICALELTS NIL NPHYSICALELTS NIL PRESERVE (PTR) 
SERIALNUMBER NIL SETARRAYPROP (V) SETAELT (V VALUE) VFROMR (TITLE) ZEROFORARRAY NIL NIL
TESTFREE AELTTYPE NIL ALLOC.SARRAY NIL ARRAYTYPEP NIL COPYIDLARRAY NIL DIMENSIONP NIL GETAELT NIL 
GETARRAYPROP NIL LEVELP NIL MAKEOFFSETS NIL NLOGICALELTS NIL NPHYSICALELTS NIL PRESERVE NIL 
SERIALNUMBER NIL SETARRAYPROP NIL SETAELT NIL VFROMR NIL ZEROFORARRAY NIL NIL
PREDICATE AELTTYPE (TYPENAMEP) ALLOC.SARRAY (ROWTYPEP NUMBERP ARRAYTYPEP FLOATP) ARRAYTYPEP (TYPENAMEP
) COPYIDLARRAY (TYPENAMEP SELECTQ ARRAYTYPEP) DIMENSIONP (TYPENAMEP FIXP SELECTQ) GETAELT (TYPENAMEP 
NUMBERP TESTMISSING) GETARRAYPROP (TYPENAMEP LITATOM) LEVELP (TYPENAMEP FIXP DIMENSIONP SELECTQ) 
MAKEOFFSETS (ROWTYPEP IEQP FIXP IGEQ LESSP) NLOGICALELTS (ROWTYPEP FIXP IGEQ IEQP GREATERP) 
NPHYSICALELTS (ROWTYPEP FIXP IGEQ) PRESERVE (TYPENAMEP) SERIALNUMBER (TYPENAMEP FIXP) SETARRAYPROP (
TYPENAMEP LITATOM) SETAELT (TYPENAMEP NUMBERP FIXP) VFROMR (ROWTYPEP STRINGP ARRAYTYPEP) ZEROFORARRAY 
(TYPENAMEP NUMBERP) NIL
EFFECT AELTTYPE NIL ALLOC.SARRAY NIL ARRAYTYPEP NIL COPYIDLARRAY (SETAELT LAB.COPYALL) DIMENSIONP NIL 
GETAELT (DECLARE) GETARRAYPROP NIL LEVELP NIL MAKEOFFSETS (SETRELT) NLOGICALELTS NIL NPHYSICALELTS (
ASSERT) PRESERVE (SELECTQ BUMPREFCNT SHOULDNT SETTITLE) SERIALNUMBER NIL SETARRAYPROP (REPLACEFIELD) 
SETAELT (HELP) VFROMR (SETTITLE) ZEROFORARRAY NIL NIL
CLISP AELTTYPE (DLAMBDA the) ALLOC.SARRAY (DLAMBDA the type?) ARRAYTYPEP (type?) COPYIDLARRAY (DLAMBDA
 the DPROG bind until do) DIMENSIONP (DLAMBDA the) GETAELT (DLAMBDA type? the) GETARRAYPROP (DLAMBDA) 
LEVELP (DLAMBDA the) MAKEOFFSETS (DLAMBDA the bind declare for from by to do finally) NLOGICALELTS (
DLAMBDA the for to declare do finally) NPHYSICALELTS (DLAMBDA the) PRESERVE (DLAMBDA the DPROG type?) 
SERIALNUMBER (DLAMBDA the) SETARRAYPROP (DLAMBDA) SETAELT (DLAMBDA type? the) VFROMR (DLAMBDA the 
DPROG) ZEROFORARRAY (DLAMBDA the) NIL
SPECVARS AELTTYPE NIL ALLOC.SARRAY NIL ARRAYTYPEP NIL COPYIDLARRAY NIL DIMENSIONP NIL GETAELT NIL 
GETARRAYPROP NIL LEVELP NIL MAKEOFFSETS NIL NLOGICALELTS NIL NPHYSICALELTS NIL PRESERVE NIL 
SERIALNUMBER NIL SETARRAYPROP NIL SETAELT NIL VFROMR NIL ZEROFORARRAY NIL NIL
LOCALVARS AELTTYPE NIL ALLOC.SARRAY NIL ARRAYTYPEP NIL COPYIDLARRAY NIL DIMENSIONP NIL GETAELT (X) 
GETARRAYPROP NIL LEVELP NIL MAKEOFFSETS NIL NLOGICALELTS NIL NPHYSICALELTS NIL PRESERVE NIL 
SERIALNUMBER NIL SETARRAYPROP NIL SETAELT NIL VFROMR NIL ZEROFORARRAY NIL NIL
APPLY AELTTYPE NIL ALLOC.SARRAY NIL ARRAYTYPEP NIL COPYIDLARRAY NIL DIMENSIONP NIL GETAELT NIL 
GETARRAYPROP NIL LEVELP NIL MAKEOFFSETS NIL NLOGICALELTS NIL NPHYSICALELTS NIL PRESERVE NIL 
SERIALNUMBER NIL SETARRAYPROP NIL SETAELT NIL VFROMR NIL ZEROFORARRAY NIL NIL
ERROR AELTTYPE NIL ALLOC.SARRAY NIL ARRAYTYPEP NIL COPYIDLARRAY NIL DIMENSIONP NIL GETAELT NIL 
GETARRAYPROP NIL LEVELP NIL MAKEOFFSETS NIL NLOGICALELTS NIL NPHYSICALELTS NIL PRESERVE NIL 
SERIALNUMBER NIL SETARRAYPROP NIL SETAELT NIL VFROMR NIL ZEROFORARRAY NIL NIL
LOCALFREEVARS AELTTYPE NIL ALLOC.SARRAY NIL ARRAYTYPEP NIL COPYIDLARRAY NIL DIMENSIONP NIL GETAELT NIL
 GETARRAYPROP NIL LEVELP NIL MAKEOFFSETS NIL NLOGICALELTS NIL NPHYSICALELTS NIL PRESERVE NIL 
SERIALNUMBER NIL SETARRAYPROP NIL SETAELT NIL VFROMR NIL ZEROFORARRAY NIL NIL
ARGS AELTTYPE NIL ALLOC.SARRAY NIL ARRAYTYPEP NIL COPYIDLARRAY NIL DIMENSIONP NIL GETAELT NIL 
GETARRAYPROP NIL LEVELP NIL MAKEOFFSETS NIL NLOGICALELTS NIL NPHYSICALELTS NIL PRESERVE NIL 
SERIALNUMBER NIL SETARRAYPROP NIL SETAELT NIL VFROMR NIL ZEROFORARRAY NIL NIL
USERTEMPLATES UENTRY (CALL NIL .. EVAL RETURN) UERRORGUARD MACRO SHAZAM (CALL .. NIL) UERROR MACRO 
UERRORSET MACRO SETQ.NOREF (CALL SET EVAL . PPE) perform (MACRO ARGS (PERFORMTRAN ARGS T)) PERFORM (
MACRO ARGS (PERFORMTRAN ARGS T)) FCACHE.PUTPROP (CALL EVAL PROP EVAL . PPE) FCACHE.GETPROP (CALL EVAL 
PROP . PPE) SPREADAPPLY (CALL FUNCTIONAL EVAL . PPE) SPREADAPPLY* (CALL FUNCTIONAL .. EVAL) OP# (CALL)
 NIL
0 AELTTYPE (ARRAY) ALLOC.SARRAY (ROWINT FORMATCODE SCALAR SIMARRAY FLOATING) ARRAYTYPEP (ARRAYFRAME) 
COPYIDLARRAY (ARRAY SIMARRAY GENSTATEBLOCK NIL) DIMENSIONP (ARRAY INTEGER BOOL) GETAELT (ARRAY AELTPTR
 SCALAR) GETARRAYPROP (ARRAY LITATOM) LEVELP (ARRAY INTEGER BOOL) MAKEOFFSETS (ROWINT NIL IJK) 
NLOGICALELTS (ROWINT IJK NIL INTEGER) NPHYSICALELTS (ROWINT FORMATCODE IJK) PRESERVE (ARRAY ROW 
ROWHEADER) SERIALNUMBER (ARRAY INTEGER) SETARRAYPROP (ARRAY LITATOM NIL) SETAELT (ARRAY AELTPTR SCALAR
 INTEGER) VFROMR (ROWSCALAR NIL TITLE SIMARRAY) ZEROFORARRAY (ARRAY ARITH) NIL

)