;Z=28495 ; SHRDLV (DEFUN USER (A B) (PROG (X) (SETQ X (CATCH (SEVAL A))) (AND X (PROGN (COND ((NOT (ATOM X)) (SETQ X (CDR X)))) (TERPRI) (PRINC X) (TERPRI))))) (DEFUN UG () (THROW (CAT (RULE NODE) '/ NEEDS/ SEMANTICS/ NOT/ YET/ INSTALLED/.) DIE)) (DEFUN INJECT (A B) (CONS (CAR B) (CONS A (CDR B)))) (DEFUN PLUGIN (A B C) (PROG (X) (SETQ X (SUBLIS (LIST (CONS B A)) C)) (COND ((EQ X C) (THROW (CONS X (MAKNAM (EXPLODEC (LIST 'NO B 'SLOT 'FOR A 'IN C)))) 'PLUG))) (RETURN X))) (DEFUN PLUGOBJ (A C) (PROG (X) (SETQ X (SUBLIS (LIST (CONS 'OBJ A)) C)) (RETURN (COND ((EQ X C) (PLUGIN A 'OBJ2 C)) (X))))) (DEFUN CLAUSE FEXPR (X) (PROG (TENSE NEG A) (SETQ A (EVAL (CAR X))) (COND (TENSE (SETQ A (LIST TENSE A)))) (COND (NEG (SETQ A (LIST 'NOT A)))) (RETURN A))) (DEFUN CHECK (DOM SUB) (PROG (X) (COND ((NOT (OR (ATOM DOM) (ATOM SUB))) (SETQ X (EVAL (CADR (OR (ASSQ (CADR SUB) DOM) (ASSQ (CAR SUB) DOM))))))) (COND ((NUMBERP X) (SETQ BIAS (PLUS BIAS X))) ((NOT (ATOM SUB))(EVAL (CADDR SUB)))) (RETURN DOM))) (SSTATUS TTY 20673803282. 20707344539.) (GRAMMAR) (SENTENCE UTTERANCE 0 (PROG2 (PRINT (DG)) NIL)) ; SUPERCLAUSE (UTTERANCE (NOISE UTTERANCE) 0 (RG)) (UTTERANCE (ADVGP UTTERANCE) -1 (APPEND (LG) (LIST (RG)))) (UTTERANCE (UTTERANCE ADVGP) -1 (APPEND (RG) (LIST (LG)))) (ADVGP (INADV ASSERTION) 0 (LIST (LG) (RG))) (ADVGP ADV 0 (LIST 'ADV (DG))) ; (ADVGP XVP -2 (LIST 'WHEN (DG))) ; WAITING FOR -ING INFORMATION (ADVGP INF -1 (LIST 'TOACHIEVE (PLUGIN 'YOU 'SUBJ (DG)))) ; ASSERTIONS, COMMANDS, QUESTIONS (UTTERANCE ASSERTION 0 ((LAMBDA (MOOD) (LIST 'ASSERT (DG))) 'DECL)) (UTTERANCE COMMAND 0 ((LAMBDA (MOOD) (LIST 'ACHIEVE (DG))) 'IMP)) (UTTERANCE QUESTION 0 ((LAMBDA (MOOD) (LIST 'QUERY (DG))) 'INT)) (UTTERANCE WHQUESTION 0 ((LAMBDA (MOOD) (LIST 'QUERY (DG))) 'INT)) (UTTERANCE (WHQUESTION CNP) 1 ((LAMBDA (MOOD) (LIST 'CHOICE (LG) (RG))) 'INT)) (UTTERANCE (WHATIF ASSERTION) 0 (LIST 'ASSUMING (CADR (RG)) '(QUERY))) ; (UTTERANCE NP -2 (DG)) ; WAITING FOR MORE SMARTS (CONJUTTER (CONJ UTTERANCE) 0 (LIST (LG) (RG))) (CONJUTTER (UTTERANCE CONJUTTER) -2 (INJECT (LG) (RG))) (UTTERANCE (UTTERANCE CONJUTTER) 0 (INJECT (LG) (RG))) (UTTERANCE (PCONJ CONJUTTER) 0 (PROG2 (LG) (RG))) (ASSERTION (NP XVP) 0 (CLAUSE (PLUGIN (LG) 'SUBJ (RG)))) (COMMAND VP 0 (CLAUSE (PLUGIN 'YOU 'SUBJ (DG)))) (COMMAND (BHD VP) 0 (CLAUSE (PLUGIN 'YOU 'SUBJ (RG)))) ; NEEDS FIXING (COMMAND (GO COMMAND) -1 (RG)) (WHQUESTION (WHNP INV) 0 ((LAMBDA (WHOB) (CLAUSE (PLUGOBJ (LG) (RG)))) T)) (WHQUESTION (WH INV) 0 ((LAMBDA (WHOB) (CLAUSE (APPEND (RG) (LIST ( LG))))) T)) (QUESTION INV 0 ((LAMBDA (WHOB) (DG)) T)) (WHQUESTION (WHNP XVP) 0 (PLUGIN (LG) 'SUBJ (RG))) (QUESTION (WHATABOUT NP) 0 (RG)) ; (QUESTION WHNP -1 (DG)) ; MORE SMARTS (QUESTION (HOW ADV) -1 (LIST (LIST 'WHAT (GET (CAR (RG)) 'ATTR)))) (WHATABOUT (WHAT ABOUT) 0 NIL) (WHATIF (WHAT IF) 0 NIL) ; VERB PHRASES (XVP (AUX XVP) 0 (PLUGIN (RG) 'ACT (LG))) (XVP VP 0 (DG)) (XVP (ADV XVP) 0 (APPEND (RG) (LIST (LG)))) (VP (VP NP) (PROG (X) (SETQ X (CHECK (LC) '(NP (RC)))) (COND ((NUMBERP (CAR X)) (SETQ X (CONS (1- (CAR X)) (CDR X))) (COND ((MINUSP (CAR X)) (DN) (DN))))) (RETURN X)) (PLUGOBJ (RG) (LG))) (VP (VP ASSERTION) (PROG (X) (SETQ X (LC)) (COND ((NUMBERP (CAR X)) (SETQ X (CONS (1- (CAR X)) (CDR X))) (COND ((MINUSP (CAR X)) (DN) (DN))))) (RETURN X)) (PLUGOBJ (RG) (LG))) (VP (VP PREP) (PROG2 (DN) (CHECK (LC) (LIST 'PARTICLE (RC)))) (APPEND (LG) (RG))) (VP (VP ADV) (CHECK (LC) (RC)) ((LAMBDA (LG RG) (COND ((EQ (CAR LG) 'BE) (PLUGIN (RG) 'OBJ LG)) ((NULL RG) LG) ((APPEND LG (LIST (RG)))))) (LG) (RG))) (VP (VP ADJ) (CHECK (LC) (RC)) (PLUGIN (RG) 'OBJ (LG))) (VP (VP COMPNP) 0 (PLUGIN (RG) 'OBJ (LG))) (VP VERB (DC) (DG)) (VERB BHD '(1) (DG)) ; (VERB AUX -2 (UG)) ; WAITING FOR MORE SMARTS ; CONJOINED ADJECTIVES AND ADVERBS (CONJVM (CONJ ADJ) 0 (LIST (LG) (RG))) (CONJVM (ADJ CONJVM) -2 (INJECT (LG) (RG))) (ADJ (ADJ CONJVM) 0 (INJECT (LG) (RG))) (ADJ (PCONJ CONJVM) 0 (PROG2 (LG) (RG))) (ADJ NADJ 0 (DG)) (CONJVM (CONJ ADV) 0 (LIST (LG) (RG))) (CONJVM (ADV CONJVM) -2 (INJECT (LG) (RG))) (ADV (ADV CONJVM) 0 (INJECT (LG) (RG))) (ADV (PCONJ CONJVM) 0 (PROG2 (LG) (RG))) (ADJ (ADJQUAL ADJ) 0 (RG)) ; (ADJ VP -2 (DG)) ; WAITING FOR MORE SMARTS. NEEDS -ED INFORMATION (ADV (PREP NP) '(PREP) (LIST (CAR (LG)) (RG))) (ADV (ADJQUAL ADV) 0 (RG)) (ADJQUAL QDET 0 (DG)) (PP (PREP NP) (LIST (CAR (LC))) (LIST (CAR (LG)) (RG))) (PP PREP -2 (DG)) (INF (TO XVP) 0 (RG)) ; "AUXILIARIES" (AUX (AUX ADV) 0 (PROG2 (RG) (LG))) (AUX BHD 0 (CADR (ASSOC (CAR (DG)) '((BE ACT) (OWN (PAST ACT)) (DO ACT))))) (BHD (BHD ADV) 0 (PROG2 (RG) (LG))) (BHD BE '(1 (ADJ 2)) (DG)) ; WHUMPS (WHNP WHN 0 (DG)) (WHNP (WHADJ NP) 0 (APPEND (LG) (CDR (RG)))) (WH WHADV 0 (DG)) (WH (HOW ADJ) 0 (LIST (LIST 'WHAT (GET (CAR (RG)) 'ATTR)))) (WH (HOW ADV) 0 (LIST (LIST 'WHAT (GET (CAR (RG)) 'ATTR)))) (WHADJ (HOW ADJ) 0 (LIST 'CHOOSE (LIST 'WHAT (GET (CAR (RG)) 'ATTR)))) (WHADJ (WHADJ NOUN) 1 (LIST (CONS 'WHAT (RG)))) ; INVERSIONS (INV (INV1 XVP) 0 ((LAMBDA (LG) (PLUGIN (PLUGIN (CDR LG) 'SUBJ (RG)) 'ACT (CAR LG))) (LG))) (INV1 (AUX NP) 0 (CONS (LG) (RG))) (INV INV2 0 (DG)) (INV2 (INV2 NP) (CHECK (LC) (RC)) (PLUGOBJ (RG) (LG))) (INV2 (INV2 ADV) (CHECK (LC) (RC)) (LG)) (INV2 (INV2 PREP) (CHECK (LC) (RC)) (PLUGIN (COND (WHOB (APPEND (RG) 'OBJ)) ((CAR (RG)))) 'OBJ (LG))) (INV2 (INV2 ADJ) (CHECK (LC) (RC)) (PLUGIN (RG) 'OBJ (LG))) (INV2 (INV2 COMPNP) (CHECK (LC) (RC)) (PLUGIN (RG) 'OBJ (LG))) (INV2 (BHD NP) (LC) (PLUGIN (RG) 'SUBJ (LG))) ; NOUN PHRASES (NP INF -1 (DG)) (NP (WH INF) -1 (APPEND (RG) (LIST (LG)))) (NP (WH ASSERTION) -2 (APPEND (RG) (LIST (LG)))) (NP (WHNP INF) 0 (PLUGOBJ (LG) (RG))) (NP (WHNP ASSERTION) 0 (PLUGOBJ (LG) (RG))) (NP (THAT ASSERTION) -1 (RG)) (NP (WHNP XVP) -2 (PLUGIN (LG) 'SUBJ (RG))) ; NEEDS SMARTS (NP (DQDET OFNP) 2 (LIST 'OF (CADR (LG)) (RG))) (DQDET (DET QDET) 0 (CAR (RG))) (OFNP (OF NP) 0 (RG)) (NP (NPS NP) 0 (LIST 'OF (RG) (LG))) (NPS (NP QS) 0 (LG)) (CONJNP (CONJ NP) 0 (LIST (LG) (RG))) (CONJNP (NP CONJNP) -1 (INJECT (LG) (RG))) (NP (NP CONJNP) 0 (INJECT (LG) (RG))) (CNP (NP CONJNP) 0 (INJECT (LG) (RG))) (NP (PCONJ CONJNP) 0 (PROG2 (LG) (RG))) (NP NP1 (DC) (DG)) (NP ESNNOUN (DC) (DG)) (NP (ESNNOUN ADJ) (LC) (APPEND (LG) (RG))) (NP1 (NP1 RELCL) (LC) (APPEND (LG) (LIST (RG)))) (NP1 (NP1 PP) (CHECK (LC) (RC)) (APPEND (LG) (LIST (RG)))) (NP1 (NP1 PP) 1 (PLUGOBJ (LG) (RG))) (NP1 (NP1 OFNP) 2 (LIST 'OF (LG) (RG))) (NP1 (NP1 COMPNP) (LC) (APPEND (LG) (LIST (RG)))) (NP1 NP2 (DC) (CONS 'CHOOSE (DG))) (NP1 (DET NP2) (RC) (APPEND (LG) (RG))) ; (NP1 (NP1 VP) -2 (APPEND (LG) (LIST (RG)))) ; NEEDS -ED INFORMATION (NP2 (ADJ NP2) (RC) (APPEND (LG) (RG))) (NP2 (NOUN NP2) -1 (APPEND (RG) (LIST (LIST 'DOESITTO (LG))))) (NP2 NOUN (DC) (DG)) (NOUN (VERB ING) (LC) (LG)) (NOUN QDET (DC) (DG)) (NOUN (NOUN INF) -1 (PLUGIN (LG) 'OBJ (RG))) (NOUN NADJ -1 (DG)) (ESNNOUN (ESN NOUN) (PROG2 (UP) (RC)) (APPEND (LG) (RG))) ; RELATIVE CLAUSES (RELCL (RELPRON XVP) (DC) (PLUGIN 'X 'SUBJ (RG))) (RELCL (RELPRON ASSERTION) 0 (PLUGIN 'X 'OBJ (RG))) (RELCL ASSERTION -1 (PLUGIN 'X 'OBJ (DG))) ; NEEDS "MISSING OBJECT" INFO (RELCL XVP (COND ((MEMQ 'PARTICIPLE (DC)) 2) (-1)) (DG)) (RELPRON (WHOSE NP2) 0 (LIST 'OWN 'X (RG))) (RELPRON (QDET OFRP) 0 NIL) ; NEEDS MORE WORK (RELPRON (RELPRON ASSERTION) -1 NIL) ; THE BLOCK THAT I KNOW YOU ARE HOLDING (NEEDS WORK) ; (RELPRON ASSERTION 0 NIL) ; THE BLOCK I KNOW YOU ARE HOLDING - MORE SMARTS (NEEDS WORK) (OFRP (OF RELPRON) 0 NIL) ; NEEDS WORK (ADJ QDET 0 (DG)) (ADJ COMPNP 0 (DG)) ; HE IS LARGER THAN SHE ; COMPARATIVES (COMPNP (COMP NP) 0 (APPEND (LG) (LIST (RG)))) (COMP (ASADJ AS) 0 (LIST 'EQUI (GET (CAR (LG)) 'ATTR))) (ASADJ (AS ADJ) 0 (RG)) ; (ASADJ ADJ -2 (UG)) ; WAITING FOR SMARTS (COMP (ADJER THAN) 0 (LIST 'MORETHAN (GET (CADAR (LG)) 'ATTR))) (ADJER (ADJ ER) 0 (LIST (LIST 'RANK (GET (CAR (LG)) 'ATTR) 1))) (ADJER (MORE ADJ) 0 (LIST (LIST 'RANK (GET (CAR (RG)) 'ATTR) 1))) (ADJ ADJER -1 (DG)) ; THE OPEN CLASSES (NOUN UNKNOWN (TIMES -1. (FLATC (DG))) (LIST (DG))) (NP UNKNOWN (TIMES -2. (FLATC (DG))) (LIST 'NAME (DG))) (NP (NOUN UNKNOWN) (TIMES -1. (FLATC (RG))) (LIST 'DEF (RG) (CAR (LG)))) (VERB UNKNOWN (PROG2 (UD (TIMES -2. (FLATC (DG)))) '(1)) (LIST (DG) 'SUBJ 'OBJ)) (ADJ UNKNOWN (TIMES -2. (FLATC (DG))) (LIST (DG))) ; MORPHOLOGY (NOUN (NOUN S) 0 (LG)) (NOUN (VERB ER) -2 (LIST 'OCCUP (LG))) (NOUN (ADJ NESS) 0 (LG)) (NOUN (NOUN SELF) 0 (LG)) (VERB (VERB S) 0 (LG)) (VERB (VERB ED) (APPEND (LC) '(ED) '(PARTICIPLE)) (LG)) (VERB (VERB ING) (APPEND (LC) '(ING) '(PARTICIPLE)) (LG)) (ADJ (NOUN FUL) (APPEND (LC) '(ING) '(PARTICIPLE)) (LIST 'OWN 'X (LG))) (QDET (ADJ TH) 0 (LIST (LIST 'RANK (GET (CAR (LG)) 'ATTR) 1))) (QDET ADJER -1 (DG)) (DET (ALL DET) 1 (COND ((EQUAL (RG) '(DEF)) '(ALL))((CONS 'ALL (RG))))) (DET (ALL QDET) 1 (CONS 'ALL (RG))) (ADV (ADJ LY) 0 (LG)) (ADV (ESN ADV) 0 (PROG()(LG)(RG))) (ADV (ESN WHADV) 0 (APPEND (LG) (CDAR (RG)))) (WHADV (WHADV EVER) 0 (LG)) (WHN (WHN EVER) 0 (LG)) (WHADJ (WHADJ EVER) 0 (LG)) (INADV (INADV EVER) 0 (LG)) () ; MORPHOLOGY (DEFUN SUFFIXES FEXPR (L) (MAPC '(LAMBDA(M) (PUTPROP M T 'SUFFIX)) L)) (DEFUN PREFIXES FEXPR (L) (MAPC '(LAMBDA (M) (PUTPROP M T 'PREFIX)) L)) (SUFFIXES S ES FUL NESS ED ING LESS ER EST LY SELF TH NT THING EVER /'S) (PREFIXES ANY EVERY SOME NO) (DICTIONARY) (A DET 0 '(CHOOSE)) (ABOUT PREP 0 '(ABOUT)) (ABOUT ABOUT 0 ()) (ABOVE PREP 0 '(ABOVE)) (ACROSS ADV -2 '(ACROSS)) (AFTER INADV 0 'AFTER) (AFTER PREP 0 '(AFTER)) (AGAINST PREP 0 '(AGAINST)) (AINT BE '(1) (PROG2 (SETQ NEG T) '(BE SUBJ OBJ))) (ALIKE ADJ 0 '(ALIKE)) (ALL QDET 0 '(ALL)) (ALL ADV -2 NIL) (ALONG PREP 0 '(ALONG)) (ALL ALL 0 NIL) (ALWAYS ADV 0 NIL) (AM BE '(1) '(BE SUBJ OBJ)) (AN DET 0 '(CHOOSE)) (AND CONJ 0 'AND1) (AND NOISE 1 NIL) (ANOTHER QDET 0 '(OTHER)) (ANY QDET 0 '(CHOOSE)) (ANY ESN 0 '(CHOOSE)) (ANYWAY NOISE 1 NIL) (APART ADV 0 '(APART)) (APEX NOUN 0 '(APEX)) (APPLE NOUN 0 '(APPLE)) (AQUA NADJ 0 '(AQUA)) (ARCH NOUN 0 '(ARCH)) (ARE BE '(1) '(BE SUBJ OBJ)) (AREA NOUN 0 '(AREA)) (AROUND PREP 0 '(AROUND)) (ART BE '(1) '(BE SUBJ OBJ)) (ART NOUN 0 '(ART)) (AS AS 0 ()) (AS INADV 0 'AS) (ASK VERB '(2) '(ASK SUBJ OBJ OBJ2)) (ASSUME VERB '(1) '(ASSUME SUBJ OBJ)) (AT PREP 0 '(AT)) (AUBURN NADJ 0 '(AUBURN)) (AZURE NADJ 0 '(AZURE)) (BACK NOUN 0 '(BACK)) (BAD ADJ 0 '(BAD)) (BALANCE VERB '(1) '(BALANCE SUBJ OBJ)) (BALL NOUN 0 '(BALL)) (BAR NOUN 0 '(BAR)) (BARK VERB '(0) '(BARK SUBJ)) (BASE NOUN 0 '(BASE)) (BE BE '(1) '(BE SUBJ OBJ)) (BEAR NOUN -1 '(BEAR)) (BEAR VERB '(2) '(BEAR SUBJ OBJ)) (BEAUTIFUL ADJ 0 '(BEAUTIFUL)) (BEAUTY NOUN 0 '(BEAUTY)) (BECAME VERB '(1) '(BECAME SUBJ OBJ)) (BECAUSE INADV 0 'BECAUSE) (BECOME VERB '(1) '(BECOME SUBJ OBJ)) (BEEN VERB '(1) '(BE SUBJ OBJ)) (BEEN BE '(1) '(BE SUBJ OBJ)) (BEFORE PREP 0 '(BEFORE)) (BEFORE INADV 0 'BEFORE) (BEGIN VERB '(1) '(BEGIN SUBJ OBJ)) (BEHIND PREP 0 '(BEHIND)) (BELIEVE VERB '(1) '(BELIEVE SUBJ OBJ)) (BEND VERB '(1) '(BEND SUBJ OBJ)) (BENT ADJ 0 '(BENT)) (BESIDE PREP 0 '(BESIDE)) (BESIDES PREP 0 '(BESIDES)) (BEST QDET 0 '((MAX QUALITY))) (BEST ADV 0 '((MAX QUALITY))) (BETTER ADJER 0 '(GOOD)) (BETTER ADV 0 '(GOOD)) (BETWEEN PREP 0 '(BETWEEN)) (BIG ADJ 0 '(BIG)) (BIGGER ADJER 0 '((MORE BIG))) (BITCH NOUN 0 '(BITCH)) (BIT VERB '(1) '(BIT SUBJ OBJ)) (BITE VERB '(1) '(BITE SUBJ OBJ)) (BLACK NADJ 0 '(BLACK)) (BLOCK NOUN 0 '(BLOCK)) (BLOND NADJ 0 '(BLOND)) (BLUE NADJ 0 '(BLUE)) (BODY NOUN 0 NIL) (BONE NOUN 0 '(BONE)) (BOOKIE NOUN 0 '(BOOKIE)) (BOTH DET 0 '(DEF (QTY 2))) (BOTH NP 0 '(DEF (QTY 2))) (BOTH PCONJ 0 NIL) (BOTTOM QDET 0 '(BOTTOM)) (BOX NOUN 0 '(BOX)) (BREAK VERB '(1) '(BREAK SUBJ OBJ)) (BRING VERB '(2) '(BRING SUBJ OBJ OBJ2)) (BROKEN ADJ 0 '(BROKEN)) (BROWN NADJ 0 '(BROWN)) (BUILD VERB '(2) '(BUILD SUBJ OBJ OBJ2)) (BUT CONJ 0 'AND1) (BUT NOISE 1 NIL) (BUY VERB '(2) '(BUY SUBJ OBJ OBJ2)) (BY PREP 0 '(BY)) (CALL VERB '(2) '(CALL SUBJ OBJ OBJ2)) (CAN AUX 0 '(POSSIBLE ACT)) (CANT AUX 0 '(NOT (POSSIBLE ACT))) (CAT NOUN 0 '(CAT)) (CENTER NOUN 0 '(CENTER)) (CHARTREUSE NADJ 0 '(CHARTREUSE)) (CLEAN ADJ 0 '(CLEAN)) (CLEAR ADJ 0 '(CLEAR)) (CLEAR VERB '(1) '(CLEAR SUBJ OBJ)) (CLEVER ADJ 0 '(CLEVER)) (COLOR VERB '(2) '(COLOR SUBJ OBJ OBJ2)) (COLOR NOUN 0 '(COLOR)) (COME VERB '(0) '(COME SUBJ)) (COMPARE VERB '(1) '(COMPARE SUBJ OBJ)) (COMPARISON NOUN 0 '(COMPARISON)) (CONTAINER NOUN 0 '(CONTAINER)) (COP NOUN 0 '(COP)) (CORNER QDET 0 '(CORNER)) (CREAM NADJ 0 '(CREAM)) (CRIMSON NADJ 0 '(CRIMSON)) (COLLECTOR NOUN 0 '(COLLECTOR)) (COULD AUX 0 '(POSSIBLE ACT)) (CUBE NOUN 0 '(CUBE)) (CUBES NOUN 0 (PROG2 (SETQ NUMBER 'PLURAL) '(CUBE))) (CUBIC ADJ 0 '(CUBIC)) (CUBICAL ADJ 0 '(CUBICAL)) (CUBOID NOUN 0 '(CUBOID)) (CURRENT NOUN 0 '(CURRENT)) (DARK ADJ 0 '(DARK)) (DEEP ADJ 0 '(DEEP)) (DID BHD 0 (PROG2 (SETQ TENSE 'PAST) '(DO SUBJ OBJ))) (DIFFER VERB '(0) '(DIFFER SUBJ)) (DIFFERENCE NOUN 0 '(DIFFERENCE)) (DIFFERENT ADJ 0 '(DIFFERENT)) (DIRTY ADJ 0 '(DIRTY)) (DISMANTLE VERB '(1) '(DISMANTLE SUBJ OBJ)) (DO BHD 0 '(DO SUBJ OBJ)) (DOCTOR NOUN 0 '(DOCTOR)) (DOES BHD 0 '(DO SUBJ OBJ)) (DOG NOUN 0 '(DOG)) (DOLT NOUN 0 '(DOLT)) (DOUBT VERB '(1) '(DOUBT SUBJ OBJ)) (DOUBT NOUN 0 '(DOUBT)) (DOWN PREP -1 '(DOWN)) (DROP VERB '(1) '(DROP SUBJ OBJ)) (DULL ADJ 0 '(DULL)) (DUMB ADJ 0 '(DUMB)) (DUMBCLUCK NOUN 0 '(DUMBCLUCK)) (DUNDERHEAD NOUN 0 '(DUNDERHEAD)) (EACH QDET 0 '(ALL)) (EAR NOUN 0 '(EAR)) (EAT VERB '(1) '(EAT SUBJ OBJ)) (ED ED 0 ()) (EDGE QDET 0 '(EDGE)) (EIGHT QDET 0 '((QTY 8))) (EIGHTH QDET 0 '((RANK 8))) (EITHER QDET -1 '(CHOOSE)) (EITHER PCONJ (UP) NIL) (ELEVEN QDET 0 '((QTY 11.))) (EMITTER NOUN 0 '(EMITTER)) (END QDET 0 '((RANK 'LAST))) (ENJOY VERB '(1) '(ENJOY SUBJ OBJ)) (ENORMOUS ADJ 0 '(ENORMOUS)) (ER ER 0 ()) (ES S 0 ()) (EST TH 0 '(MOST)) (EVER ADV 0 NIL) (EVER EVER 0 ()) (EVERY DET 0 '(ALL)) (EVERY ESN 0 '(ALL)) (EXPERIENCE NOUN 0 '(EXPERIENCE)) (EXTERIOR NOUN 0 '(EXTERIOR)) (EXTERIOR QDET 0 '(EXTERIOR)) (FACE NOUN 0 '(FACE)) (FACES NOUN 0 (PROG2 (SETQ NUMBER 'PLURAL) '(FACE))) (FAIL VERB '(0) '(FAIL SUBJ)) (FAILURE NOUN 0 '(FAILURE)) (FALL VERB '(0) '(FALL SUBJ)) (FAMILY NOUN 0 '(FAMILY)) (FAT ADJ 0 '(FAT)) (FEEL VERB '(1) '(FEEL SUBJ OBJ)) (FELL VERB '(0) (PROG2 (SETQ TENSE 'PAST) '(FALL SUBJ))) (FELT VERB '(1) '(FELT SUBJ OBJ)) (FEW QDET 0 '((QTY '(2 5)))) (FIFTH QDET 0 '((RANK 5))) (FIND VERB '(2) '(FIND SUBJ OBJ OBJ2)) (FIRST QDET 0 '((RANK 1))) (FIRST ADV 0 NIL) (FIVE QDET 0 '((QTY 5))) (FIX VERB '(2) '(FIX SUBJ OBJ OBJ2)) (FIX NOUN 0 '(FIX)) (FLOWER NOUN 0 '(FLOWER)) (FOOL NOUN 0 '(FOOL)) (FOR PREP 0 '(FOR)) (FORMER NOUN 0 '(FORMER)) (FOUND VERB '(2) '(FOUND SUBJ OBJ OBJ2)) (FOUR QDET 0 '((QTY 4))) (FOURTH QDET 0 '((RANK 4))) (FREQUENTLY ADV 0 '(OFTEN)) (FROM PREP 0 '(FROM)) (FRONT NOUN 0 '(FRONT)) (FUL FUL 0 ()) (GAMBLE VERB '(0) '(GAMBLE SUBJ)) (GANGSTER NOUN 0 '(GANGSTER)) (GENIUS NOUN 0 '(GENIUS)) (GET VERB '(2) '(GET SUBJ OBJ OBJ2)) (GIVE VERB '(2) '(GIVE SUBJ OBJ OBJ2)) (GO VERB '(0) '(GO SUBJ)) (GO GO 0 ()) (GOLD NADJ 0 '(GOLD)) (GONE VERB '(0) (PROG2 (SETQ TENSE 'PAST) '(GO SUBJ))) (GOOD ADJ 0 '(GOOD)) (GRASP VERB '(1) '(GRASP SUBJ OBJ)) (GRAY NADJ 0 '(GRAY)) (GREEN NADJ 0 '(GREEN)) (HAD BHD '(1) (PROG2 (SETQ TENSE 'PAST) '(OWN SUBJ OBJ))) (HALF QDET 0 '((QTY 0.5))) (HAPPY ADJ 0 '(HAPPY)) (HAS BHD '(1) '(OWN SUBJ OBJ)) (HAVE BHD '(1) '(OWN SUBJ OBJ)) (HE NP 0 'HE) (HEAD NOUN 0 '(HEAD)) (HEIGHT NOUN 0 '(HEIGHT)) (HELP VERB '(2) '(HELP SUBJ OBJ)) (HELP NOUN 0 '(HELP)) (HER NP 0 'SHE) (HER DET 0 '(DEF (OWN SHE X))) (HERE ADV 0 '(ON THAT)) (HERE NOUN -1 '(HERE)) (HERS NOUN 0 '(HERS)) (HIGH ADJ 0 '(HIGH)) (HIM NP 0 'HE) (HINDER VERB '(1) '(HINDER SUBJ OBJ)) (HIS QDET 0 '((OWN HE X))) (HIT VERB '(1) '(HIT SUBJ OBJ)) (HOLD VERB '(1) '(GRASP SUBJ OBJ)) (HOLLOW ADJ 0 '(HOLLOW)) (HORSE NOUN 0 '(HORSE)) (HOSPITAL NOUN 0 '(HOSPITAL)) (HOUSE NOUN 0 '(HOUSE)) (HOW WHADV 0 '((HOW))) (HOW HOW 0 ()) (HOWEVER HOW 0 ()) (HOWEVER NOISE 1 NIL) (HUGE ADJ 0 '(HUGE)) (I NP 0 'I) (IDEA NOUN 0 '(IDEA)) (IDIOT NOUN 0 '(IDIOT)) (IF INADV 0 'ASSUMING) (IF IF 0 NIL) (ILL ADJ 0 '(ILL)) (IMBECILE NOUN 0 '(IMBECILE)) (IN PREP 0 '(IN)) (INDEED ADV 0 NIL) (INDIGO NADJ 0 '(INDIGO)) (INFERIOR NOUN 0 '(INFERIOR)) (INFERIOR ADJ 0 '(INFERIOR)) (ING ING 0 ()) (INSIDE PREP 0 '(INSIDE)) (INSIDE QDET 0 '(INTERIOR)) (INTERIOR QDET 0 '(INTERIOR)) (INTO PREP 0 '(INTO)) (IS BE '(1) '(BE SUBJ OBJ)) (IT NP 0 'IT) (ITS DET 0 '(DEF (OWN IT X))) (JERK NOUN 0 '(JERK)) (JOB NOUN 0 '(JOB)) (JUST ADV 0 NIL) (KNOW VERB '(1) '(KNOW SUBJ OBJ)) (LARGE ADJ 0 '(LARGE)) (LAST ADJ 0 '(LAST)) (LAST ADV 0 NIL) (LATTER NOUN 0 '(LATTER)) (LAY VERB '(1) '(LAY SUBJ OBJ)) (LEAST QDET 0 '((MIN SIZE))) (LEAVE VERB '(1) '(LEAVE SUBJ OBJ)) (LEFT VERB '(1) (PROG2 (SETQ TENSE 'PAST) '(LEAVE SUBJ OBJ))) (LEFT QDET 0 '(LEFT)) (LESS FUL 0 ()) (LESS MORE 0 '(LESS)) (LESS ADV -1 '(LESS)) (LESS QDET 0 '(LESS)) (LET VERB '(1) '(LET SUBJ OBJ)) (LIE VERB '(0) '(LIE SUBJ)) (LIKE INADV 0 'LIKE) (LIKE PREP -1 '(LIKE)) (LIKE VERB '(1) '(LIKE SUBJ OBJ)) (LIME NADJ 0 '(LIME)) (LINE NOUN 0 '(LINE)) (LITTLE QDET 0 '(SMALL)) (LIVE VERB '(0) '(LIVE SUBJ)) (LONG ADV 0 '(LONGTIME)) (LONG ADJ 0 '(LONG)) (LOT NOUN 0 '(LOT)) (LOVE VERB '(1) '(LOVE SUBJ OBJ)) (LOW ADJ 0 '(LOW)) (LY LY 0 ()) (MAFIA NOUN 0 '(MAFIA)) (MAGENTA NADJ 0 '(MAGENTA)) (MAKE VERB '(2) '(MAKE SUBJ OBJ OBJ2)) (MAN NOUN 0 '(MAN)) (MANY QDET 0 '(MANY)) (MATTER NOUN 0 '(MATTER)) (MATTER VERB '(0) '(MATTER SUBJ)) (MAY AUX 0 '(ALLOWED ACT)) (ME NP 0 'I) (MEAN VERB '(1) '(MEAN SUBJ OBJ)) (MEAT NOUN 0 '(MEAT)) (MEN NOUN 0 '(MEN)) (MIDDLE QDET 0 '(MIDDLE)) (MIGHT AUX 0 '(POSSIBLE ACT)) (MINE NOUN 0 '(MINE)) (MORE QDET 0 '(MORE)) (MORE MORELESS 0 '(MORE)) (MOST QDET 0 '(MOST)) (MOVE VERB '(1) '(MOVE SUBJ OBJ)) (MUCH QDET 0 '(MANY)) (MUST AUX 0 '(NECESSARY ACT)) (MY DET 0 '(DEF (OWN I X))) (NARROW ADJ 0 '(NARROW)) (NASTY ADJ 0 '(NASTY)) (NEAR PREP 0 '(NEAR)) (NEED VERB '(1) '(NEED SUBJ OBJ)) (NEED NOUN 0 '(NEED)) (NEIGHBOR NOUN 0 '(NEIGHBOR)) (NEITHER QDET 0 (PROG2 (SETQ NEG T) '(DEF (QTY 2)))) (NEITHER PCONJ 0 (PROG()(SETQ NEG T))) (NESS NESS 0 NIL) (NEVER ADV 0 (PROG()(SETQ NEG T))) (NEW ADJ 0 '(NEW)) (NEXT PREP 0 '(NEXT)) (NICE ADJ 0 '(NICE)) (NINE QDET 0 '((QTY 9))) (NO DET 0 (PROG2 (SETQ NEG T) '(CHOOSE))) (NO ADV 0 NIL) (NO ESN 0 (PROG2 (SETQ NEG T) '(CHOOSE))) (NONE NOUN 0 '(NONE)) (NOR CONJ 0 (PROG2 (SETQ NEG T) 'OR1)) (NOT ADV 0 (PROG()(SETQ NEG T))) (NOT NOT 0 (SETQ NEG T)) (NOW ADV 0 '(TIME 0)) (NOW NOISE 1 NIL) (NT ADV 0 (PROG()(SETQ NEG T))) (NUT NOUN 0 '(NUT)) (OBJECT NOUN 0 '(OBJECT)) (OBLONG ADJ 0 '(OBLONG)) (OCCUPATION NOUN 0 '(OCCUPATION)) (OF PREP 0 '(OF)) (OF OF 0 ()) (OFF PREP 0 '(OFF)) (OFTEN ADV 0 '(OFTEN)) (OK NOUN 0 '(OK)) (OLD ADJ 0 '(OLD)) (OLIVE NADJ 0 '(OLIVE)) (ON PREP 0 '(ON)) (ONE QDET 0 '()) (ONLY ADJ 0 '(ONLY)) (ONLY ADV 0 '(ONLY)) (OPAQUE ADJ 0 '(OPAQUE)) (OR CONJ 0 'OR1) (ORANGE NADJ 0 '(ORANGE)) (ORDER NOUN 0 '(ORDER)) (ORDER VERB '(2) '(ORDER SUBJ OBJ)) (ORDER ORDER 0 ()) ; IN ORDER TO (OTHER QDET 0 '(OTHER)) (OVER PREP 0 '(OVER)) (OUR DET 0 '(DEF (OWN WE X))) (OURS NOUN 0 '(OURS)) (OUT ADV 0 '(OUT THAT)) (OUT PREP -1 '(OUT)) (OUTSIDE PREP 0 '(OUTSIDE)) (OUTSIDE QDET 0 '(EXTERIOR)) (PAIR NOUN 0 '(PAIR)) (PALE ADJ 0 '(PALE)) (PARALLEL ADJ 0 '(PARALLEL)) (PATHETIC ADJ 0 '(PATHETIC)) (PEOPLE NOUN 0 '(PEOPLE)) (PERHAPS ADV 0 '(POSSIBLE)) (PICK VERB '(1 (UP 3)) '(PICK SUBJ OBJ)) (PINK NADJ 0 '(PINK)) (PLACE NOUN 0 '(PLACE)) (PLACE VERB '(1) '(PLACE SUBJ OBJ)) (PLEASE ADV 0 NIL) (POLICE NOUN 0 '(POLICE)) (POOR ADJ 0 '(POOR)) (PREFER VERB '(1) '(PREFER SUBJ OBJ)) (PRETTY ADJ 0 '(PRETTY)) (PROGRAM NOUN 0 '(PROGRAM)) (PUCE NADJ 0 '(PUCE)) (PURPLE NADJ 0 '(PURPLE)) (PUT VERB '(1 (PREP 2)) '(PUT SUBJ OBJ)) (PYRAMID NOUN 0 '(PYRAMID)) (QUICKLY ADV 0 '(FAST)) (RARELY ADV 0 '(NOT (OFTEN))) (RACETRACK NOUN 0 '(RACETRACK)) (RATHER ADJQUAL 0 ()) (RATHER ADV 0 NIL) (REAL ADJ 0 '(REAL)) (REALLY ADV 0 NIL) (RECTANGULAR ADJ 0 '(RECTANGULAR)) (RED NADJ 0 '(RED)) (RESEMBLANCE NOUN 0 '(RESEMBLANCE)) (RESEMBLE VERB '(1) '(RESEMBLE SUBJ OBJ)) (RESPECTIVE ADJ 0 '(RESPECTIVE)) (REST NOUN 0 '(REST)) (REST VERB '(0) '(REST SUBJ)) (RIDICULOUS ADJ 0 '(RIDICULOUS)) (RIGHT QDET 0 '(RIGHT)) (RIGHT ADJ 0 '(RIGHT)) (ROLL VERB '(1) '(ROLL SUBJ OBJ)) (ROOM NOUN '((FOR 2) (ON 2)) '(ROOM)) (ROUGH NOUN 0 '(ROUGH)) (S S 0 ()) (S BE -2 '(BE SUBJ OBJ)) (SAD ADJ 0 '(SAD)) (SAME QDET 0 '(SAME)) (SAW VERB '(1) '(SAW SUBJ OBJ)) (SAY VERB '(1) '(SAY SUBJ OBJ)) (SAY ADV 1 NIL) (SECOND QDET 0 '((RANK 2))) (SEE VERB '(1) '(SEE SUBJ OBJ)) (SEEM VERB '(1) '(SEEM SUBJ OBJ)) (SELF SELF 0 NIL) (SEPIA NADJ 0 '(SEPIA)) (SET VERB '(1) '(SET SUBJ OBJ)) (SET NOUN 0 '(SET)) (SEVEN QDET 0 '((QTY 7))) (SHALL AUX 0 '(FUTURE ACT)) (SHALLOW ADJ 0 '(SHALLOW)) (SHANT AUX 0 '(NOT (FUTURE ACT))) (SHAPE NOUN 0 '(SHAPE)) (SHE NP 0 'SHE) (SHINY ADJ 0 '(SHINY)) (SHOULD AUX 0 '(NECESSARY ACT)) (SHOULD INADV -1 'SHOULD) (SICK ADJ 0 '(SICK)) (SIDE QDET 0 '(SIDE)) (SIDEWAYS ADV 0 '(TRANSVERSE)) (SILLY ADJ 0 '(SILLY)) (SILVER NADJ 0 '(SILVER)) (SIMILAR ADJ 0 '(SIMILAR)) (SIMILARITY NOUN 0 '(SIMILARITY)) (SINCE PREP 0 '(SINCE)) (SIT VERB '(1) '(SIT SUBJ OBJ)) (SIX QDET 0 '((QTY 6))) (SIZE NOUN 0 '(SIZE)) (SKEW ADJ 0 '(SKEW)) (SLEEP VERB '(0) '(SLEEP SUBJ)) (SLIGHTLY ADJQUAL 0 ()) (SLOW ADJ 0 '(SLOW)) (SLOWLY ADV 0 '(SLOW)) (SLY ADJ 0 '(SLY)) (SMALL ADJ 0 '(SMALL)) (SMART ADJ 0 '(SMART)) (SMARTALEC NOUN 0 '(SMARTALEC)) (SO ADV 0 NIL) (SO INADV -1 'SO) (SO SO 0 ()) (SO INADV 0 'SO) (SO NOISE 1 NIL) (SOLID ADJ 0 '(SOLID)) (SOLID NOUN 0 '(SOLID)) (SOME QDET 0 '()) (SOME ESN 0 '(CHOOSE)) (SOMETIMES ADV 0 NIL) (SOMEWHAT ADJQUAL 0 ()) (SPACE NOUN 0 '(SPACE)) (SQUARE ADJ 0 '(SQUARE)) (SQUARE NOUN 0 '(SQUARE)) (STACK NOUN 0 '(STACK)) (START VERB '(1) '(START SUBJ OBJ)) (STEEP ADJ 0 '(STEEP)) (STEEPLE NOUN 0 '(STEEPLE)) (STRAIGHT ADJ 0 '(STRAIGHT)) (STUDENT NOUN 0 '(STUDENT)) (STUPID ADJ 0 '(STUPID)) (SUCCEED VERB '(0) '(SUCCEED SUBJ)) (SUCCESS NOUN 0 '(SUCCESS)) (SUPER ADJ 0 '(SUPER)) (SUPERIOR QDET 0 '(SUPERIOR)) (SUPPORT VERB '(1) '(ON OBJ SUBJ)) (SUPPORT NOUN 0 '(SUPPORT)) (SUSPECT VERB '(1) '(SUSPECT SUBJ OBJ)) (SUSPICION NOUN 0 '(SUSPICION)) (SURFACE NOUN 0 '(SURFACE)) (TABLE NOUN 0 '(TABLE)) (TAKE VERB '(2) '(TAKE SUBJ OBJ)) (TALL ADJ 0 '(TALL)) (TASTE VERB '(1) '(TASTE SUBJ OBJ)) (TELL VERB '(2) '(TELL SUBJ OBJ OBJ2)) (TEN QDET 0 '((QTY 3))) (TEST VERB '(1) '(TEST SUBJ OBJ)) (TEST NOUN 0 '(TEST)) (TH TH 0 ()) (THAN PREP -2 '(THAN)) (THAN THAN 0 ()) (THAT RELPRON 0 ()) (THAT THAT 0 ()) (THAT DET 0 '(DEF)) (THAT NP 0 '(DEF)) (THE DET 0 '(DEF)) (THEIR DET 0 '(OWN THEY X)) (THEIRS NOUN 0 '(THEIRS)) (THEM NP 0 'THEY) (THEN ADV 0 NIL) (THEN NOISE 1 NIL) (THERE ADV 0 '(ON THAT)) (THERE NOUN 0 '(THERE)) (THESE NOUN 0 '(THESE)) (THEY NP 0 'THEY) (THICK ADJ 0 '(THICK)) (THIN ADJ 0 '(THIN)) (THING NOUN 0 NIL) (THINK VERB '(1) '(THINK SUBJ OBJ)) (THIRD QDET 0 '((RANK 3))) (THIS DET 0 '(DEF)) (THIS NP 0 '(DEF)) (THOSE NOUN 0 '(THOSE)) (THOU NOUN 0 '(THOU)) (THREE QDET 0 '((QTY 3))) (THROUGH PREP 0 '(THROUGH)) (TINY ADJ 0 '(TINY)) (TO PREP -1 '(TO)) (TO TO 0 ()) (TODAY ADV 0 '(TIME (DAY 0))) (TOGETHER ADV 0 '(ADJACENT)) (TOMORROW ADV 0 '(TIME (DAY 1))) (TOO ADJQUAL 0 NIL) (TOP QDET 0 '(TOP)) (TOUCH VERB '(1) '(TOUCH SUBJ OBJ)) (TOUGH ADJ 0 '(TOUGH)) (TOWARD PREP 0 '(TOWARD)) (TOWARDS PREP 0 '(TOWARDS)) (TOWER NOUN 0 '(STACK)) (TRANSISTOR NOUN 0 '(TRANSISTOR)) (TRANSPARENT ADJ 0 '(TRANSPARENT)) (TREE NOUN 0 '(TREE)) (TREMENDOUS ADJ 0 '(TREMENDOUS)) (TRIANGULAR ADJ 0 '(TRIANGULAR)) (TRUST VERB '(1) '(TRUST SUBJ OBJ)) (TRY VERB '(1) '(TRY SUBJ OBJ)) (TURN VERB '(1) '(TURN SUBJ OBJ)) (TURN NOUN -1 '(TURN)) (TWELFTH QDET 0 '((RANK 12.))) (TWELVE QDET 0 '((QTY 12.))) (TWERP NOUN 0 '(TWERP)) (TWO QDET 0 '((QTY 2))) (UGLY ADJ 0 '(UGLY)) (ULTRAMARINE NADJ 0 '(ULTRAMARINE)) (UN UN 0 ()) (UNDER PREP 0 '(UNDER)) (UNDERNEATH PREP 0 '(UNDERNEATH)) (UNDERSTAND VERB '(1) '(UNDERSTAND SUBJ OBJ)) (UNLESS INADV 0 'UNLESS) (UNTIL INADV 0 'UNTIL) (UNUSUAL ADJ 0 '(UNUSUAL)) (UP PREP 'UP '(UP)) (UPWARDS ADV 0 '(UP)) (US NP 0 'WE) (USUALLY ADV 0 '(REGULAR)) (VERY ADJQUAL 0 NIL) (VIOLENT ADJ 0 '(VIOLENT)) (VIOLET NADJ 0 '(VIOLET)) (VIXEN NOUN 0 '(VIXEN)) (VOLT NOUN 0 '(VOLT)) (WANT VERB '(2) '(WANT SUBJ OBJ OBJ2)) (WAS BE '(1) '(PAST ACT)) (WE NP 0 'WE) (WEIGHT NOUN 0 '(WEIGHT)) (WELL ADJ 0 '(WELL)) (WELL ADV 0 '(GOOD)) (WELL NOISE 1 NIL) (WERE BE '(1) '(PAST ACT)) (WHAT WHADJ 0 '(WHAT)) (WHAT WHN 0 '((WHAT))) (WHAT WHAT 0 ()) (WHATEVER WHN 0 '((WHAT))) (WHEN INADV 0 'WHEN) (WHEN WHADV 0 '((WHAT TIME))) (WHERE WHADV 0 '((WHAT LOC))) (WHERE INADV -1 'WHERE) (WHERE WHERE 0 ()) ; PUT THE BLOCK WHERE YOU FOUND IT (WHEREVER WHADV 0 '((WHAT LOC))) (WHEREVER INADV 0 'WHEREVER) (WHETHER INADV 0 'WHETHER) (WHICH RELPRON 0 ()) (WHICH WHADJ 0 '((WHAT))) (WHICH WHN 0 '(WHAT)) (WHILE INADV 0 'WHILE) (WHITE NADJ 0 '(WHITE)) (WHO WHN 0 '(WHAT ANIMATE)) (WHO RELPRON 0 ()) (WHOM WHN 0 ()) (WHOM RELPRON 0 ()) (WHOMSOEVER WHN 0 '(CHOOSE ANIMATE)) (WHOSE WHADJ 0 '(DEF (WHAT OWNER))) (WHOSE WHN 0 '(DEF (WHAT OWNER))) (WHOSE WHOSE 0 ()) (WHY INADV 0 'WHY) (WHY WHADV 0 '((WHAT REASON))) (WIDE ADJ 0 '(WIDE)) (WILL AUX 0 '(FUTURE ACT)) (WISEGUY NOUN 0 '(WISEGUY)) (WITH PREP 0 '(WITH)) (WITHOUT PREP 0 '(WITHOUT)) (WITHOUT INADV -2 'WITHOUT) (WONDER VERB '(1) '(WONDER SUBJ OBJ)) (WONT AUX 0 '(NOT (FUTURE ACT))) (WORK VERB '(0) '(WORK SUBJ)) (WORK NOUN 0 '(WORK)) (WORLD NOUN 0 NIL) (WORSE ADJER 0 '((MORE BAD))) (WORST ADJ 0 '(WORST)) (WOULD AUX 0 '(FUTURE ACT)) (WRONG ADJ 0 '(WRONG)) (YELLOW NADJ 0 '(YELLOW)) (YES ADV 0 NIL) (YESTERDAY ADV 0 '(TIME (DAY -1))) (YOU NP 0 'YOU) (YOUNG ADJ 0 '(YOUNG)) (YOUR DET 0 '(DEF (OWN YOU X))) (YOURS NOUN 0 '(DEF (OWN YOU X))) (/'S QS 0 ()) () ; FURTHER DICTIONARY TYPE INFORMATION (DEFUN ATTRIB (L) (MAPC '(LAMBDA(X) (PUTPROP (CAR X) (CADR X) 'ATTR)) L)) (ATTRIB '((AQUA COLOR) (AUBURN COLOR) (BLACK COLOR) (BLOND COLOR) (BLUE COLOR) (BROWN COLOR) (CHARTREUSE COLOR) (CREAM COLOR) (CRIMSON COLOR) (GOLD COLOR) (GRAY COLOR) (GREEN COLOR) (INDIGO COLOR) (LIME COLOR) (MAGENTA COLOR) (OLIVE COLOR) (ORANGE COLOR) (PINK COLOR) (PUCE COLOR) (PURPLE COLOR) (RED COLOR) (SEPIA COLOR) (SILVER COLOR) (ULTRAMARINE COLOR) (VIOLET COLOR) (WHITE COLOR) (YELLOW COLOR) (ALIKE SIMILARITY) (AZURE COLOR) (BAD QUALITY) (BEAUTIFUL BEAUTY) (BENT STRAIGHTNESS) (BIG SIZE) (BROKEN REPAIR) (CLEAN CLEANLINESS) (CLEAR CLEARNESS) (CLEVER INTELLIGENCE) (CUBIC SHAPE) (CUBICAL SHAPE) (DARK BRIGHTNESS) (DEEP HEIGHT) (DIFFERENT SIMILARITY) (DIRTY CLEANLINESS) (DULL CLEARNESS) (DUMB INTELLIGENCE) (ENORMOUS SIZE) (FAST SPEED) (FAT SIZE) (FEW QTY) (FREQUENTLY FREQUENCY) (GOOD QUALITY) (HAPPY HAPPINESS) (HIGH HEIGHT) (HOLLOW SOLIDITY) (HUGE SIZE) (ILL SICKNESS) (INFERIOR INFERIORITY) (LARGE SIZE) (LAST LATENESS) (LONG LENGTH) (LONGTIME DURATION) (LOW HEIGHT) (MANY QTY) (NARROW WIDTH) (NASTY QUALITY) (NEW AGE) (NICE QUALITY) (OBLONG SHAPE) (OFTEN FREQUENCY) (OLD AGE) (OPAQUE CLEARNESS) (PALE COLOR) (POOR WEALTH) (PRETTY BEAUTY) (QUICKLY SPEED) (RARELY FREQUENCY) (REAL REALITY) (RECTANGULAR SHAPE) (RESPECTIVE RESPECTIVITY) (RIDICULOUS SENSE) (RIGHT CORRECTNESS) (SAD HAPPINESS) (SHALLOW HEIGHT) (SHINY CLEARNESS) (SICK SICKNESS) (SILLY SENSE) (SIMILAR SIMILARITY) (SLOW SPEED) (SLY CUNNING) (SMALL SIZE) (SMART INTELLIGENCE) (SOLID SOLIDITY) (SQUARE SHAPE) (STEEP STEEPNESS) (STRAIGHT STRAIGHTNESS) (STUPID SENSE) (SUPER QUALITY) (TALL HEIGHT) (THICK THICKNESS) (THIN THICKNESS) (TINY SIZE) (TOUGH DURABILITY) (TRANSPARENT CLEARNESS) (TREMENDOUS SIZE) (TRIANGULAR SHAPE) (UGLY BEAUTY) (UNUSUAL REGULARITY) (VIOLENT SPEED) (WELL SICKNESS) (WIDE WIDTH) (WORST QUALITY) (WRONG CORRECTNESS) (YOUNG AGE)))