(PROGN (PRIN1 "Use LOADDB to load database files! " T) (ERROR!)) ("21-Jun-84 20:55:11" . {ERIS}<SPEECH>SYNTH.FPKG;3) FNS (CREATE.SLICES CREATE.SLICES1 FIND.PVECTOR.NAME PVECTOR.DEFAULT.SPEC PVECTOR.GET PVECTOR.PUT SYNTH.TMIN SYNTH.TMAX SYNTH.INIT SYNTH.SLIST SYNTH.SLIST1) (READATABASE) ( CALL CREATE.SLICES (MAPCAR CREATE.SLICES1) CREATE.SLICES1 (MKATOM SUBSTRING ADD1 STRPOS SYNTH.SLIST EVAL) FIND.PVECTOR.NAME (MKATOM PACK*) PVECTOR.DEFAULT.SPEC (PVECTOR.GET LIST APPEND PVECTOR.PUT) PVECTOR.GET (SELECTQ SHOULDNT) PVECTOR.PUT (SELECTQ SHOULDNT) SYNTH.TMIN (SELECTQ SHOULDNT) SYNTH.TMAX (SELECTQ LAST ASSOC SHOULDNT) SYNTH.INIT NIL SYNTH.SLIST (IDIFFERENCE SYNTH.SLIST1 ASSOC) SYNTH.SLIST1 (PVECTOR.GET CONS SUB1 LAST APPEND LIST ADD1) NIL BIND CREATE.SLICES NIL CREATE.SLICES1 NIL FIND.PVECTOR.NAME NIL PVECTOR.DEFAULT.SPEC NIL PVECTOR.GET NIL PVECTOR.PUT NIL SYNTH.TMIN NIL SYNTH.TMAX NIL SYNTH.INIT NIL SYNTH.SLIST NIL SYNTH.SLIST1 NIL NIL NLAMBDA CREATE.SLICES NIL CREATE.SLICES1 NIL FIND.PVECTOR.NAME NIL PVECTOR.DEFAULT.SPEC NIL PVECTOR.GET NIL PVECTOR.PUT NIL SYNTH.TMIN NIL SYNTH.TMAX NIL SYNTH.INIT NIL SYNTH.SLIST NIL SYNTH.SLIST1 NIL NIL NOBIND CREATE.SLICES NIL CREATE.SLICES1 NIL FIND.PVECTOR.NAME NIL PVECTOR.DEFAULT.SPEC NIL PVECTOR.GET NIL PVECTOR.PUT NIL SYNTH.TMIN NIL SYNTH.TMAX NIL SYNTH.INIT (T) SYNTH.SLIST NIL SYNTH.SLIST1 NIL NIL RECORD CREATE.SLICES NIL CREATE.SLICES1 NIL FIND.PVECTOR.NAME NIL PVECTOR.DEFAULT.SPEC NIL PVECTOR.GET (PVECTOR) PVECTOR.PUT (PVECTOR) SYNTH.TMIN (SLIST) SYNTH.TMAX (SLIST SP.POINT) SYNTH.INIT NIL SYNTH.SLIST (SLIST) SYNTH.SLIST1 (SP.POINT) NIL CREATE CREATE.SLICES NIL CREATE.SLICES1 NIL FIND.PVECTOR.NAME NIL PVECTOR.DEFAULT.SPEC (PVECTOR POINT2 ) PVECTOR.GET NIL PVECTOR.PUT NIL SYNTH.TMIN NIL SYNTH.TMAX NIL SYNTH.INIT (PVECTOR) SYNTH.SLIST ( PVECTOR) SYNTH.SLIST1 (POINT2) NIL FETCH CREATE.SLICES NIL CREATE.SLICES1 NIL FIND.PVECTOR.NAME NIL PVECTOR.DEFAULT.SPEC NIL PVECTOR.GET (GAIN AB BNP FNP ANP BNZ FNZ F6 B6 A6 F5 B5 A5 F4 B4 A4 F3 B3 A3 F2 B2 A2 F1 AV ASV FGP BGP FGZ BGZ BGS SWITCH AFRIC AASPIR NCF F0 A1 B1) PVECTOR.PUT NIL SYNTH.TMIN (CV) SYNTH.TMAX (CV TIME ALIST) SYNTH.INIT NIL SYNTH.SLIST (TMIN TMAX SOUND CV COMMENT ALIST) SYNTH.SLIST1 (TIME) NIL REPLACE CREATE.SLICES NIL CREATE.SLICES1 NIL FIND.PVECTOR.NAME NIL PVECTOR.DEFAULT.SPEC (TYPE CV COMMENT TIME VALUE) PVECTOR.GET NIL PVECTOR.PUT (GAIN AB B2 BNP FNP ANP BNZ FNZ F6 B6 A6 F5 B5 A5 F4 B4 A4 F3 B3 A3 F2 A2 F1 AV ASV FGP BGP FGZ BGZ BGS SWITCH AFRIC AASPIR NCF F0 A1 B1) SYNTH.TMIN NIL SYNTH.TMAX NIL SYNTH.INIT (SOUND CV COMMENT DURATION AV ASV AASPIR AFRIC F0 FGP BGP FGZ BGZ FNP BNP FNZ BNZ BGS F1 B1 F2 B2 F3 B3 F4 B4 F5 B5 F6 B6 A1 ANP A2 A3 A4 A5 A6 AB SWITCH GAIN NCF) SYNTH.SLIST (TYPE SOUND CV COMMENT) SYNTH.SLIST1 (TIME VALUE) NIL REFFREE CREATE.SLICES NIL CREATE.SLICES1 NIL FIND.PVECTOR.NAME NIL PVECTOR.DEFAULT.SPEC ( PVECTOR.PNAMES PVECTOR.DEFAULT) PVECTOR.GET NIL PVECTOR.PUT NIL SYNTH.TMIN NIL SYNTH.TMAX NIL SYNTH.INIT NIL SYNTH.SLIST (PVECTOR.PNAMES) SYNTH.SLIST1 (PVECTOR.DEFAULT) NIL REF CREATE.SLICES (SLISTLIST) CREATE.SLICES1 (SLISTNAME NAME) FIND.PVECTOR.NAME (P) PVECTOR.DEFAULT.SPEC (PNAME TMIN TMAX DEFAULT.PARAM.BUFFER) PVECTOR.GET (PNAME PVECTOR) PVECTOR.PUT ( PNAME VALUE) SYNTH.TMIN (SLIST) SYNTH.TMAX (SLIST) SYNTH.INIT NIL SYNTH.SLIST (SLIST PNAME) SYNTH.SLIST1 (PNAME TMIN TMAX SEGMENT) NIL SETFREE CREATE.SLICES NIL CREATE.SLICES1 NIL FIND.PVECTOR.NAME NIL PVECTOR.DEFAULT.SPEC NIL PVECTOR.GET NIL PVECTOR.PUT NIL SYNTH.TMIN NIL SYNTH.TMAX NIL SYNTH.INIT (PVECTOR.DEFAULT) SYNTH.SLIST (DURATION) SYNTH.SLIST1 NIL NIL SET CREATE.SLICES NIL CREATE.SLICES1 NIL FIND.PVECTOR.NAME NIL PVECTOR.DEFAULT.SPEC (DEFAULT TRAJ) PVECTOR.GET NIL PVECTOR.PUT NIL SYNTH.TMIN NIL SYNTH.TMAX NIL SYNTH.INIT NIL SYNTH.SLIST (TMIN TMAX SEGMENT) SYNTH.SLIST1 (POINT DEFAULT TRAJ) NIL SMASHFREE CREATE.SLICES NIL CREATE.SLICES1 NIL FIND.PVECTOR.NAME NIL PVECTOR.DEFAULT.SPEC NIL PVECTOR.GET NIL PVECTOR.PUT NIL SYNTH.TMIN NIL SYNTH.TMAX NIL SYNTH.INIT NIL SYNTH.SLIST NIL SYNTH.SLIST1 NIL NIL SMASH CREATE.SLICES NIL CREATE.SLICES1 NIL FIND.PVECTOR.NAME NIL PVECTOR.DEFAULT.SPEC NIL PVECTOR.GET NIL PVECTOR.PUT (PVECTOR) SYNTH.TMIN NIL SYNTH.TMAX NIL SYNTH.INIT NIL SYNTH.SLIST NIL SYNTH.SLIST1 NIL NIL PROP CREATE.SLICES NIL CREATE.SLICES1 NIL FIND.PVECTOR.NAME NIL PVECTOR.DEFAULT.SPEC NIL PVECTOR.GET NIL PVECTOR.PUT NIL SYNTH.TMIN NIL SYNTH.TMAX NIL SYNTH.INIT NIL SYNTH.SLIST NIL SYNTH.SLIST1 NIL NIL TEST CREATE.SLICES NIL CREATE.SLICES1 NIL FIND.PVECTOR.NAME NIL PVECTOR.DEFAULT.SPEC NIL PVECTOR.GET NIL PVECTOR.PUT NIL SYNTH.TMIN NIL SYNTH.TMAX NIL SYNTH.INIT NIL SYNTH.SLIST NIL SYNTH.SLIST1 (POINT) NIL TESTFREE CREATE.SLICES NIL CREATE.SLICES1 NIL FIND.PVECTOR.NAME NIL PVECTOR.DEFAULT.SPEC NIL PVECTOR.GET NIL PVECTOR.PUT NIL SYNTH.TMIN NIL SYNTH.TMAX NIL SYNTH.INIT NIL SYNTH.SLIST NIL SYNTH.SLIST1 NIL NIL PREDICATE CREATE.SLICES NIL CREATE.SLICES1 NIL FIND.PVECTOR.NAME NIL PVECTOR.DEFAULT.SPEC NIL PVECTOR.GET NIL PVECTOR.PUT NIL SYNTH.TMIN NIL SYNTH.TMAX NIL SYNTH.INIT NIL SYNTH.SLIST NIL SYNTH.SLIST1 (IGREATERP ILESSP) NIL EFFECT CREATE.SLICES NIL CREATE.SLICES1 (SET PRIN1) FIND.PVECTOR.NAME NIL PVECTOR.DEFAULT.SPEC (MAPC) PVECTOR.GET NIL PVECTOR.PUT NIL SYNTH.TMIN NIL SYNTH.TMAX NIL SYNTH.INIT NIL SYNTH.SLIST (MAPC) SYNTH.SLIST1 (PVECTOR.PUT) NIL CLISP CREATE.SLICES (for in collect) CREATE.SLICES1 NIL FIND.PVECTOR.NAME NIL PVECTOR.DEFAULT.SPEC ( for in do) PVECTOR.GET NIL PVECTOR.PUT NIL SYNTH.TMIN NIL SYNTH.TMAX NIL SYNTH.INIT NIL SYNTH.SLIST ( for in do) SYNTH.SLIST1 NIL NIL SPECVARS CREATE.SLICES NIL CREATE.SLICES1 NIL FIND.PVECTOR.NAME NIL PVECTOR.DEFAULT.SPEC NIL PVECTOR.GET NIL PVECTOR.PUT NIL SYNTH.TMIN NIL SYNTH.TMAX NIL SYNTH.INIT NIL SYNTH.SLIST NIL SYNTH.SLIST1 NIL NIL LOCALVARS CREATE.SLICES NIL CREATE.SLICES1 NIL FIND.PVECTOR.NAME NIL PVECTOR.DEFAULT.SPEC NIL PVECTOR.GET NIL PVECTOR.PUT NIL SYNTH.TMIN NIL SYNTH.TMAX NIL SYNTH.INIT NIL SYNTH.SLIST NIL SYNTH.SLIST1 NIL NIL APPLY CREATE.SLICES NIL CREATE.SLICES1 NIL FIND.PVECTOR.NAME NIL PVECTOR.DEFAULT.SPEC NIL PVECTOR.GET NIL PVECTOR.PUT NIL SYNTH.TMIN NIL SYNTH.TMAX NIL SYNTH.INIT NIL SYNTH.SLIST NIL SYNTH.SLIST1 NIL NIL ERROR CREATE.SLICES NIL CREATE.SLICES1 NIL FIND.PVECTOR.NAME NIL PVECTOR.DEFAULT.SPEC NIL PVECTOR.GET NIL PVECTOR.PUT NIL SYNTH.TMIN NIL SYNTH.TMAX NIL SYNTH.INIT NIL SYNTH.SLIST NIL SYNTH.SLIST1 NIL NIL LOCALFREEVARS CREATE.SLICES NIL CREATE.SLICES1 NIL FIND.PVECTOR.NAME NIL PVECTOR.DEFAULT.SPEC NIL PVECTOR.GET NIL PVECTOR.PUT NIL SYNTH.TMIN NIL SYNTH.TMAX NIL SYNTH.INIT NIL SYNTH.SLIST NIL SYNTH.SLIST1 NIL NIL ARGS CREATE.SLICES NIL CREATE.SLICES1 NIL FIND.PVECTOR.NAME NIL PVECTOR.DEFAULT.SPEC NIL PVECTOR.GET NIL PVECTOR.PUT NIL SYNTH.TMIN NIL SYNTH.TMAX NIL SYNTH.INIT NIL SYNTH.SLIST NIL SYNTH.SLIST1 NIL NIL USERTEMPLATES SETQ.NOREF (CALL SET EVAL . PPE) SPREADAPPLY (CALL FUNCTIONAL EVAL . PPE) OP# (CALL) SPREADAPPLY* (CALL FUNCTIONAL .. EVAL) perform (MACRO ARGS (PERFORMTRAN ARGS T)) SHAZAM (CALL .. NIL) PERFORM (MACRO ARGS (PERFORMTRAN ARGS T)) UNINTERRUPTABLY (CALL .. EVAL) NIL 0 CREATE.SLICES NIL CREATE.SLICES1 NIL FIND.PVECTOR.NAME NIL PVECTOR.DEFAULT.SPEC NIL PVECTOR.GET NIL PVECTOR.PUT NIL SYNTH.TMIN NIL SYNTH.TMAX NIL SYNTH.INIT NIL SYNTH.SLIST NIL SYNTH.SLIST1 NIL NIL )