(PROGN (PRIN1 "Use LOADDB to load database files!
" T) (ERROR!))
("30-May-84 11:21:51" . {PHYLUM}<SPEECH>BUFFER.FPKG;1)
FNS (SPEECH.GLUE SPEECH.OVERLAY SPEECH.OVERLAY1 SPEECH.INTERPOLATE)
(READATABASE)
(
CALL SPEECH.GLUE (PACK* LIST PVECTOR.GET PVECTOR.PUT COPYALL IDIFFERENCE LAST IPLUS) SPEECH.OVERLAY 
NIL SPEECH.OVERLAY1 (PVECTOR.GET LAST SUB1 CONS SPEECH.INTERPOLATE FPLUS FTIMES ADD1 DREVERSE) 
SPEECH.INTERPOLATE (FQUOTIENT FDIFFERENCE FPLUS FTIMES) NIL
BIND SPEECH.GLUE NIL SPEECH.OVERLAY NIL SPEECH.OVERLAY1 NIL SPEECH.INTERPOLATE NIL NIL
NLAMBDA SPEECH.GLUE NIL SPEECH.OVERLAY NIL SPEECH.OVERLAY1 NIL SPEECH.INTERPOLATE NIL NIL
NOBIND SPEECH.GLUE NIL SPEECH.OVERLAY NIL SPEECH.OVERLAY1 NIL SPEECH.INTERPOLATE NIL NIL
RECORD SPEECH.GLUE (PVECTOR SPOINT) SPEECH.OVERLAY NIL SPEECH.OVERLAY1 (SPOINT) SPEECH.INTERPOLATE (
SPOINT) NIL
CREATE SPEECH.GLUE (PVECTOR SPOINT2) SPEECH.OVERLAY NIL SPEECH.OVERLAY1 (SPOINT2) SPEECH.INTERPOLATE 
NIL NIL
FETCH SPEECH.GLUE (SOUND TIME) SPEECH.OVERLAY NIL SPEECH.OVERLAY1 (TIME M B) SPEECH.INTERPOLATE (TIME 
VALUE) NIL
REPLACE SPEECH.GLUE (TYPE SOUND CV COMMENT TIME VALUE) SPEECH.OVERLAY NIL SPEECH.OVERLAY1 (TIME VALUE)
 SPEECH.INTERPOLATE NIL NIL
REFFREE SPEECH.GLUE (PVECTOR.PNAMES PVECTOR.DEFAULT) SPEECH.OVERLAY (PVECTOR.PNAMES) SPEECH.OVERLAY1 
NIL SPEECH.INTERPOLATE NIL NIL
REF SPEECH.GLUE (C1 V PNAME) SPEECH.OVERLAY (BUFFER S) SPEECH.OVERLAY1 (BUFFER PNAME S) 
SPEECH.INTERPOLATE (TRAJ TIME) NIL
SETFREE SPEECH.GLUE NIL SPEECH.OVERLAY NIL SPEECH.OVERLAY1 (BPOINT EPOINT VALUE) SPEECH.INTERPOLATE 
NIL NIL
SET SPEECH.GLUE (ANSWER DEFAULT C2 DELTA TRAJ POINT) SPEECH.OVERLAY (PNAME) SPEECH.OVERLAY1 (BTRAJ 
STRAJ BTIME ETIME POINT TRAJ) SPEECH.INTERPOLATE (L R LEFTPOINT RIGHTPOINT LTIME RTIME LVALUE RVALUE K
 VALUE) NIL
SMASHFREE SPEECH.GLUE NIL SPEECH.OVERLAY NIL SPEECH.OVERLAY1 NIL SPEECH.INTERPOLATE NIL NIL
SMASH SPEECH.GLUE (POINT) SPEECH.OVERLAY NIL SPEECH.OVERLAY1 (TRAJ) SPEECH.INTERPOLATE NIL NIL
PROP SPEECH.GLUE NIL SPEECH.OVERLAY NIL SPEECH.OVERLAY1 NIL SPEECH.INTERPOLATE NIL NIL
TEST SPEECH.GLUE NIL SPEECH.OVERLAY NIL SPEECH.OVERLAY1 (STRAJ) SPEECH.INTERPOLATE (LEFTPOINT 
RIGHTPOINT) NIL
TESTFREE SPEECH.GLUE NIL SPEECH.OVERLAY NIL SPEECH.OVERLAY1 NIL SPEECH.INTERPOLATE NIL NIL
PREDICATE SPEECH.GLUE (IEQP) SPEECH.OVERLAY NIL SPEECH.OVERLAY1 (IGEQ IEQP FEQP ILEQ) 
SPEECH.INTERPOLATE (IGREATERP ILESSP) NIL
EFFECT SPEECH.GLUE (MAPC SPEECH.OVERLAY) SPEECH.OVERLAY (SPEECH.OVERLAY1) SPEECH.OVERLAY1 (MAPC 
PVECTOR.PUT) SPEECH.INTERPOLATE (PRINT SHOULDNT) NIL
CLISP SPEECH.GLUE (\BQUOTE for in do when) SPEECH.OVERLAY (for in when do) SPEECH.OVERLAY1 (for in 
while do when) SPEECH.INTERPOLATE (for in as when do) NIL
SPECVARS SPEECH.GLUE NIL SPEECH.OVERLAY NIL SPEECH.OVERLAY1 NIL SPEECH.INTERPOLATE NIL NIL
LOCALVARS SPEECH.GLUE NIL SPEECH.OVERLAY NIL SPEECH.OVERLAY1 NIL SPEECH.INTERPOLATE NIL NIL
APPLY SPEECH.GLUE NIL SPEECH.OVERLAY NIL SPEECH.OVERLAY1 NIL SPEECH.INTERPOLATE NIL NIL
ERROR SPEECH.GLUE NIL SPEECH.OVERLAY NIL SPEECH.OVERLAY1 NIL SPEECH.INTERPOLATE NIL NIL
LOCALFREEVARS SPEECH.GLUE NIL SPEECH.OVERLAY NIL SPEECH.OVERLAY1 NIL SPEECH.INTERPOLATE NIL NIL
ARGS SPEECH.GLUE NIL SPEECH.OVERLAY NIL SPEECH.OVERLAY1 NIL SPEECH.INTERPOLATE NIL NIL
USERTEMPLATES OP# (CALL) NIL
0 SPEECH.GLUE NIL SPEECH.OVERLAY NIL SPEECH.OVERLAY1 NIL SPEECH.INTERPOLATE NIL NIL

)