(PROGN (PRIN1 "Use LOADDB to load database files!
" T) (ERROR!))
("10-Aug-84 19:39:36" . {ERIS}<SPEECH>LEXICON>SYLLABLE.;2)
FNS (2-S-CLUSTER? 3-S-CLUSTER? ALL-PARSE DIPTHONG? FINISHFN NEW-SYLLABLE-PARSER NG-RULE S-CLUSTER-RULE
 S-CLUSTER-V-RULE CO-RULE ALLCSYLL SO-RULE SO? SYLLABLE-PARSER TEST TEST-SYLLABIFICATION VV-RULE)
(READATABASE)
(
CALL 2-S-CLUSTER? (MEMBER) 3-S-CLUSTER? (MEMBER) ALL-PARSE (RESETLST RESETSAVE OUTPUT OUTFILE EVALV 
U-CASE) DIPTHONG? (MEMBER) FINISHFN (NCONC) NEW-SYLLABLE-PARSER (UNPACK S-CLUSTER-RULE 
S-CLUSTER-V-RULE CO-RULE SO-RULE VV-RULE NG-RULE PACK) NG-RULE (NCONC LIST FINISHFN) S-CLUSTER-RULE (
NCONC LIST LAST CONS APPEND) S-CLUSTER-V-RULE (LIST NCONC CONS APPEND FINISHFN) CO-RULE (LIST LAST 
NLEFT APPEND CONS FINISHFN) ALLCSYLL NIL SO-RULE (LIST LAST NLEFT NCONC FINISHFN) SO? (MEMBER) 
SYLLABLE-PARSER (UNPACK PACK) TEST (MAPC CO-RULE TERPRI) TEST-SYLLABIFICATION (MAPC APPLY TERPRI) 
VV-RULE (LIST NCONC FINISHFN) NIL
BIND 2-S-CLUSTER? NIL 3-S-CLUSTER? NIL ALL-PARSE (TEMP) DIPTHONG? NIL FINISHFN NIL NEW-SYLLABLE-PARSER
 NIL NG-RULE (ONSET) S-CLUSTER-RULE NIL S-CLUSTER-V-RULE NIL CO-RULE NIL ALLCSYLL NIL SO-RULE NIL SO? 
NIL SYLLABLE-PARSER NIL TEST NIL TEST-SYLLABIFICATION NIL VV-RULE (ONSET) NIL
NLAMBDA 2-S-CLUSTER? NIL 3-S-CLUSTER? NIL ALL-PARSE NIL DIPTHONG? NIL FINISHFN NIL NEW-SYLLABLE-PARSER
 NIL NG-RULE NIL S-CLUSTER-RULE NIL S-CLUSTER-V-RULE NIL CO-RULE NIL ALLCSYLL NIL SO-RULE NIL SO? NIL 
SYLLABLE-PARSER NIL TEST NIL TEST-SYLLABIFICATION NIL VV-RULE NIL NIL
NOBIND 2-S-CLUSTER? NIL 3-S-CLUSTER? NIL ALL-PARSE NIL DIPTHONG? NIL FINISHFN NIL NEW-SYLLABLE-PARSER 
NIL NG-RULE NIL S-CLUSTER-RULE NIL S-CLUSTER-V-RULE NIL CO-RULE NIL ALLCSYLL NIL SO-RULE NIL SO? NIL 
SYLLABLE-PARSER NIL TEST NIL TEST-SYLLABIFICATION NIL VV-RULE NIL NIL
RECORD 2-S-CLUSTER? NIL 3-S-CLUSTER? NIL ALL-PARSE NIL DIPTHONG? NIL FINISHFN NIL NEW-SYLLABLE-PARSER 
NIL NG-RULE NIL S-CLUSTER-RULE NIL S-CLUSTER-V-RULE NIL CO-RULE NIL ALLCSYLL NIL SO-RULE NIL SO? NIL 
SYLLABLE-PARSER NIL TEST NIL TEST-SYLLABIFICATION NIL VV-RULE NIL NIL
CREATE 2-S-CLUSTER? NIL 3-S-CLUSTER? NIL ALL-PARSE (WORD) DIPTHONG? NIL FINISHFN NIL 
NEW-SYLLABLE-PARSER NIL NG-RULE NIL S-CLUSTER-RULE NIL S-CLUSTER-V-RULE NIL CO-RULE NIL ALLCSYLL NIL 
SO-RULE NIL SO? NIL SYLLABLE-PARSER NIL TEST NIL TEST-SYLLABIFICATION NIL VV-RULE NIL NIL
FETCH 2-S-CLUSTER? NIL 3-S-CLUSTER? NIL ALL-PARSE (INPUT CATEGORY STRUCTURE) DIPTHONG? NIL FINISHFN 
NIL NEW-SYLLABLE-PARSER (TRANSCRIPTION) NG-RULE NIL S-CLUSTER-RULE NIL S-CLUSTER-V-RULE NIL CO-RULE 
NIL ALLCSYLL NIL SO-RULE NIL SO? NIL SYLLABLE-PARSER NIL TEST NIL TEST-SYLLABIFICATION NIL VV-RULE NIL
 NIL
REPLACE 2-S-CLUSTER? NIL 3-S-CLUSTER? NIL ALL-PARSE (INPUT) DIPTHONG? NIL FINISHFN NIL 
NEW-SYLLABLE-PARSER (STRUCTURE) NG-RULE NIL S-CLUSTER-RULE NIL S-CLUSTER-V-RULE NIL CO-RULE NIL 
ALLCSYLL NIL SO-RULE NIL SO? NIL SYLLABLE-PARSER NIL TEST NIL TEST-SYLLABIFICATION NIL VV-RULE NIL NIL
REFFREE 2-S-CLUSTER? (2-S-CLUSTERS) 3-S-CLUSTER? (3-S-CLUSTERS) ALL-PARSE NIL DIPTHONG? (DIPTHONGS) 
FINISHFN (FRONT REST) NEW-SYLLABLE-PARSER NIL NG-RULE NIL S-CLUSTER-RULE NIL S-CLUSTER-V-RULE NIL 
CO-RULE (CO VOWELS) ALLCSYLL NIL SO-RULE NIL SO? (SO) SYLLABLE-PARSER (SYLLABLE-RULES) TEST NIL 
TEST-SYLLABIFICATION NIL VV-RULE NIL NIL
REF 2-S-CLUSTER? (SEGMENTLIST) 3-S-CLUSTER? (SEGMENTLIST) ALL-PARSE (FILE WORDLIST) DIPTHONG? (
SEGMENTLIST) FINISHFN (RULE) NEW-SYLLABLE-PARSER NIL NG-RULE (SEGMENTLIST) S-CLUSTER-RULE NIL 
S-CLUSTER-V-RULE (SEGMENTLIST) CO-RULE (SEGMENTLIST) ALLCSYLL (ENDOFFRONT) SO-RULE (SEGMENTLIST) SO? (
SEGMENT) SYLLABLE-PARSER (WORD SEGMENT-LIST) TEST (WORDS WORD) TEST-SYLLABIFICATION (WORDLIST RULE 
WORD) VV-RULE (SEGMENTLIST) NIL
SETFREE 2-S-CLUSTER? NIL 3-S-CLUSTER? NIL ALL-PARSE NIL DIPTHONG? NIL FINISHFN NIL NEW-SYLLABLE-PARSER
 NIL NG-RULE NIL S-CLUSTER-RULE NIL S-CLUSTER-V-RULE NIL CO-RULE NIL ALLCSYLL NIL SO-RULE NIL SO? NIL 
SYLLABLE-PARSER (TEMP) TEST NIL TEST-SYLLABIFICATION NIL VV-RULE NIL NIL
SET 2-S-CLUSTER? NIL 3-S-CLUSTER? NIL ALL-PARSE (ITEM WREC) DIPTHONG? NIL FINISHFN NIL 
NEW-SYLLABLE-PARSER (TEMP) NG-RULE (NG V FRONT REST) S-CLUSTER-RULE (SEGMENT ONSET FOLLOWING 
SEGMENTLIST) S-CLUSTER-V-RULE (VINFRONT ONSET V FRONT REST) CO-RULE (ONSET PREVIOUSYLL FRONT REST) 
ALLCSYLL (SEGMENT) SO-RULE (PREVIOUSSYLL ONSET SEGMENT V FRONT REST) SO? NIL SYLLABLE-PARSER (RULE) 
TEST NIL TEST-SYLLABIFICATION NIL VV-RULE (V1 V2 FRONT REST) NIL
SMASHFREE 2-S-CLUSTER? NIL 3-S-CLUSTER? NIL ALL-PARSE NIL DIPTHONG? NIL FINISHFN NIL 
NEW-SYLLABLE-PARSER NIL NG-RULE NIL S-CLUSTER-RULE NIL S-CLUSTER-V-RULE NIL CO-RULE NIL ALLCSYLL NIL 
SO-RULE NIL SO? NIL SYLLABLE-PARSER NIL TEST NIL TEST-SYLLABIFICATION NIL VV-RULE NIL NIL
SMASH 2-S-CLUSTER? NIL 3-S-CLUSTER? NIL ALL-PARSE NIL DIPTHONG? NIL FINISHFN NIL NEW-SYLLABLE-PARSER (
WREC) NG-RULE NIL S-CLUSTER-RULE NIL S-CLUSTER-V-RULE NIL CO-RULE NIL ALLCSYLL NIL SO-RULE NIL SO? NIL
 SYLLABLE-PARSER NIL TEST NIL TEST-SYLLABIFICATION NIL VV-RULE NIL NIL
PROP 2-S-CLUSTER? NIL 3-S-CLUSTER? NIL ALL-PARSE NIL DIPTHONG? NIL FINISHFN NIL NEW-SYLLABLE-PARSER 
NIL NG-RULE NIL S-CLUSTER-RULE NIL S-CLUSTER-V-RULE NIL CO-RULE NIL ALLCSYLL NIL SO-RULE NIL SO? NIL 
SYLLABLE-PARSER NIL TEST NIL TEST-SYLLABIFICATION NIL VV-RULE NIL NIL
TEST 2-S-CLUSTER? NIL 3-S-CLUSTER? NIL ALL-PARSE (CATEGORY) DIPTHONG? NIL FINISHFN NIL 
NEW-SYLLABLE-PARSER NIL NG-RULE (REST) S-CLUSTER-RULE NIL S-CLUSTER-V-RULE (REST FRONT) CO-RULE (REST 
FRONT) ALLCSYLL NIL SO-RULE (REST FRONT) SO? NIL SYLLABLE-PARSER NIL TEST NIL TEST-SYLLABIFICATION NIL
 VV-RULE (REST) NIL
TESTFREE 2-S-CLUSTER? NIL 3-S-CLUSTER? NIL ALL-PARSE (DEBUG) DIPTHONG? NIL FINISHFN (DEBUG) 
NEW-SYLLABLE-PARSER NIL NG-RULE NIL S-CLUSTER-RULE NIL S-CLUSTER-V-RULE NIL CO-RULE NIL ALLCSYLL NIL 
SO-RULE NIL SO? NIL SYLLABLE-PARSER NIL TEST (DEBUG) TEST-SYLLABIFICATION NIL VV-RULE NIL NIL
PREDICATE 2-S-CLUSTER? NIL 3-S-CLUSTER? NIL ALL-PARSE (OPENP) DIPTHONG? NIL FINISHFN (BOUNDP) 
NEW-SYLLABLE-PARSER NIL NG-RULE (EQUAL VOWEL?) S-CLUSTER-RULE (3-S-CLUSTER? VOWEL? 2-S-CLUSTER? EQUAL)
 S-CLUSTER-V-RULE (VOWEL? 3-S-CLUSTER? 2-S-CLUSTER?) CO-RULE (ALLCSYLL MEMBER) ALLCSYLL (EQUAL 
CONSONANT?) SO-RULE (SO? ALLCSYLL CONSONANT? VOWEL?) SO? NIL SYLLABLE-PARSER NIL TEST (BOUNDP) 
TEST-SYLLABIFICATION NIL VV-RULE (VOWEL? DIPTHONG?) NIL
EFFECT 2-S-CLUSTER? NIL 3-S-CLUSTER? NIL ALL-PARSE (CATEGORIZE TERPRI PRIN1 NEW-SYLLABLE-PARSER 
PARSE-TEST TAB PRINTFOOT) DIPTHONG? NIL FINISHFN (PRIN1 SPACES TERPRI) NEW-SYLLABLE-PARSER NIL NG-RULE
 NIL S-CLUSTER-RULE NIL S-CLUSTER-V-RULE NIL CO-RULE NIL ALLCSYLL NIL SO-RULE NIL SO? NIL 
SYLLABLE-PARSER (APPLY) TEST (PRIN1 SPACES) TEST-SYLLABIFICATION (PRIN1) VV-RULE NIL NIL
CLISP 2-S-CLUSTER? NIL 3-S-CLUSTER? NIL ALL-PARSE (for in do printout) DIPTHONG? NIL FINISHFN (
printout) NEW-SYLLABLE-PARSER NIL NG-RULE (bind while do finally) S-CLUSTER-RULE (for in old bind join
 finally) S-CLUSTER-V-RULE (bind while do finally) CO-RULE (bind while do finally) ALLCSYLL (for in 
while always) SO-RULE (bind while do finally for in always) SO? NIL SYLLABLE-PARSER (for in bind do 
finally) TEST (for in do printout) TEST-SYLLABIFICATION (for in do printout) VV-RULE (bind while do 
finally) NIL
SPECVARS 2-S-CLUSTER? NIL 3-S-CLUSTER? NIL ALL-PARSE NIL DIPTHONG? NIL FINISHFN NIL 
NEW-SYLLABLE-PARSER NIL NG-RULE NIL S-CLUSTER-RULE NIL S-CLUSTER-V-RULE NIL CO-RULE NIL ALLCSYLL NIL 
SO-RULE NIL SO? NIL SYLLABLE-PARSER NIL TEST NIL TEST-SYLLABIFICATION NIL VV-RULE NIL NIL
LOCALVARS 2-S-CLUSTER? NIL 3-S-CLUSTER? NIL ALL-PARSE NIL DIPTHONG? NIL FINISHFN NIL 
NEW-SYLLABLE-PARSER NIL NG-RULE NIL S-CLUSTER-RULE NIL S-CLUSTER-V-RULE NIL CO-RULE NIL ALLCSYLL NIL 
SO-RULE NIL SO? NIL SYLLABLE-PARSER NIL TEST NIL TEST-SYLLABIFICATION NIL VV-RULE NIL NIL
APPLY 2-S-CLUSTER? NIL 3-S-CLUSTER? NIL ALL-PARSE NIL DIPTHONG? NIL FINISHFN NIL NEW-SYLLABLE-PARSER 
NIL NG-RULE NIL S-CLUSTER-RULE NIL S-CLUSTER-V-RULE NIL CO-RULE NIL ALLCSYLL NIL SO-RULE NIL SO? NIL 
SYLLABLE-PARSER NIL TEST NIL TEST-SYLLABIFICATION NIL VV-RULE NIL NIL
ERROR 2-S-CLUSTER? NIL 3-S-CLUSTER? NIL ALL-PARSE NIL DIPTHONG? NIL FINISHFN NIL NEW-SYLLABLE-PARSER 
NIL NG-RULE NIL S-CLUSTER-RULE NIL S-CLUSTER-V-RULE NIL CO-RULE NIL ALLCSYLL NIL SO-RULE NIL SO? NIL 
SYLLABLE-PARSER (apply) TEST NIL TEST-SYLLABIFICATION (apply) VV-RULE NIL NIL
LOCALFREEVARS 2-S-CLUSTER? NIL 3-S-CLUSTER? NIL ALL-PARSE NIL DIPTHONG? NIL FINISHFN NIL 
NEW-SYLLABLE-PARSER NIL NG-RULE NIL S-CLUSTER-RULE NIL S-CLUSTER-V-RULE NIL CO-RULE NIL ALLCSYLL NIL 
SO-RULE NIL SO? NIL SYLLABLE-PARSER NIL TEST NIL TEST-SYLLABIFICATION NIL VV-RULE NIL NIL
ARGS 2-S-CLUSTER? NIL 3-S-CLUSTER? NIL ALL-PARSE NIL DIPTHONG? NIL FINISHFN NIL NEW-SYLLABLE-PARSER 
NIL NG-RULE NIL S-CLUSTER-RULE NIL S-CLUSTER-V-RULE NIL CO-RULE NIL ALLCSYLL NIL SO-RULE NIL SO? NIL 
SYLLABLE-PARSER NIL TEST NIL TEST-SYLLABIFICATION NIL VV-RULE NIL NIL
USERTEMPLATES SPREADAPPLY (CALL FUNCTIONAL EVAL . PPE) SPREADAPPLY* (CALL FUNCTIONAL .. EVAL) 
UNINTERRUPTABLY (CALL .. EVAL) OP# (CALL) SETQ.NOREF (CALL SET EVAL . PPE) SHAZAM (CALL .. NIL) 
perform (MACRO ARGS (PERFORMTRAN ARGS T)) PERFORM (MACRO ARGS (PERFORMTRAN ARGS T)) NIL
0 2-S-CLUSTER? NIL 3-S-CLUSTER? NIL ALL-PARSE NIL DIPTHONG? NIL FINISHFN NIL NEW-SYLLABLE-PARSER NIL 
NG-RULE NIL S-CLUSTER-RULE NIL S-CLUSTER-V-RULE NIL CO-RULE NIL ALLCSYLL NIL SO-RULE NIL SO? NIL 
SYLLABLE-PARSER NIL TEST NIL TEST-SYLLABIFICATION NIL VV-RULE NIL NIL

)