;; Macintosh HD:lisp:db:data:member

;; list of command aliases.
(SETF (db-aliases MEMBER)  (list  (list  'AR 'APPEND 'RELATIONS)
 (list  'ER 'EDIT 'RELATIONS)
 (list  'ANV 'APPEND 'NEW-VOTES)
 (list  'HL 'HEADERS 'LAST)
 (list  'HC 'HEADERS 'CURRENT)
 (list  'AC 'APPEND 'COMMITTEES)
 (list  'AV 'APPEND 'VOTES)
 (list  'SHOW 'DISPLAY)
)
)


;; Items for Database: MEMBER
(defvar MEMBER.1032)
(prog1 (setf MEMBER.1032 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1032 'NAME)  "Daniel Kahikina Akaka") 
(setf (slot-value MEMBER.1032 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'FOR)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS '--)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'FOR)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'FOR)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'AGN)
 (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'FOR)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'AGN)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'AGN)
 (list  'TAX-REFORM 'AGN)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'AGN)
 (list  'CAP-TAX-CUT 'FOR)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'FOR)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY 'AGN)
 (list  'LIMIT-ABORTIONS 'AGN)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'AGN)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'CAP-GAINS-CUT 'FOR)
 (list  'CHILD-CARE 'FOR)
)
) 
(setf (slot-value MEMBER.1032 'RELATIONS)  (list (init-relation '(ADA PRO B MEMBER.1032 MEMBER))(init-relation '(ACLU PRO B MEMBER.1032 MEMBER))(init-relation '(COPE PRO B MEMBER.1032 MEMBER))(init-relation '(CFA PRO B MEMBER.1032 MEMBER))(init-relation '(LCV PRO C MEMBER.1032 MEMBER))(init-relation '(ACU CON C MEMBER.1032 MEMBER))(init-relation '(NTU CON C MEMBER.1032 MEMBER))(init-relation '(NSI CON C MEMBER.1032 MEMBER))(init-relation '(COC CON C MEMBER.1032 MEMBER))(init-relation '(CEI CON C MEMBER.1032 MEMBER))(init-relation '(AGRICULTURE PRO B MEMBER.1032 MEMBER))(init-relation '(DEMOCRATS PRO C MEMBER.1032 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.1032 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1032 MEMBER)))
) 
(setf (slot-value MEMBER.1032 'DISTRICT)  'HI-2) 
(setf (slot-value MEMBER.1032 'TERM-START)  "1976") 
(setf (slot-value MEMBER.1032 'TERM-END)  "1990") 
(setf (slot-value MEMBER.1032 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1032 'COMMITTEES)  (list  'HOUSE-APPROPRIATIONS)
) 
(setf (slot-value MEMBER.1032 'STATUS)  "Active") 
(setf (slot-value MEMBER.1032 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1032 'SYMBOL)  'MEMBER.1032) )
(insert-item MEMBER MEMBER.1032)
(defvar MEMBER.1063)
(prog1 (setf MEMBER.1063 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1063 'NAME)  "Les AuCoin") 
(setf (slot-value MEMBER.1063 'ENGLISH-SHORT)  "AuCoin") 
(setf (slot-value MEMBER.1063 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'FOR)
 (list  'SPACE-STATION 'FOR)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'FOR)
 (list  'HANDGUN-CONTROL 'FOR)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'AGN)
 (list  'CAP-TAX-CUT 'FOR)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'AGN)
 (list  'BAR-IMM-AMNESTY 'FOR)
 (list  'OK-SCHOOL-PRAY 'AGN)
 (list  'LIMIT-ABORTIONS '--)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'AGN)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'FOR)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'AGN)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'AGN)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'CAP-GAINS-CUT 'FOR)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'AGN)
 (list  'BRADY-BILL 'FOR)
)
) 
(setf (slot-value MEMBER.1063 'CREDO)  (list (init-stance '(MX CON B MEMBER.1063 MEMBER))
(init-stance '(NUCLEAR-FREEZE PRO B MEMBER.1063 MEMBER))
(init-stance '(SPENDING CON B MEMBER.1063 MEMBER))
(init-stance '(ENVIRONMENT PRO B MEMBER.1063 MEMBER))
)
) 
(setf (slot-value MEMBER.1063 'RELATIONS)  (list (init-relation '(ADA PRO B MEMBER.1063 MEMBER))(init-relation '(ACLU PRO B MEMBER.1063 MEMBER))(init-relation '(COPE PRO C MEMBER.1063 MEMBER))(init-relation '(CFA PRO C MEMBER.1063 MEMBER))(init-relation '(LCV PRO B MEMBER.1063 MEMBER))(init-relation '(ACU CON C MEMBER.1063 MEMBER))(init-relation '(NTU CON C MEMBER.1063 MEMBER))(init-relation '(NSI CON C MEMBER.1063 MEMBER))(init-relation '(COC PRO C MEMBER.1063 MEMBER))(init-relation '(ACA CON C MEMBER.1063 MEMBER))(init-relation '(CSFC CON C MEMBER.1063 MEMBER))(init-relation '(DEMOCRATS PRO C MEMBER.1063 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.1063 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1063 MEMBER)))
) 
(setf (slot-value MEMBER.1063 'DISTRICT)  'OR-1) 
(setf (slot-value MEMBER.1063 'TERM-START)  "1974") 
(setf (slot-value MEMBER.1063 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1063 'COMMITTEES)  (list  'HOUSE-APPROPRIATIONS)
) 
(setf (slot-value MEMBER.1063 'STATUS)  "Active") 
(setf (slot-value MEMBER.1063 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1063 'SYMBOL)  'MEMBER.1063) )
(insert-item MEMBER MEMBER.1063)
(defvar MEMBER.1031)
(prog1 (setf MEMBER.1031 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1031 'NAME)  "Druie Douglas Barnard") 
(setf (slot-value MEMBER.1031 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'AGN)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'AGN)
 (list  'REFLAGGING-SHIPS 'AGN)
 (list  'HANDGUN-CONTROL 'FOR)
 (list  'CONTRA-AID2 'FOR)
 (list  'STAR-WARS 'AGN)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'LMT-CLN-WATER-ACT 'FOR)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'AGN)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'FOR)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'AGN)
 (list  'AID-ANGOLA-REB 'FOR)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'AGN)
 (list  'CAP-TAX-CUT 'AGN)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'AGN)
 (list  'BAR-IMM-AMNESTY 'FOR)
 (list  'OK-SCHOOL-PRAY 'FOR)
 (list  'LIMIT-ABORTIONS 'FOR)
 (list  'APPROVE-ERA 'AGN)
 (list  'PASS-IMM-REFORM 'AGN)
 (list  'CANCEL-MX-MISSILE 'AGN)
 (list  'HALT-AID-TO-CONTRAS 'AGN)
 (list  'INCR-AID-TO-EL-SAL 'FOR)
 (list  'SUPP-NUCLEAR-FREEZE 'AGN)
 (list  'CAP-GAINS-CUT 'AGN)
 (list  'CHILD-CARE 'AGN)
 (list  'FLAG-BURNING 'FOR)
 (list  'BRADY-BILL 'AGN)
)
) 
(setf (slot-value MEMBER.1031 'RELATIONS)  (list (init-relation '(ADA CON C MEMBER.1031 MEMBER))(init-relation '(ACLU CON B MEMBER.1031 MEMBER))(init-relation '(COPE CON C MEMBER.1031 MEMBER))(init-relation '(CFA CON C MEMBER.1031 MEMBER))(init-relation '(LCV CON C MEMBER.1031 MEMBER))(init-relation '(ACU PRO C MEMBER.1031 MEMBER))(init-relation '(NTU CON C MEMBER.1031 MEMBER))(init-relation '(NSI PRO B MEMBER.1031 MEMBER))(init-relation '(COC PRO C MEMBER.1031 MEMBER))(init-relation '(CEI CON C MEMBER.1031 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.1031 MEMBER)))
) 
(setf (slot-value MEMBER.1031 'DISTRICT)  'GA-10) 
(setf (slot-value MEMBER.1031 'TERM-START)  "1976") 
(setf (slot-value MEMBER.1031 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1031 'COMMITTEES)  (list  'HOUSE-BANKING)
) 
(setf (slot-value MEMBER.1031 'STATUS)  "Active") 
(setf (slot-value MEMBER.1031 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1031 'SYMBOL)  'MEMBER.1031) )
(insert-item MEMBER MEMBER.1031)
(defvar MEMBER.1030)
(prog1 (setf MEMBER.1030 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1030 'NAME)  "Charles Edward Bennett") 
(setf (slot-value MEMBER.1030 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'AGN)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'FOR)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'FOR)
 (list  'STAR-WARS 'AGN)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'AGN)
 (list  'CAP-GAINS-CUT 'FOR)
 (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'AGN)
 (list  'BAN-POLYGRAPH 'AGN)
 (list  'RETAIN-GUN-CONTROL 'FOR)
 (list  'CONTRA-AID 'FOR)
 (list  'LMT-TEXT-IMP 'AGN)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'AGN)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'CAP-TAX-CUT 'FOR)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'AGN)
 (list  'BAR-IMM-AMNESTY 'FOR)
 (list  'OK-SCHOOL-PRAY 'FOR)
 (list  'LIMIT-ABORTIONS 'FOR)
 (list  'APPROVE-ERA 'AGN)
 (list  'PASS-IMM-REFORM 'FOR)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'FOR)
 (list  'SUPP-NUCLEAR-FREEZE 'AGN)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'FOR)
 (list  'BRADY-BILL 'FOR)
)
) 
(setf (slot-value MEMBER.1030 'RELATIONS)  (list (init-relation '(ADA PRO C MEMBER.1030 MEMBER))(init-relation '(COPE PRO C MEMBER.1030 MEMBER))(init-relation '(LCV PRO C MEMBER.1030 MEMBER))(init-relation '(ACU CON C MEMBER.1030 MEMBER))(init-relation '(NTU CON C MEMBER.1030 MEMBER))(init-relation '(CEI CON C MEMBER.1030 MEMBER))(init-relation '(DEMOCRATS PRO C MEMBER.1030 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.1030 MEMBER)))
) 
(setf (slot-value MEMBER.1030 'DISTRICT)  'FL-3) 
(setf (slot-value MEMBER.1030 'TERM-START)  "1948") 
(setf (slot-value MEMBER.1030 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1030 'COMMITTEES)  (list  'HOUSE-ARMED-SERVICES 'HOUSE-MERCHANT-MARINE)
) 
(setf (slot-value MEMBER.1030 'STATUS)  "Active") 
(setf (slot-value MEMBER.1030 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1030 'SYMBOL)  'MEMBER.1030) )
(insert-item MEMBER MEMBER.1030)
(defvar MEMBER.1040)
(prog1 (setf MEMBER.1040 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1040 'NAME)  "Corinne Claiborne Lindy Boggs") 
(setf (slot-value MEMBER.1040 'GENDER)  'FEMALE) 
(setf (slot-value MEMBER.1040 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'FOR)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'AGN)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'FOR)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'FOR)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-GAINS-CUT 'FOR)
 (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'AGN)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'FOR)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'AGN)
 (list  'CAP-TAX-CUT 'FOR)
 (list  'EXTEND-SS-BENEFIT 'FOR)
 (list  'ESTAB-DOM-CONTENT 'FOR)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY 'FOR)
 (list  'LIMIT-ABORTIONS 'FOR)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'FOR)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL '--)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'AGN)
)
) 
(setf (slot-value MEMBER.1040 'RELATIONS)  (list (init-relation '(ADA PRO B MEMBER.1040 MEMBER))(init-relation '(COPE PRO B MEMBER.1040 MEMBER))(init-relation '(CFA PRO B MEMBER.1040 MEMBER))(init-relation '(LCV PRO B MEMBER.1040 MEMBER))(init-relation '(ACU CON C MEMBER.1040 MEMBER))(init-relation '(NTU CON C MEMBER.1040 MEMBER))(init-relation '(NSI CON C MEMBER.1040 MEMBER))(init-relation '(COC CON C MEMBER.1040 MEMBER))(init-relation '(CEI CON B MEMBER.1040 MEMBER))(init-relation '(DEMOCRATS PRO C MEMBER.1040 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.1040 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1040 MEMBER)))
) 
(setf (slot-value MEMBER.1040 'DISTRICT)  'LA-2) 
(setf (slot-value MEMBER.1040 'TERM-START)  "1973") 
(setf (slot-value MEMBER.1040 'TERM-END)  "1990") 
(setf (slot-value MEMBER.1040 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1040 'COMMITTEES)  (list  'HOUSE-APPROPRIATIONS)
) 
(setf (slot-value MEMBER.1040 'STATUS)  "Active") 
(setf (slot-value MEMBER.1040 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1040 'SYMBOL)  'MEMBER.1040) )
(insert-item MEMBER MEMBER.1040)
(defvar MEMBER.1042)
(prog1 (setf MEMBER.1042 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1042 'NAME)  "Beverly Butcher Byron") 
(setf (slot-value MEMBER.1042 'GENDER)  'FEMALE) 
(setf (slot-value MEMBER.1042 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'AGN)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'AGN)
 (list  'HANDGUN-CONTROL 'FOR)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'AGN)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-GAINS-CUT 'AGN)
 (list  'LMT-CLN-WATER-ACT 'FOR)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'FOR)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'FOR)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'CAP-TAX-CUT 'AGN)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'AGN)
 (list  'BAR-IMM-AMNESTY 'FOR)
 (list  'OK-SCHOOL-PRAY 'FOR)
 (list  'LIMIT-ABORTIONS 'FOR)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'FOR)
 (list  'CANCEL-MX-MISSILE 'AGN)
 (list  'HALT-AID-TO-CONTRAS 'AGN)
 (list  'INCR-AID-TO-EL-SAL 'FOR)
 (list  'SUPP-NUCLEAR-FREEZE 'AGN)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'FOR)
 (list  'BRADY-BILL 'AGN)
)
) 
(setf (slot-value MEMBER.1042 'RELATIONS)  (list (init-relation '(ADA CON C MEMBER.1042 MEMBER))(init-relation '(ACLU CON C MEMBER.1042 MEMBER))(init-relation '(COPE PRO C MEMBER.1042 MEMBER))(init-relation '(ACU PRO B MEMBER.1042 MEMBER))(init-relation '(NSI PRO A MEMBER.1042 MEMBER))(init-relation '(COC PRO C MEMBER.1042 MEMBER))(init-relation '(CEI PRO C MEMBER.1042 MEMBER))(init-relation '(DEMOCRATS PRO C MEMBER.1042 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.1042 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1042 MEMBER)))
) 
(setf (slot-value MEMBER.1042 'DISTRICT)  'MD-6) 
(setf (slot-value MEMBER.1042 'TERM-START)  "1978") 
(setf (slot-value MEMBER.1042 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1042 'COMMITTEES)  (list  'HOUSE-ARMED-SERVICES 'HOUSE-INTERIOR 'HOUSE-AGING)
) 
(setf (slot-value MEMBER.1042 'STATUS)  "Active") 
(setf (slot-value MEMBER.1042 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1042 'SYMBOL)  'MEMBER.1042) )
(insert-item MEMBER MEMBER.1042)
(defvar MEMBER.1029)
(prog1 (setf MEMBER.1029 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1029 'NAME)  "Thomas R. Carper") 
(setf (slot-value MEMBER.1029 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'AGN)
 (list  'SPACE-STATION 'FOR)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'AGN)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'FOR)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-GAINS-CUT 'FOR)
 (list  'LMT-CLN-WATER-ACT 'FOR)
 (list  'RPL-TOBAC-SUB 'FOR)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'FOR)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'FOR)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'CAP-TAX-CUT 'FOR)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'FOR)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY 'FOR)
 (list  'LIMIT-ABORTIONS 'AGN)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'FOR)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'AGN)
 (list  'BRADY-BILL 'FOR)
)
) 
(setf (slot-value MEMBER.1029 'RELATIONS)  (list (init-relation '(ADA PRO C MEMBER.1029 MEMBER))(init-relation '(COPE PRO C MEMBER.1029 MEMBER))(init-relation '(ACU CON C MEMBER.1029 MEMBER))(init-relation '(NTU PRO C MEMBER.1029 MEMBER))(init-relation '(NSI CON C MEMBER.1029 MEMBER))(init-relation '(COC PRO C MEMBER.1029 MEMBER))(init-relation '(DEMOCRATS PRO C MEMBER.1029 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.1029 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1029 MEMBER)))
) 
(setf (slot-value MEMBER.1029 'DISTRICT)  'DE-AL) 
(setf (slot-value MEMBER.1029 'TERM-START)  "1982") 
(setf (slot-value MEMBER.1029 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1029 'COMMITTEES)  (list  'HOUSE-BANKING 'HOUSE-MERCHANT-MARINE)
) 
(setf (slot-value MEMBER.1029 'STATUS)  "Active") 
(setf (slot-value MEMBER.1029 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1029 'SYMBOL)  'MEMBER.1029) )
(insert-item MEMBER MEMBER.1029)
(defvar MEMBER.1047)
(prog1 (setf MEMBER.1047 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1047 'NAME)  "William Lacy Clay") 
(setf (slot-value MEMBER.1047 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'FOR)
 (list  'SPACE-STATION 'FOR)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'FOR)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'FOR)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'FOR)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-GAINS-CUT 'FOR)
 (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'AGN)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'FOR)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI '--)
 (list  'AID-ANGOLA-REB '--)
 (list  'TAX-REFORM 'AGN)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'CAP-TAX-CUT 'FOR)
 (list  'EXTEND-SS-BENEFIT 'FOR)
 (list  'ESTAB-DOM-CONTENT 'FOR)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY 'AGN)
 (list  'LIMIT-ABORTIONS 'AGN)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'AGN)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'CHILD-CARE 'AGN)
 (list  'FLAG-BURNING 'AGN)
 (list  'BRADY-BILL 'FOR)
)
) 
(setf (slot-value MEMBER.1047 'ISSUES)  (list  'LIBERAL)
) 
(setf (slot-value MEMBER.1047 'RELATIONS)  (list (init-relation '(BLACKS PRO B MEMBER.1047 MEMBER))(init-relation '(ADA PRO A MEMBER.1047 MEMBER))(init-relation '(ACLU PRO A MEMBER.1047 MEMBER))(init-relation '(COPE PRO A MEMBER.1047 MEMBER))(init-relation '(CFA PRO B MEMBER.1047 MEMBER))(init-relation '(LCV PRO A MEMBER.1047 MEMBER))(init-relation '(ACU CON B MEMBER.1047 MEMBER))(init-relation '(NTU CON C MEMBER.1047 MEMBER))(init-relation '(NSI CON A MEMBER.1047 MEMBER))(init-relation '(COC CON B MEMBER.1047 MEMBER))(init-relation '(CEI CON A MEMBER.1047 MEMBER))(init-relation '(LABOR PRO A MEMBER.1047 MEMBER))(init-relation '(DEMOCRATS PRO C MEMBER.1047 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.1047 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1047 MEMBER)))
) 
(setf (slot-value MEMBER.1047 'DISTRICT)  'MO-1) 
(setf (slot-value MEMBER.1047 'TERM-START)  "1968") 
(setf (slot-value MEMBER.1047 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1047 'COMMITTEES)  (list  'HOUSE-EDUCATION 'HOUSE-ADMINISTRATION)
) 
(setf (slot-value MEMBER.1047 'STATUS)  "Active") 
(setf (slot-value MEMBER.1047 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1047 'SYMBOL)  'MEMBER.1047) )
(insert-item MEMBER MEMBER.1047)
(defvar MEMBER.1043)
(prog1 (setf MEMBER.1043 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1043 'NAME)  "Silvio Ottavio Conte") 
(setf (slot-value MEMBER.1043 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'FOR)
 (list  'SPACE-STATION 'FOR)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'FOR)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'FOR)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-GAINS-CUT 'AGN)
 (list  'LMT-CLN-WATER-ACT 'FOR)
 (list  'RPL-TOBAC-SUB 'FOR)
 (list  'GRM-RDMN-DEF-RED 'AGN)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'FOR)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'AGN)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'CAP-TAX-CUT 'AGN)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'FOR)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY 'AGN)
 (list  'LIMIT-ABORTIONS 'FOR)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'FOR)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'AGN)
)
) 
(setf (slot-value MEMBER.1043 'RELATIONS)  (list (init-relation '(ADA PRO B MEMBER.1043 MEMBER))(init-relation '(ACLU PRO C MEMBER.1043 MEMBER))(init-relation '(COPE PRO C MEMBER.1043 MEMBER))(init-relation '(CFA PRO A MEMBER.1043 MEMBER))(init-relation '(ACU CON C MEMBER.1043 MEMBER))(init-relation '(NTU CON C MEMBER.1043 MEMBER))(init-relation '(NSI CON A MEMBER.1043 MEMBER))(init-relation '(COC CON C MEMBER.1043 MEMBER))(init-relation '(CEI CON C MEMBER.1043 MEMBER))(init-relation '(DEMOCRATS CON C MEMBER.1043 MEMBER))(init-relation '(REPUBLICANS PRO C MEMBER.1043 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1043 MEMBER)))
) 
(setf (slot-value MEMBER.1043 'DISTRICT)  'MA-1) 
(setf (slot-value MEMBER.1043 'TERM-START)  "1958") 
(setf (slot-value MEMBER.1043 'TERM-END)  "1990") 
(setf (slot-value MEMBER.1043 'PARTY)  'REP) 
(setf (slot-value MEMBER.1043 'COMMITTEES)  (list  'HOUSE-APPROPRIATIONS)
) 
(setf (slot-value MEMBER.1043 'STATUS)  "Active") 
(setf (slot-value MEMBER.1043 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1043 'SYMBOL)  'MEMBER.1043) )
(insert-item MEMBER MEMBER.1043)
(defvar MEMBER.641)
(prog1 (setf MEMBER.641 (make-instance 'MEMBER))
(setf (slot-value MEMBER.641 'NAME)  "James A. Courter") 
(setf (slot-value MEMBER.641 'VOTES)  (list  (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'FOR)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'FOR)
 (list  'CONTRA-AID 'FOR)
 (list  'LMT-TEXT-IMP 'AGN)
 (list  'LIMIT-SDI 'AGN)
 (list  'AID-ANGOLA-REB 'FOR)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'AGN)
 (list  'DEFENSE-AUTHORIZATION 'AGN)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'AGN)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'AGN)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS '--)
 (list  'LIMIT-IMPORTS 'AGN)
 (list  'CHILD-CARE 'AGN)
 (list  'FLAG-BURNING 'FOR)
)
) 
(setf (slot-value MEMBER.641 'RELATIONS)  (list (init-relation '(ADA CON B MEMBER.641 MEMBER))(init-relation '(ACLU CON B MEMBER.641 MEMBER))(init-relation '(COPE CON B MEMBER.641 MEMBER))(init-relation '(LCV PRO C MEMBER.641 MEMBER))(init-relation '(ACU PRO B MEMBER.641 MEMBER))(init-relation '(NTU PRO C MEMBER.641 MEMBER))(init-relation '(NSI PRO A MEMBER.641 MEMBER))(init-relation '(REPUBLICANS PRO C MEMBER.641 MEMBER)))
) 
(setf (slot-value MEMBER.641 'DISTRICT)  'NJ-12) 
(setf (slot-value MEMBER.641 'TERM-START)  "1978") 
(setf (slot-value MEMBER.641 'TERM-END)  "1990") 
(setf (slot-value MEMBER.641 'PARTY)  'REP) 
(setf (slot-value MEMBER.641 'COMMITTEES)  (list  'HOUSE-ARMED-SERVICES 'HOUSE-AGING)
) 
(setf (slot-value MEMBER.641 'STATUS)  "Active") 
(setf (slot-value MEMBER.641 'DATE-OPEN) (list->date '(11 3 1989))) 
(setf (slot-value MEMBER.641 'SYMBOL)  'MEMBER.641) )
(insert-item MEMBER MEMBER.641)
(defvar MEMBER.1033)
(prog1 (setf MEMBER.1033 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1033 'NAME)  "Larry E. Craig") 
(setf (slot-value MEMBER.1033 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'AGN)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'AGN)
 (list  'REFLAGGING-SHIPS 'AGN)
 (list  'HANDGUN-CONTROL 'FOR)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'AGN)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'FOR)
 (list  'LIMIT-IMPORTS 'AGN)
 (list  'CAP-GAINS-CUT 'AGN)
 (list  'CAP-TAX-CUT 'AGN)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'AGN)
 (list  'BAR-IMM-AMNESTY 'FOR)
 (list  'OK-SCHOOL-PRAY 'FOR)
 (list  'LIMIT-ABORTIONS 'FOR)
 (list  'APPROVE-ERA 'AGN)
 (list  'PASS-IMM-REFORM 'AGN)
 (list  'CANCEL-MX-MISSILE 'AGN)
 (list  'HALT-AID-TO-CONTRAS 'AGN)
 (list  'INCR-AID-TO-EL-SAL 'FOR)
 (list  'SUPP-NUCLEAR-FREEZE 'AGN)
 (list  'LMT-CLN-WATER-ACT 'FOR)
 (list  'RPL-TOBAC-SUB 'FOR)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'AGN)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'FOR)
 (list  'LMT-TEXT-IMP 'AGN)
 (list  'LIMIT-SDI 'AGN)
 (list  'AID-ANGOLA-REB 'FOR)
 (list  'TAX-REFORM 'AGN)
 (list  'S-AFRICA-SANC 'AGN)
 (list  'IMMIG-REFORM 'AGN)
 (list  'CHILD-CARE 'AGN)
 (list  'FLAG-BURNING 'FOR)
)
) 
(setf (slot-value MEMBER.1033 'RELATIONS)  (list (init-relation '(ADA CON B MEMBER.1033 MEMBER))(init-relation '(ACLU CON B MEMBER.1033 MEMBER))(init-relation '(COPE CON B MEMBER.1033 MEMBER))(init-relation '(CFA CON C MEMBER.1033 MEMBER))(init-relation '(LCV CON C MEMBER.1033 MEMBER))(init-relation '(ACU PRO B MEMBER.1033 MEMBER))(init-relation '(NSI PRO A MEMBER.1033 MEMBER))(init-relation '(COC PRO A MEMBER.1033 MEMBER))(init-relation '(CEI PRO B MEMBER.1033 MEMBER))(init-relation '(DEMOCRATS CON C MEMBER.1033 MEMBER))(init-relation '(REPUBLICANS PRO C MEMBER.1033 MEMBER)))
) 
(setf (slot-value MEMBER.1033 'DISTRICT)  'ID-1) 
(setf (slot-value MEMBER.1033 'TERM-START)  "1980") 
(setf (slot-value MEMBER.1033 'TERM-END)  "1990") 
(setf (slot-value MEMBER.1033 'PARTY)  'REP) 
(setf (slot-value MEMBER.1033 'COMMITTEES)  (list  'HOUSE-INTERIOR 'HOUSE-PUBLIC-WORKS)
) 
(setf (slot-value MEMBER.1033 'STATUS)  "Active") 
(setf (slot-value MEMBER.1033 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1033 'SYMBOL)  'MEMBER.1033) )
(insert-item MEMBER MEMBER.1033)
(defvar MEMBER.1023)
(prog1 (setf MEMBER.1023 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1023 'NAME)  "William Louis Dickinson") 
(setf (slot-value MEMBER.1023 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'AGN)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'AGN)
 (list  'REFLAGGING-SHIPS 'AGN)
 (list  'HANDGUN-CONTROL 'FOR)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'AGN)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'FOR)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-GAINS-CUT 'AGN)
 (list  'CAP-TAX-CUT 'AGN)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'AGN)
 (list  'BAR-IMM-AMNESTY 'FOR)
 (list  'OK-SCHOOL-PRAY 'FOR)
 (list  'LIMIT-ABORTIONS 'AGN)
 (list  'APPROVE-ERA 'AGN)
 (list  'PASS-IMM-REFORM 'AGN)
 (list  'CANCEL-MX-MISSILE 'AGN)
 (list  'HALT-AID-TO-CONTRAS 'AGN)
 (list  'INCR-AID-TO-EL-SAL 'FOR)
 (list  'SUPP-NUCLEAR-FREEZE 'AGN)
 (list  'LMT-CLN-WATER-ACT 'FOR)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'AGN)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'FOR)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'AGN)
 (list  'AID-ANGOLA-REB 'FOR)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'AGN)
 (list  'IMMIG-REFORM 'AGN)
 (list  'CHILD-CARE 'AGN)
 (list  'FLAG-BURNING 'FOR)
 (list  'BRADY-BILL 'AGN)
)
) 
(setf (slot-value MEMBER.1023 'RELATIONS)  (list (init-relation '(ADA CON B MEMBER.1023 MEMBER))(init-relation '(ACLU CON C MEMBER.1023 MEMBER))(init-relation '(COPE CON B MEMBER.1023 MEMBER))(init-relation '(CFA CON B MEMBER.1023 MEMBER))(init-relation '(LCV CON B MEMBER.1023 MEMBER))(init-relation '(ACU PRO B MEMBER.1023 MEMBER))(init-relation '(NTU PRO C MEMBER.1023 MEMBER))(init-relation '(NSI PRO A MEMBER.1023 MEMBER))(init-relation '(COC PRO B MEMBER.1023 MEMBER))(init-relation '(CEI PRO C MEMBER.1023 MEMBER))(init-relation '(DEMOCRATS CON C MEMBER.1023 MEMBER))(init-relation '(REPUBLICANS PRO C MEMBER.1023 MEMBER)))
) 
(setf (slot-value MEMBER.1023 'DISTRICT)  'AL-2) 
(setf (slot-value MEMBER.1023 'TERM-START)  "1964") 
(setf (slot-value MEMBER.1023 'PARTY)  'REP) 
(setf (slot-value MEMBER.1023 'COMMITTEES)  (list  'HOUSE-ARMED-SERVICES 'HOUSE-ADMINISTRATION)
) 
(setf (slot-value MEMBER.1023 'STATUS)  "Active") 
(setf (slot-value MEMBER.1023 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1023 'SYMBOL)  'MEMBER.1023) )
(insert-item MEMBER MEMBER.1023)
(defvar MEMBER.1044)
(prog1 (setf MEMBER.1044 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1044 'NAME)  "John D. Dingell") 
(setf (slot-value MEMBER.1044 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'AGN)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'FOR)
 (list  'HANDGUN-CONTROL 'FOR)
 (list  'CONTRA-AID2 'FOR)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-GAINS-CUT 'FOR)
 (list  'CAP-TAX-CUT 'FOR)
 (list  'EXTEND-SS-BENEFIT '--)
 (list  'ESTAB-DOM-CONTENT 'FOR)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY 'FOR)
 (list  'LIMIT-ABORTIONS 'AGN)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'FOR)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'AGN)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'AGN)
 (list  'TAX-REFORM 'AGN)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'AGN)
 (list  'BRADY-BILL 'AGN)
)
) 
(setf (slot-value MEMBER.1044 'CREDO)  (list (init-stance '(GUN-CONTROL CON B MEMBER.1044 MEMBER))
(init-stance '(ENVIRONMENT PRO B MEMBER.1044 MEMBER))
(init-stance '(DEREGULATION PRO C MEMBER.1044 MEMBER))
(init-stance '(CLEAN-AIR CON B MEMBER.1044 MEMBER))
)
) 
(setf (slot-value MEMBER.1044 'GROUPS)  (list  'AUTOMOBILE)
) 
(setf (slot-value MEMBER.1044 'RELATIONS)  (list (init-relation '(AUTO PRO A MEMBER.1044 MEMBER))(init-relation '(ADA PRO B MEMBER.1044 MEMBER))(init-relation '(COPE PRO A MEMBER.1044 MEMBER))(init-relation '(LCV PRO C MEMBER.1044 MEMBER))(init-relation '(ACU CON C MEMBER.1044 MEMBER))(init-relation '(NTU CON C MEMBER.1044 MEMBER))(init-relation '(NSI CON B MEMBER.1044 MEMBER))(init-relation '(COC CON B MEMBER.1044 MEMBER))(init-relation '(CEI CON B MEMBER.1044 MEMBER))(init-relation '(DEMOCRATS PRO C MEMBER.1044 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.1044 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1044 MEMBER)))
) 
(setf (slot-value MEMBER.1044 'DISTRICT)  'MI-16) 
(setf (slot-value MEMBER.1044 'TERM-START)  "1955") 
(setf (slot-value MEMBER.1044 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1044 'COMMITTEES)  (list  'HOUSE-ENERGY)
) 
(setf (slot-value MEMBER.1044 'STATUS)  "Active") 
(setf (slot-value MEMBER.1044 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1044 'SYMBOL)  'MEMBER.1044) )
(insert-item MEMBER MEMBER.1044)
(defvar MEMBER.1059)
(prog1 (setf MEMBER.1059 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1059 'NAME)  "Byron Leslie Dorgan") 
(setf (slot-value MEMBER.1059 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'FOR)
 (list  'SPACE-STATION 'FOR)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'FOR)
 (list  'HANDGUN-CONTROL 'FOR)
 (list  'CONTRA-AID2 'FOR)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'AGN)
 (list  'CAP-GAINS-CUT 'FOR)
 (list  'CAP-TAX-CUT 'FOR)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'AGN)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY 'AGN)
 (list  'LIMIT-ABORTIONS 'FOR)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'FOR)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'LMT-CLN-WATER-ACT 'FOR)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'AGN)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'AGN)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'AGN)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'AGN)
 (list  'BRADY-BILL 'AGN)
)
) 
(setf (slot-value MEMBER.1059 'RELATIONS)  (list (init-relation '(ADA PRO B MEMBER.1059 MEMBER))(init-relation '(ACLU PRO B MEMBER.1059 MEMBER))(init-relation '(COPE PRO B MEMBER.1059 MEMBER))(init-relation '(ACU CON B MEMBER.1059 MEMBER))(init-relation '(NTU CON C MEMBER.1059 MEMBER))(init-relation '(NSI CON A MEMBER.1059 MEMBER))(init-relation '(COC CON C MEMBER.1059 MEMBER))(init-relation '(CEI CON C MEMBER.1059 MEMBER))(init-relation '(DEMOCRATS PRO C MEMBER.1059 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.1059 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1059 MEMBER)))
) 
(setf (slot-value MEMBER.1059 'DISTRICT)  'ND-AL) 
(setf (slot-value MEMBER.1059 'TERM-START)  "1980") 
(setf (slot-value MEMBER.1059 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1059 'COMMITTEES)  (list  'HOUSE-WAYS)
) 
(setf (slot-value MEMBER.1059 'STATUS)  "Active") 
(setf (slot-value MEMBER.1059 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1059 'SYMBOL)  'MEMBER.1059) )
(insert-item MEMBER MEMBER.1059)
(defvar MEMBER.1062)
(prog1 (setf MEMBER.1062 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1062 'NAME)  "Glenn English") 
(setf (slot-value MEMBER.1062 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'AGN)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'AGN)
 (list  'REFLAGGING-SHIPS 'AGN)
 (list  'HANDGUN-CONTROL 'FOR)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'AGN)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'AGN)
 (list  'CAP-GAINS-CUT 'AGN)
 (list  'CAP-TAX-CUT 'FOR)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'FOR)
 (list  'BAR-IMM-AMNESTY 'FOR)
 (list  'OK-SCHOOL-PRAY 'FOR)
 (list  'LIMIT-ABORTIONS 'FOR)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'AGN)
 (list  'CANCEL-MX-MISSILE 'AGN)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'FOR)
 (list  'SUPP-NUCLEAR-FREEZE 'AGN)
 (list  'LMT-CLN-WATER-ACT 'FOR)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'FOR)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'FOR)
 (list  'TAX-REFORM 'AGN)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'AGN)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'FOR)
 (list  'BRADY-BILL 'AGN)
)
) 
(setf (slot-value MEMBER.1062 'RELATIONS)  (list (init-relation '(ADA CON C MEMBER.1062 MEMBER))(init-relation '(ACLU CON C MEMBER.1062 MEMBER))(init-relation '(COPE CON C MEMBER.1062 MEMBER))(init-relation '(CFA CON C MEMBER.1062 MEMBER))(init-relation '(LCV CON C MEMBER.1062 MEMBER))(init-relation '(ACU PRO C MEMBER.1062 MEMBER))(init-relation '(NTU CON C MEMBER.1062 MEMBER))(init-relation '(NSI PRO A MEMBER.1062 MEMBER))(init-relation '(COC PRO B MEMBER.1062 MEMBER))(init-relation '(CEI CON C MEMBER.1062 MEMBER))(init-relation '(DEMOCRATS PRO C MEMBER.1062 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.1062 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1062 MEMBER)))
) 
(setf (slot-value MEMBER.1062 'DISTRICT)  'OK-6) 
(setf (slot-value MEMBER.1062 'TERM-START)  "1974") 
(setf (slot-value MEMBER.1062 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1062 'COMMITTEES)  (list  'HOUSE-AGRICULTURE 'HOUSE-GOVERNMENT-OPERATIONS)
) 
(setf (slot-value MEMBER.1062 'STATUS)  "Active") 
(setf (slot-value MEMBER.1062 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1062 'SYMBOL)  'MEMBER.1062) )
(insert-item MEMBER MEMBER.1062)
(defvar MEMBER.639)
(prog1 (setf MEMBER.639 (make-instance 'MEMBER))
(setf (slot-value MEMBER.639 'NAME)  "James J. Florio") 
(setf (slot-value MEMBER.639 'VOTES)  (list  (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'FOR)
 (list  'GRM-RDMN-DEF-RED 'AGN)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'FOR)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'AGN)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'DEFENSE-AUTHORIZATION 'FOR)
 (list  'SPACE-STATION 'FOR)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'FOR)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'FOR)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CHILD-CARE '--)
)
) 
(setf (slot-value MEMBER.639 'ISSUES)  (list  'SUPERFUND)
) 
(setf (slot-value MEMBER.639 'CREDO)  (list (init-stance '(TOXIC-WASTE PRO A MEMBER.639 MEMBER))
(init-stance '(ABORTION PRO C MEMBER.639 MEMBER))
)
) 
(setf (slot-value MEMBER.639 'RELATIONS)  (list (init-relation '(ADA PRO B MEMBER.639 MEMBER))(init-relation '(ACLU PRO C MEMBER.639 MEMBER))(init-relation '(COPE PRO A MEMBER.639 MEMBER))(init-relation '(CFA PRO A MEMBER.639 MEMBER))(init-relation '(LCV PRO B MEMBER.639 MEMBER))(init-relation '(ACU CON A MEMBER.639 MEMBER))(init-relation '(NTU CON B MEMBER.639 MEMBER))(init-relation '(NSI CON A MEMBER.639 MEMBER))(init-relation '(COC CON B MEMBER.639 MEMBER))(init-relation '(CEI CON B MEMBER.639 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.639 MEMBER)))
) 
(setf (slot-value MEMBER.639 'DISTRICT)  'NJ-1) 
(setf (slot-value MEMBER.639 'TERM-START)  "1974") 
(setf (slot-value MEMBER.639 'TERM-END)  "1990") 
(setf (slot-value MEMBER.639 'PARTY)  'DEM) 
(setf (slot-value MEMBER.639 'COMMITTEES)  (list  'HOUSE-ENERGY 'HOUSE-VETERANS 'HOUSE-AGING)
) 
(setf (slot-value MEMBER.639 'STATUS)  "Active") 
(setf (slot-value MEMBER.639 'DATE-OPEN) (list->date '(11 3 1989))) 
(setf (slot-value MEMBER.639 'SYMBOL)  'MEMBER.639) )
(insert-item MEMBER MEMBER.639)
(defvar MEMBER.1178)
(prog1 (setf MEMBER.1178 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1178 'NAME)  "Thomas S. Foley") 
(setf (slot-value MEMBER.1178 'VOTES)  (list  (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP '--)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'AGN)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'DEFENSE-AUTHORIZATION 'FOR)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'FOR)
 (list  'HANDGUN-CONTROL 'FOR)
 (list  'CONTRA-AID2 'FOR)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'FOR)
 (list  'LIMIT-IMPORTS 'AGN)
 (list  'CAP-TAX-CUT 'FOR)
 (list  'EXTEND-SS-BENEFIT 'FOR)
 (list  'ESTAB-DOM-CONTENT 'AGN)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY 'AGN)
 (list  'LIMIT-ABORTIONS 'AGN)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'FOR)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'CHILD-CARE '--)
 (list  'FLAG-BURNING 'AGN)
)
) 
(setf (slot-value MEMBER.1178 'RELATIONS)  (list (init-relation '(ADA PRO B MEMBER.1178 MEMBER))(init-relation '(ACLU PRO B MEMBER.1178 MEMBER))(init-relation '(ACU CON C MEMBER.1178 MEMBER))(init-relation '(NTU CON C MEMBER.1178 MEMBER))(init-relation '(NSI CON C MEMBER.1178 MEMBER))(init-relation '(COC CON C MEMBER.1178 MEMBER))(init-relation '(CEI CON C MEMBER.1178 MEMBER))(init-relation '(DEMOCRATS PRO B MEMBER.1178 MEMBER))(init-relation '(REPUBLICANS CON B MEMBER.1178 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1178 MEMBER))(init-relation '(NRA PRO A MEMBER.1178 MEMBER)))
) 
(setf (slot-value MEMBER.1178 'DISTRICT)  'WA-5) 
(setf (slot-value MEMBER.1178 'TERM-START)  "1964") 
(setf (slot-value MEMBER.1178 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1178 'COMMITTEES)  (list  'SPEAKER)
) 
(setf (slot-value MEMBER.1178 'STATUS)  "Active") 
(setf (slot-value MEMBER.1178 'DATE-OPEN) (list->date '(8 21 1989))) 
(setf (slot-value MEMBER.1178 'SYMBOL)  'MEMBER.1178) )
(insert-item MEMBER MEMBER.1178)
(defvar MEMBER.1045)
(prog1 (setf MEMBER.1045 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1045 'NAME)  "Bill Frenzel") 
(setf (slot-value MEMBER.1045 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'AGN)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'FOR)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'AGN)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'AGN)
 (list  'CAP-GAINS-CUT 'AGN)
 (list  'CAP-TAX-CUT 'AGN)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'AGN)
 (list  'BAR-IMM-AMNESTY 'FOR)
 (list  'OK-SCHOOL-PRAY 'FOR)
 (list  'LIMIT-ABORTIONS 'AGN)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'FOR)
 (list  'CANCEL-MX-MISSILE 'AGN)
 (list  'HALT-AID-TO-CONTRAS 'AGN)
 (list  'INCR-AID-TO-EL-SAL 'FOR)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'LMT-CLN-WATER-ACT 'FOR)
 (list  'RPL-TOBAC-SUB 'FOR)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'AGN)
 (list  'RETAIN-GUN-CONTROL 'FOR)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'AGN)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'FOR)
 (list  'TAX-REFORM 'AGN)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'CHILD-CARE 'AGN)
 (list  'FLAG-BURNING 'FOR)
)
) 
(setf (slot-value MEMBER.1045 'ISSUES)  (list  'TRADE)
) 
(setf (slot-value MEMBER.1045 'RELATIONS)  (list (init-relation '(ADA CON C MEMBER.1045 MEMBER))(init-relation '(ACLU CON C MEMBER.1045 MEMBER))(init-relation '(COPE CON B MEMBER.1045 MEMBER))(init-relation '(CFA CON B MEMBER.1045 MEMBER))(init-relation '(LCV CON C MEMBER.1045 MEMBER))(init-relation '(NTU PRO B MEMBER.1045 MEMBER))(init-relation '(NSI PRO B MEMBER.1045 MEMBER))(init-relation '(COC PRO A MEMBER.1045 MEMBER))(init-relation '(CEI PRO B MEMBER.1045 MEMBER))(init-relation '(DEMOCRATS CON C MEMBER.1045 MEMBER))(init-relation '(REPUBLICANS PRO C MEMBER.1045 MEMBER)))
) 
(setf (slot-value MEMBER.1045 'DISTRICT)  'MN-3) 
(setf (slot-value MEMBER.1045 'TERM-START)  "1970") 
(setf (slot-value MEMBER.1045 'TERM-END)  "1990") 
(setf (slot-value MEMBER.1045 'PARTY)  'REP) 
(setf (slot-value MEMBER.1045 'COMMITTEES)  (list  'HOUSE-BUDGET 'HOUSE-ADMINISTRATION 'HOUSE-WAYS)
) 
(setf (slot-value MEMBER.1045 'STATUS)  "Active") 
(setf (slot-value MEMBER.1045 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1045 'SYMBOL)  'MEMBER.1045) )
(insert-item MEMBER MEMBER.1045)
(defvar MEMBER.897)
(prog1 (setf MEMBER.897 (make-instance 'MEMBER))
(setf (slot-value MEMBER.897 'NAME)  "Samuel Gejdenson") 
(setf (slot-value MEMBER.897 'VOTES)  (list  (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'FOR)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'FOR)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'AGN)
 (list  'TAX-REFORM 'AGN)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'PLANT-CLOSING 'FOR)
 (list  'CAP-TAX-CUT 'FOR)
 (list  'EXTEND-SS-BENEFIT 'FOR)
 (list  'ESTAB-DOM-CONTENT 'FOR)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY 'AGN)
 (list  'LIMIT-ABORTIONS 'AGN)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'AGN)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'DEFENSE-AUTHORIZATION 'FOR)
 (list  'SPACE-STATION 'FOR)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'FOR)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'FOR)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'FOR)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-GAINS-CUT 'FOR)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'AGN)
 (list  'BRADY-BILL 'FOR)
)
) 
(setf (slot-value MEMBER.897 'CREDO)  (list (init-stance '(DEATH-PENALTY CON B MEMBER.897 MEMBER))
(init-stance '(TRIDENT-II-MISSILE CON C MEMBER.897 MEMBER))
(init-stance '(STEALTH PRO C MEMBER.897 MEMBER))
(init-stance '(B1 CON C MEMBER.897 MEMBER))
(init-stance '(HOUSING PRO C MEMBER.897 MEMBER))
(init-stance '(EDUCATION PRO C MEMBER.897 MEMBER))
(init-stance '(HEALTH-CARE PRO C MEMBER.897 MEMBER))
)
) 
(setf (slot-value MEMBER.897 'GROUPS)  (list  'ADA 'ACLU 'CFA)
) 
(setf (slot-value MEMBER.897 'RELATIONS)  (list (init-relation '(LABOR PRO B MEMBER.897 MEMBER))(init-relation '(CFA PRO B MEMBER.897 MEMBER))(init-relation '(ACU CON B MEMBER.897 MEMBER))(init-relation '(NSI CON B MEMBER.897 MEMBER))(init-relation '(ADA PRO B MEMBER.897 MEMBER))(init-relation '(ACLU PRO B MEMBER.897 MEMBER))(init-relation '(COPE PRO B MEMBER.897 MEMBER))(init-relation '(LCV PRO B MEMBER.897 MEMBER))(init-relation '(DEMOCRATS PRO C MEMBER.897 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.897 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.897 MEMBER)))
) 
(setf (slot-value MEMBER.897 'DISTRICT)  'CT-2) 
(setf (slot-value MEMBER.897 'TERM-START)  "1980") 
(setf (slot-value MEMBER.897 'PARTY)  'DEM) 
(setf (slot-value MEMBER.897 'COMMITTEES)  (list  'HOUSE-FOREIGN 'HOUSE-ADMINISTRATION 'HOUSE-INTERIOR)
) 
(setf (slot-value MEMBER.897 'STATUS)  "Active") 
(setf (slot-value MEMBER.897 'DATE-OPEN) (list->date '(9 21 1988))) 
(setf (slot-value MEMBER.897 'SYMBOL)  'MEMBER.897) )
(insert-item MEMBER MEMBER.897)
(defvar MEMBER.455)
(prog1 (setf MEMBER.455 (make-instance 'MEMBER))
(setf (slot-value MEMBER.455 'NAME)  "Richard A. Gephardt") 
(setf (slot-value MEMBER.455 'VOTES)  (list  (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH '--)
 (list  'RETAIN-GUN-CONTROL 'FOR)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'AGN)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'DEFENSE-AUTHORIZATION '--)
 (list  'SPACE-STATION 'FOR)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT '--)
 (list  'REFLAGGING-SHIPS '--)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'FOR)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-TAX-CUT 'FOR)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'FOR)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY 'AGN)
 (list  'LIMIT-ABORTIONS 'FOR)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'AGN)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'AGN)
 (list  'BRADY-BILL 'FOR)
)
) 
(setf (slot-value MEMBER.455 'ISSUES)  (list  'TRADE 'FARM 'TAX-REFORM)
) 
(setf (slot-value MEMBER.455 'CREDO)  (list (init-stance '(TAX-REFORM PRO B MEMBER.455 MEMBER))
(init-stance '(TRADE PRO B MEMBER.455 MEMBER))
(init-stance '(TRADE-RESTRICTIONS PRO B MEMBER.455 MEMBER))
(init-stance '(ABORTION PRO B MEMBER.455 MEMBER))
(init-stance '(FARM PRO B MEMBER.455 MEMBER))
)
) 
(setf (slot-value MEMBER.455 'RELATIONS)  (list (init-relation '(DEMOCRATS PRO B MEMBER.455 MEMBER))(init-relation '(ADA PRO B MEMBER.455 MEMBER))(init-relation '(ACLU PRO C MEMBER.455 MEMBER))(init-relation '(COPE PRO A MEMBER.455 MEMBER))(init-relation '(CFA PRO B MEMBER.455 MEMBER))(init-relation '(LCV PRO B MEMBER.455 MEMBER))(init-relation '(ACU CON A MEMBER.455 MEMBER))(init-relation '(NTU CON B MEMBER.455 MEMBER))(init-relation '(NSI CON B MEMBER.455 MEMBER))(init-relation '(COC CON B MEMBER.455 MEMBER))(init-relation '(CEI CON B MEMBER.455 MEMBER))(init-relation '(REPUBLICANS CON B MEMBER.455 MEMBER))(init-relation '(NEA PRO B MEMBER.455 MEMBER)))
) 
(setf (slot-value MEMBER.455 'DISTRICT)  'MO-3) 
(setf (slot-value MEMBER.455 'TERM-START)  "1976") 
(setf (slot-value MEMBER.455 'PARTY)  'DEM) 
(setf (slot-value MEMBER.455 'COMMITTEES)  (list  'MAJORITY-LEADER)
) 
(setf (slot-value MEMBER.455 'STATUS)  "Active") 
(setf (slot-value MEMBER.455 'DATE-OPEN) (list->date '(5 29 1990))) 
(setf (slot-value MEMBER.455 'SYMBOL)  'MEMBER.455) )
(insert-item MEMBER MEMBER.455)
(defvar MEMBER.3055)
(prog1 (setf MEMBER.3055 (make-instance 'MEMBER))
(setf (slot-value MEMBER.3055 'NAME)  "Newt Gingrich") 
(setf (slot-value MEMBER.3055 'VOTES)  (list  (list  'CAP-TAX-CUT 'AGN)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'FOR)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY 'FOR)
 (list  'LIMIT-ABORTIONS 'FOR)
 (list  'APPROVE-ERA 'AGN)
 (list  'PASS-IMM-REFORM 'FOR)
 (list  'CANCEL-MX-MISSILE 'AGN)
 (list  'HALT-AID-TO-CONTRAS 'AGN)
 (list  'INCR-AID-TO-EL-SAL 'FOR)
 (list  'SUPP-NUCLEAR-FREEZE 'AGN)
 (list  'LMT-CLN-WATER-ACT 'FOR)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'AGN)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'FOR)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'AGN)
 (list  'AID-ANGOLA-REB 'FOR)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'DEFENSE-AUTHORIZATION 'AGN)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'AGN)
 (list  'REFLAGGING-SHIPS 'AGN)
 (list  'HANDGUN-CONTROL 'FOR)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'AGN)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'FOR)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-GAINS-CUT 'AGN)
 (list  'CHILD-CARE 'AGN)
 (list  'FLAG-BURNING 'FOR)
 (list  'BRADY-BILL 'AGN)
)
) 
(setf (slot-value MEMBER.3055 'CREDO)  (list (init-stance '(DEREGULATION PRO B MEMBER.3055 MEMBER))
(init-stance '(SPENDING CON B MEMBER.3055 MEMBER))
(init-stance '(FREE-ENTERPRISE PRO B MEMBER.3055 MEMBER))
(init-stance '(TAXES CON B MEMBER.3055 MEMBER))
(init-stance '(DEFENSE-SPENDING PRO B MEMBER.3055 MEMBER))
(init-stance '(SDI PRO B MEMBER.3055 MEMBER))
)
) 
(setf (slot-value MEMBER.3055 'GROUPS)  (list  'REPUBLICANS)
) 
(setf (slot-value MEMBER.3055 'RELATIONS)  (list (init-relation '(ADA CON C MEMBER.3055 MEMBER))(init-relation '(ACLU CON C MEMBER.3055 MEMBER))(init-relation '(COPE CON C MEMBER.3055 MEMBER))(init-relation '(CFA CON C MEMBER.3055 MEMBER))(init-relation '(ACU PRO C MEMBER.3055 MEMBER))(init-relation '(NSI PRO B MEMBER.3055 MEMBER))(init-relation '(COC PRO B MEMBER.3055 MEMBER))(init-relation '(NRA PRO C MEMBER.3055 MEMBER))(init-relation '(DEMOCRATS CON C MEMBER.3055 MEMBER))(init-relation '(REPUBLICANS PRO C MEMBER.3055 MEMBER)))
) 
(setf (slot-value MEMBER.3055 'DISTRICT)  'GA-6) 
(setf (slot-value MEMBER.3055 'TERM-START)  "1978") 
(setf (slot-value MEMBER.3055 'PARTY)  'REP) 
(setf (slot-value MEMBER.3055 'COMMITTEES)  (list  'HOUSE-ADMINISTRATION 'HOUSE-PUBLIC-WORKS)
) 
(setf (slot-value MEMBER.3055 'STATUS)  "Active") 
(setf (slot-value MEMBER.3055 'DATE-OPEN) (list->date '(5 4 1989))) 
(setf (slot-value MEMBER.3055 'SYMBOL)  'MEMBER.3055) )
(insert-item MEMBER MEMBER.3055)
(defvar MEMBER.1038)
(prog1 (setf MEMBER.1038 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1038 'NAME)  "Daniel Robert Glickman") 
(setf (slot-value MEMBER.1038 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'AGN)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'AGN)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'FOR)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'AGN)
 (list  'CAP-GAINS-CUT 'FOR)
 (list  'CAP-TAX-CUT 'FOR)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'AGN)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY 'AGN)
 (list  'LIMIT-ABORTIONS 'AGN)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'FOR)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'LMT-CLN-WATER-ACT 'FOR)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'AGN)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'FOR)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'AGN)
 (list  'BRADY-BILL 'FOR)
)
) 
(setf (slot-value MEMBER.1038 'RELATIONS)  (list (init-relation '(ADA PRO C MEMBER.1038 MEMBER))(init-relation '(ACLU PRO B MEMBER.1038 MEMBER))(init-relation '(COPE PRO B MEMBER.1038 MEMBER))(init-relation '(CFA PRO C MEMBER.1038 MEMBER))(init-relation '(ACU CON C MEMBER.1038 MEMBER))(init-relation '(NTU CON C MEMBER.1038 MEMBER))(init-relation '(NSI CON B MEMBER.1038 MEMBER))(init-relation '(COC PRO C MEMBER.1038 MEMBER))(init-relation '(CEI CON C MEMBER.1038 MEMBER))(init-relation '(DEMOCRATS PRO C MEMBER.1038 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.1038 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1038 MEMBER)))
) 
(setf (slot-value MEMBER.1038 'DISTRICT)  'KS-4) 
(setf (slot-value MEMBER.1038 'TERM-START)  "1976") 
(setf (slot-value MEMBER.1038 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1038 'COMMITTEES)  (list  'HOUSE-AGRICULTURE 'HOUSE-JUDICIARY)
) 
(setf (slot-value MEMBER.1038 'STATUS)  "Active") 
(setf (slot-value MEMBER.1038 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1038 'SYMBOL)  'MEMBER.1038) )
(insert-item MEMBER MEMBER.1038)
(defvar MEMBER.1076)
(prog1 (setf MEMBER.1076 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1076 'NAME)  "Henry B. Gonzalez") 
(setf (slot-value MEMBER.1076 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'FOR)
 (list  'SPACE-STATION 'FOR)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'FOR)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'FOR)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-GAINS-CUT 'FOR)
 (list  'CAP-TAX-CUT 'FOR)
 (list  'EXTEND-SS-BENEFIT 'FOR)
 (list  'ESTAB-DOM-CONTENT 'FOR)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY 'AGN)
 (list  'LIMIT-ABORTIONS 'AGN)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'AGN)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'AGN)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'FOR)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'AGN)
 (list  'TAX-REFORM 'AGN)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'AGN)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'AGN)
 (list  'BRADY-BILL 'FOR)
)
) 
(setf (slot-value MEMBER.1076 'ISSUES)  (list  'HISPANICS)
) 
(setf (slot-value MEMBER.1076 'GROUPS)  (list  'HISPANICS)
) 
(setf (slot-value MEMBER.1076 'RELATIONS)  (list (init-relation '(ADA PRO A MEMBER.1076 MEMBER))(init-relation '(ACLU PRO A MEMBER.1076 MEMBER))(init-relation '(COPE PRO A MEMBER.1076 MEMBER))(init-relation '(CFA PRO B MEMBER.1076 MEMBER))(init-relation '(LCV PRO B MEMBER.1076 MEMBER))(init-relation '(ACU CON A MEMBER.1076 MEMBER))(init-relation '(NTU CON B MEMBER.1076 MEMBER))(init-relation '(NSI CON A MEMBER.1076 MEMBER))(init-relation '(COC CON B MEMBER.1076 MEMBER))(init-relation '(CEI CON A MEMBER.1076 MEMBER))(init-relation '(DEMOCRATS PRO C MEMBER.1076 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.1076 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1076 MEMBER)))
) 
(setf (slot-value MEMBER.1076 'DISTRICT)  'TX-20) 
(setf (slot-value MEMBER.1076 'TERM-START)  "1961") 
(setf (slot-value MEMBER.1076 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1076 'COMMITTEES)  (list  'HOUSE-BANKING)
) 
(setf (slot-value MEMBER.1076 'STATUS)  "Active") 
(setf (slot-value MEMBER.1076 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1076 'SYMBOL)  'MEMBER.1076) )
(insert-item MEMBER MEMBER.1076)
(defvar MEMBER.1068)
(prog1 (setf MEMBER.1068 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1068 'NAME)  "William H. Gray") 
(setf (slot-value MEMBER.1068 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'FOR)
 (list  'SPACE-STATION 'FOR)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'FOR)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'FOR)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-GAINS-CUT 'FOR)
 (list  'CAP-TAX-CUT 'FOR)
 (list  'EXTEND-SS-BENEFIT 'FOR)
 (list  'ESTAB-DOM-CONTENT '--)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY 'AGN)
 (list  'LIMIT-ABORTIONS 'AGN)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'AGN)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'AGN)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'FOR)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'AGN)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'AGN)
 (list  'BRADY-BILL 'FOR)
)
) 
(setf (slot-value MEMBER.1068 'ISSUES)  (list  'BLACKS 'FINANCE)
) 
(setf (slot-value MEMBER.1068 'GROUPS)  (list  'BLACKS)
) 
(setf (slot-value MEMBER.1068 'RELATIONS)  (list (init-relation '(ADA PRO A MEMBER.1068 MEMBER))(init-relation '(ACLU PRO A MEMBER.1068 MEMBER))(init-relation '(COPE PRO A MEMBER.1068 MEMBER))(init-relation '(LCV PRO B MEMBER.1068 MEMBER))(init-relation '(ACU CON A MEMBER.1068 MEMBER))(init-relation '(NTU CON B MEMBER.1068 MEMBER))(init-relation '(NSI CON A MEMBER.1068 MEMBER))(init-relation '(COC CON B MEMBER.1068 MEMBER))(init-relation '(CEI CON A MEMBER.1068 MEMBER))(init-relation '(DEMOCRATS PRO B MEMBER.1068 MEMBER))(init-relation '(REPUBLICANS CON B MEMBER.1068 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1068 MEMBER)))
) 
(setf (slot-value MEMBER.1068 'DISTRICT)  'PA-2) 
(setf (slot-value MEMBER.1068 'TERM-START)  "1978") 
(setf (slot-value MEMBER.1068 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1068 'COMMITTEES)  (list  'HOUSE-APPROPRIATIONS)
) 
(setf (slot-value MEMBER.1068 'STATUS)  "Active") 
(setf (slot-value MEMBER.1068 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1068 'SYMBOL)  'MEMBER.1068) )
(insert-item MEMBER MEMBER.1068)
(defvar MEMBER.1036)
(prog1 (setf MEMBER.1036 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1036 'NAME)  "Lee H. Hamilton") 
(setf (slot-value MEMBER.1036 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'AGN)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'AGN)
 (list  'HANDGUN-CONTROL 'FOR)
 (list  'CONTRA-AID2 'FOR)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'FOR)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-GAINS-CUT 'FOR)
 (list  'CAP-TAX-CUT 'FOR)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'FOR)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY 'FOR)
 (list  'LIMIT-ABORTIONS 'FOR)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'FOR)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'AGN)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'AGN)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'AGN)
 (list  'BRADY-BILL 'FOR)
)
) 
(setf (slot-value MEMBER.1036 'ISSUES)  (list  'INTELLIGENCE)
) 
(setf (slot-value MEMBER.1036 'RELATIONS)  (list (init-relation '(ADA PRO C MEMBER.1036 MEMBER))(init-relation '(ACLU PRO B MEMBER.1036 MEMBER))(init-relation '(COPE PRO C MEMBER.1036 MEMBER))(init-relation '(CFA PRO B MEMBER.1036 MEMBER))(init-relation '(LCV PRO C MEMBER.1036 MEMBER))(init-relation '(ACU CON C MEMBER.1036 MEMBER))(init-relation '(NTU CON C MEMBER.1036 MEMBER))(init-relation '(NSI CON C MEMBER.1036 MEMBER))(init-relation '(COC PRO C MEMBER.1036 MEMBER))(init-relation '(CEI CON C MEMBER.1036 MEMBER))(init-relation '(DEMOCRATS PRO C MEMBER.1036 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.1036 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1036 MEMBER)))
) 
(setf (slot-value MEMBER.1036 'DISTRICT)  'IN-9) 
(setf (slot-value MEMBER.1036 'TERM-START)  "1964") 
(setf (slot-value MEMBER.1036 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1036 'COMMITTEES)  (list  'HOUSE-FOREIGN)
) 
(setf (slot-value MEMBER.1036 'STATUS)  "Active") 
(setf (slot-value MEMBER.1036 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1036 'SYMBOL)  'MEMBER.1036) )
(insert-item MEMBER MEMBER.1036)
(defvar MEMBER.1026)
(prog1 (setf MEMBER.1026 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1026 'NAME)  "John Paul Hammerschmidt") 
(setf (slot-value MEMBER.1026 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'AGN)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'AGN)
 (list  'REFLAGGING-SHIPS 'AGN)
 (list  'HANDGUN-CONTROL 'FOR)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'AGN)
 (list  'HOME-HEALTH-CARE 'FOR)
 (list  'AIDS '--)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-TAX-CUT 'AGN)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'AGN)
 (list  'BAR-IMM-AMNESTY 'FOR)
 (list  'OK-SCHOOL-PRAY 'FOR)
 (list  'LIMIT-ABORTIONS 'FOR)
 (list  'APPROVE-ERA 'AGN)
 (list  'PASS-IMM-REFORM 'FOR)
 (list  'CANCEL-MX-MISSILE 'AGN)
 (list  'HALT-AID-TO-CONTRAS 'AGN)
 (list  'INCR-AID-TO-EL-SAL 'FOR)
 (list  'SUPP-NUCLEAR-FREEZE 'AGN)
 (list  'CAP-GAINS-CUT 'AGN)
 (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'AGN)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'FOR)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'AGN)
 (list  'AID-ANGOLA-REB 'FOR)
 (list  'TAX-REFORM 'AGN)
 (list  'S-AFRICA-SANC 'AGN)
 (list  'IMMIG-REFORM 'AGN)
 (list  'CHILD-CARE 'AGN)
 (list  'FLAG-BURNING 'FOR)
 (list  'BRADY-BILL 'AGN)
)
) 
(setf (slot-value MEMBER.1026 'RELATIONS)  (list (init-relation '(ADA CON B MEMBER.1026 MEMBER))(init-relation '(ACLU CON A MEMBER.1026 MEMBER))(init-relation '(COPE CON B MEMBER.1026 MEMBER))(init-relation '(CFA CON B MEMBER.1026 MEMBER))(init-relation '(LCV CON B MEMBER.1026 MEMBER))(init-relation '(ACU PRO B MEMBER.1026 MEMBER))(init-relation '(NTU CON C MEMBER.1026 MEMBER))(init-relation '(NSI PRO A MEMBER.1026 MEMBER))(init-relation '(COC PRO B MEMBER.1026 MEMBER))(init-relation '(CEI PRO C MEMBER.1026 MEMBER))(init-relation '(DEMOCRATS CON C MEMBER.1026 MEMBER))(init-relation '(REPUBLICANS PRO C MEMBER.1026 MEMBER)))
) 
(setf (slot-value MEMBER.1026 'DISTRICT)  'AR-3) 
(setf (slot-value MEMBER.1026 'TERM-START)  "1966") 
(setf (slot-value MEMBER.1026 'PARTY)  'REP) 
(setf (slot-value MEMBER.1026 'COMMITTEES)  (list  'HOUSE-PUBLIC-WORKS 'HOUSE-VETERANS-AFFAIRS)
) 
(setf (slot-value MEMBER.1026 'STATUS)  "Active") 
(setf (slot-value MEMBER.1026 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1026 'SYMBOL)  'MEMBER.1026) )
(insert-item MEMBER MEMBER.1026)
(defvar MEMBER.1077)
(prog1 (setf MEMBER.1077 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1077 'NAME)  "James V. Hansen") 
(setf (slot-value MEMBER.1077 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'AGN)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'AGN)
 (list  'REFLAGGING-SHIPS 'AGN)
 (list  'HANDGUN-CONTROL 'FOR)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'AGN)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'FOR)
 (list  'LIMIT-IMPORTS 'AGN)
 (list  'CAP-TAX-CUT 'AGN)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'AGN)
 (list  'BAR-IMM-AMNESTY 'FOR)
 (list  'OK-SCHOOL-PRAY 'FOR)
 (list  'LIMIT-ABORTIONS 'FOR)
 (list  'APPROVE-ERA 'AGN)
 (list  'PASS-IMM-REFORM 'FOR)
 (list  'CANCEL-MX-MISSILE 'AGN)
 (list  'HALT-AID-TO-CONTRAS 'AGN)
 (list  'INCR-AID-TO-EL-SAL '--)
 (list  'SUPP-NUCLEAR-FREEZE 'AGN)
 (list  'CAP-GAINS-CUT 'AGN)
 (list  'LMT-CLN-WATER-ACT 'FOR)
 (list  'RPL-TOBAC-SUB 'FOR)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'AGN)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'FOR)
 (list  'LMT-TEXT-IMP 'AGN)
 (list  'LIMIT-SDI 'AGN)
 (list  'AID-ANGOLA-REB 'FOR)
 (list  'TAX-REFORM 'AGN)
 (list  'S-AFRICA-SANC 'AGN)
 (list  'IMMIG-REFORM '--)
 (list  'CHILD-CARE 'AGN)
 (list  'FLAG-BURNING 'FOR)
 (list  'BRADY-BILL 'AGN)
)
) 
(setf (slot-value MEMBER.1077 'RELATIONS)  (list (init-relation '(ADA CON A MEMBER.1077 MEMBER))(init-relation '(ACLU CON A MEMBER.1077 MEMBER))(init-relation '(COPE CON A MEMBER.1077 MEMBER))(init-relation '(CFA CON B MEMBER.1077 MEMBER))(init-relation '(LCV CON B MEMBER.1077 MEMBER))(init-relation '(ACU PRO A MEMBER.1077 MEMBER))(init-relation '(NSI PRO A MEMBER.1077 MEMBER))(init-relation '(COC PRO B MEMBER.1077 MEMBER))(init-relation '(CEI PRO B MEMBER.1077 MEMBER))(init-relation '(DEMOCRATS CON C MEMBER.1077 MEMBER))(init-relation '(REPUBLICANS PRO C MEMBER.1077 MEMBER)))
) 
(setf (slot-value MEMBER.1077 'DISTRICT)  'UT-1) 
(setf (slot-value MEMBER.1077 'TERM-START)  "1980") 
(setf (slot-value MEMBER.1077 'PARTY)  'REP) 
(setf (slot-value MEMBER.1077 'COMMITTEES)  (list  'HOUSE-ARMED-SERVICES 'HOUSE-INTERIOR)
) 
(setf (slot-value MEMBER.1077 'STATUS)  "Active") 
(setf (slot-value MEMBER.1077 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1077 'SYMBOL)  'MEMBER.1077) )
(insert-item MEMBER MEMBER.1077)
(defvar MEMBER.1027)
(prog1 (setf MEMBER.1027 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1027 'NAME)  "Augustus F. Hawkins") 
(setf (slot-value MEMBER.1027 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'FOR)
 (list  'SPACE-STATION 'FOR)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'FOR)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'FOR)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'FOR)
 (list  'AIDS '--)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-TAX-CUT 'FOR)
 (list  'EXTEND-SS-BENEFIT 'FOR)
 (list  'ESTAB-DOM-CONTENT 'FOR)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY 'AGN)
 (list  'LIMIT-ABORTIONS 'AGN)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'AGN)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'CAP-GAINS-CUT 'FOR)
 (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'AGN)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'FOR)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'AGN)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'AGN)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'AGN)
)
) 
(setf (slot-value MEMBER.1027 'GROUPS)  (list  'BLACKS 'HISPANICS 'LABOR)
) 
(setf (slot-value MEMBER.1027 'RELATIONS)  (list (init-relation '(ADA PRO B MEMBER.1027 MEMBER))(init-relation '(ACLU PRO C MEMBER.1027 MEMBER))(init-relation '(COPE PRO A MEMBER.1027 MEMBER))(init-relation '(CFA PRO B MEMBER.1027 MEMBER))(init-relation '(LCV PRO C MEMBER.1027 MEMBER))(init-relation '(ACU CON A MEMBER.1027 MEMBER))(init-relation '(NTU CON B MEMBER.1027 MEMBER))(init-relation '(NSI CON A MEMBER.1027 MEMBER))(init-relation '(COC CON B MEMBER.1027 MEMBER))(init-relation '(CEI CON A MEMBER.1027 MEMBER))(init-relation '(DEMOCRATS PRO C MEMBER.1027 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.1027 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1027 MEMBER)))
) 
(setf (slot-value MEMBER.1027 'DISTRICT)  'CA-29) 
(setf (slot-value MEMBER.1027 'TERM-START)  "1962") 
(setf (slot-value MEMBER.1027 'TERM-END)  "1990") 
(setf (slot-value MEMBER.1027 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1027 'COMMITTEES)  (list  'HOUSE-EDUCATION)
) 
(setf (slot-value MEMBER.1027 'STATUS)  "Active") 
(setf (slot-value MEMBER.1027 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1027 'SYMBOL)  'MEMBER.1027) )
(insert-item MEMBER MEMBER.1027)
(defvar MEMBER.1056)
(prog1 (setf MEMBER.1056 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1056 'NAME)  "Frank Horton") 
(setf (slot-value MEMBER.1056 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'FOR)
 (list  'SPACE-STATION 'FOR)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'AGN)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE '--)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-TAX-CUT 'AGN)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT '--)
 (list  'BAR-IMM-AMNESTY 'FOR)
 (list  'OK-SCHOOL-PRAY 'FOR)
 (list  'LIMIT-ABORTIONS 'AGN)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'AGN)
 (list  'CANCEL-MX-MISSILE 'AGN)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'FOR)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'CAP-GAINS-CUT 'AGN)
 (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'AGN)
 (list  'TAX-REFORM 'AGN)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'AGN)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'FOR)
 (list  'BRADY-BILL 'AGN)
)
) 
(setf (slot-value MEMBER.1056 'RELATIONS)  (list (init-relation '(ADA PRO B MEMBER.1056 MEMBER))(init-relation '(COPE PRO C MEMBER.1056 MEMBER))(init-relation '(LCV PRO C MEMBER.1056 MEMBER))(init-relation '(ACU CON B MEMBER.1056 MEMBER))(init-relation '(NTU CON C MEMBER.1056 MEMBER))(init-relation '(NSI CON C MEMBER.1056 MEMBER))(init-relation '(COC CON B MEMBER.1056 MEMBER))(init-relation '(CEI CON B MEMBER.1056 MEMBER))(init-relation '(DEMOCRATS CON C MEMBER.1056 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1056 MEMBER)))
) 
(setf (slot-value MEMBER.1056 'DISTRICT)  'NY-29) 
(setf (slot-value MEMBER.1056 'TERM-START)  "1962") 
(setf (slot-value MEMBER.1056 'PARTY)  'REP) 
(setf (slot-value MEMBER.1056 'COMMITTEES)  (list  'HOUSE-GOVERNMENT-OPERATIONS)
) 
(setf (slot-value MEMBER.1056 'STATUS)  "Active") 
(setf (slot-value MEMBER.1056 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1056 'SYMBOL)  'MEMBER.1056) )
(insert-item MEMBER MEMBER.1056)
(defvar MEMBER.1016)
(prog1 (setf MEMBER.1016 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1016 'NAME)  "Nancy Lee Johnson") 
(setf (slot-value MEMBER.1016 'GENDER)  'FEMALE) 
(setf (slot-value MEMBER.1016 'VOTES)  (list  (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'FOR)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'FOR)
 (list  'CONTRA-AID 'FOR)
 (list  'LMT-TEXT-IMP 'AGN)
 (list  'LIMIT-SDI 'AGN)
 (list  'AID-ANGOLA-REB 'FOR)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'PLANT-CLOSING 'FOR)
 (list  'CAP-TAX-CUT 'AGN)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'FOR)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY 'AGN)
 (list  'LIMIT-ABORTIONS 'AGN)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'FOR)
 (list  'CANCEL-MX-MISSILE '--)
 (list  'HALT-AID-TO-CONTRAS 'AGN)
 (list  'INCR-AID-TO-EL-SAL 'FOR)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'DEFENSE-AUTHORIZATION 'AGN)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'AGN)
 (list  'HANDGUN-CONTROL 'FOR)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'AGN)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'AGN)
 (list  'CAP-GAINS-CUT 'AGN)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'AGN)
 (list  'BRADY-BILL 'FOR)
)
) 
(setf (slot-value MEMBER.1016 'ISSUES)  (list  'ELDERLY 'CHILD-CARE 'TRADE-RESTRICTIONS)
) 
(setf (slot-value MEMBER.1016 'CREDO)  (list (init-stance '(ELDERLY PRO B MEMBER.1016 MEMBER))
(init-stance '(CHILD-CARE PRO B MEMBER.1016 MEMBER))
(init-stance '(TRADE-RESTRICTIONS PRO C MEMBER.1016 MEMBER))
)
) 
(setf (slot-value MEMBER.1016 'GROUPS)  (list  'COC 'DEFENSE)
) 
(setf (slot-value MEMBER.1016 'RELATIONS)  (list (init-relation '(ADA PRO C MEMBER.1016 MEMBER))(init-relation '(CFA CON C MEMBER.1016 MEMBER))(init-relation '(LCV PRO C MEMBER.1016 MEMBER))(init-relation '(COC PRO C MEMBER.1016 MEMBER))(init-relation '(REPUBLICANS PRO C MEMBER.1016 MEMBER))(init-relation '(DEMOCRATS CON C MEMBER.1016 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1016 MEMBER)))
) 
(setf (slot-value MEMBER.1016 'DISTRICT)  'CT-6) 
(setf (slot-value MEMBER.1016 'TERM-START)  "1982") 
(setf (slot-value MEMBER.1016 'PARTY)  'REP) 
(setf (slot-value MEMBER.1016 'COMMITTEES)  (list  'HOUSE-BUDGET 'HOUSE-PUBLIC-WORKS)
) 
(setf (slot-value MEMBER.1016 'STATUS)  "Active") 
(setf (slot-value MEMBER.1016 'DATE-OPEN) (list->date '(2 18 1989))) 
(setf (slot-value MEMBER.1016 'SYMBOL)  'MEMBER.1016) )
(insert-item MEMBER MEMBER.1016)
(defvar MEMBER.1074)
(prog1 (setf MEMBER.1074 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1074 'NAME)  "Timothy Peter Johnson") 
(setf (slot-value MEMBER.1074 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'FOR)
 (list  'SPACE-STATION 'FOR)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'FOR)
 (list  'HANDGUN-CONTROL 'FOR)
 (list  'CONTRA-AID2 'FOR)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'FOR)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-GAINS-CUT 'FOR)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'FOR)
 (list  'BRADY-BILL 'AGN)
)
) 
(setf (slot-value MEMBER.1074 'RELATIONS)  (list (init-relation '(DEMOCRATS PRO C MEMBER.1074 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.1074 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1074 MEMBER)))
) 
(setf (slot-value MEMBER.1074 'DISTRICT)  'SD-AL) 
(setf (slot-value MEMBER.1074 'TERM-START)  "1986") 
(setf (slot-value MEMBER.1074 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1074 'COMMITTEES)  (list  'HOUSE-AGRICULTURE 'HOUSE-VETERANS-AFFAIRS)
) 
(setf (slot-value MEMBER.1074 'STATUS)  "Active") 
(setf (slot-value MEMBER.1074 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1074 'SYMBOL)  'MEMBER.1074) )
(insert-item MEMBER MEMBER.1074)
(defvar MEMBER.1058)
(prog1 (setf MEMBER.1058 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1058 'NAME)  "Walter Berman Jones") 
(setf (slot-value MEMBER.1058 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION '--)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'FOR)
 (list  'HANDGUN-CONTROL 'FOR)
 (list  'CONTRA-AID2 'FOR)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-TAX-CUT 'FOR)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'AGN)
 (list  'BAR-IMM-AMNESTY 'FOR)
 (list  'OK-SCHOOL-PRAY 'FOR)
 (list  'LIMIT-ABORTIONS 'AGN)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'AGN)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'CAP-GAINS-CUT 'FOR)
 (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'AGN)
 (list  'BAN-POLYGRAPH 'AGN)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'AGN)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC '--)
 (list  'IMMIG-REFORM 'AGN)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'FOR)
 (list  'BRADY-BILL 'FOR)
)
) 
(setf (slot-value MEMBER.1058 'RELATIONS)  (list (init-relation '(ADA PRO C MEMBER.1058 MEMBER))(init-relation '(COPE PRO C MEMBER.1058 MEMBER))(init-relation '(LCV CON C MEMBER.1058 MEMBER))(init-relation '(ACU CON B MEMBER.1058 MEMBER))(init-relation '(NTU CON B MEMBER.1058 MEMBER))(init-relation '(NSI CON A MEMBER.1058 MEMBER))(init-relation '(COC CON C MEMBER.1058 MEMBER))(init-relation '(CEI CON B MEMBER.1058 MEMBER))(init-relation '(DEMOCRATS PRO C MEMBER.1058 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.1058 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1058 MEMBER)))
) 
(setf (slot-value MEMBER.1058 'DISTRICT)  'NC-1) 
(setf (slot-value MEMBER.1058 'TERM-START)  "1966") 
(setf (slot-value MEMBER.1058 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1058 'COMMITTEES)  (list  'HOUSE-AGRICULTURE)
) 
(setf (slot-value MEMBER.1058 'STATUS)  "Active") 
(setf (slot-value MEMBER.1058 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1058 'SYMBOL)  'MEMBER.1058) )
(insert-item MEMBER MEMBER.1058)
(defvar MEMBER.1087)
(prog1 (setf MEMBER.1087 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1087 'NAME)  "Marcy Kaptur") 
(setf (slot-value MEMBER.1087 'GENDER)  'FEMALE) 
(setf (slot-value MEMBER.1087 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'FOR)
 (list  'SPACE-STATION 'FOR)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'FOR)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'FOR)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-TAX-CUT 'FOR)
 (list  'EXTEND-SS-BENEFIT 'FOR)
 (list  'ESTAB-DOM-CONTENT 'FOR)
 (list  'BAR-IMM-AMNESTY 'FOR)
 (list  'OK-SCHOOL-PRAY 'FOR)
 (list  'LIMIT-ABORTIONS 'FOR)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'AGN)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'CAP-GAINS-CUT 'FOR)
 (list  'LMT-CLN-WATER-ACT 'FOR)
 (list  'RPL-TOBAC-SUB 'FOR)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'FOR)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'AGN)
 (list  'TAX-REFORM 'AGN)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'AGN)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'AGN)
 (list  'BRADY-BILL 'FOR)
)
) 
(setf (slot-value MEMBER.1087 'GROUPS)  (list  'WOMEN 'URBAN)
) 
(setf (slot-value MEMBER.1087 'RELATIONS)  (list (init-relation '(ADA PRO C MEMBER.1087 MEMBER))(init-relation '(ACLU PRO C MEMBER.1087 MEMBER))(init-relation '(COPE PRO A MEMBER.1087 MEMBER))(init-relation '(ACU CON A MEMBER.1087 MEMBER))(init-relation '(NTU CON B MEMBER.1087 MEMBER))(init-relation '(NSI CON A MEMBER.1087 MEMBER))(init-relation '(COC CON B MEMBER.1087 MEMBER))(init-relation '(CEI CON B MEMBER.1087 MEMBER))(init-relation '(DEMOCRATS PRO C MEMBER.1087 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.1087 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1087 MEMBER)))
) 
(setf (slot-value MEMBER.1087 'DISTRICT)  'OH-9) 
(setf (slot-value MEMBER.1087 'TERM-START)  "1982") 
(setf (slot-value MEMBER.1087 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1087 'COMMITTEES)  (list  'HOUSE-BANKING 'HOUSE-BUDGET)
) 
(setf (slot-value MEMBER.1087 'STATUS)  "Active") 
(setf (slot-value MEMBER.1087 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1087 'SYMBOL)  'MEMBER.1087) )
(insert-item MEMBER MEMBER.1087)
(defvar MEMBER.1082)
(prog1 (setf MEMBER.1082 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1082 'NAME)  "Robert William Kastenmeier") 
(setf (slot-value MEMBER.1082 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'FOR)
 (list  'SPACE-STATION 'FOR)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'FOR)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'FOR)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-TAX-CUT 'FOR)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'FOR)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY 'AGN)
 (list  'LIMIT-ABORTIONS 'AGN)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'FOR)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'CAP-GAINS-CUT 'FOR)
 (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'AGN)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'FOR)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'AGN)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'AGN)
)
) 
(setf (slot-value MEMBER.1082 'RELATIONS)  (list (init-relation '(ADA PRO A MEMBER.1082 MEMBER))(init-relation '(ACLU PRO A MEMBER.1082 MEMBER))(init-relation '(COPE PRO A MEMBER.1082 MEMBER))(init-relation '(CFA PRO A MEMBER.1082 MEMBER))(init-relation '(LCV PRO A MEMBER.1082 MEMBER))(init-relation '(ACU CON A MEMBER.1082 MEMBER))(init-relation '(NTU CON B MEMBER.1082 MEMBER))(init-relation '(NSI CON A MEMBER.1082 MEMBER))(init-relation '(COC CON B MEMBER.1082 MEMBER))(init-relation '(CEI CON B MEMBER.1082 MEMBER))(init-relation '(DEMOCRATS PRO C MEMBER.1082 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.1082 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1082 MEMBER)))
) 
(setf (slot-value MEMBER.1082 'DISTRICT)  'WI-2) 
(setf (slot-value MEMBER.1082 'TERM-START)  "1958") 
(setf (slot-value MEMBER.1082 'TERM-END)  "1990") 
(setf (slot-value MEMBER.1082 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1082 'COMMITTEES)  (list  'HOUSE-JUDICIARY 'HOUSE-INTELLIGENCE)
) 
(setf (slot-value MEMBER.1082 'STATUS)  "Active") 
(setf (slot-value MEMBER.1082 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1082 'SYMBOL)  'MEMBER.1082) )
(insert-item MEMBER MEMBER.1082)
(defvar MEMBER.709)
(prog1 (setf MEMBER.709 (make-instance 'MEMBER))
(setf (slot-value MEMBER.709 'NAME)  "Barbara Kennelly") 
(setf (slot-value MEMBER.709 'GENDER)  'FEMALE) 
(setf (slot-value MEMBER.709 'VOTES)  (list  (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'AGN)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'FOR)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'AGN)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'PLANT-CLOSING 'FOR)
 (list  'CAP-TAX-CUT 'FOR)
 (list  'EXTEND-SS-BENEFIT 'FOR)
 (list  'ESTAB-DOM-CONTENT 'FOR)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY 'AGN)
 (list  'LIMIT-ABORTIONS 'AGN)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'AGN)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'DEFENSE-AUTHORIZATION 'FOR)
 (list  'SPACE-STATION 'FOR)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'AGN)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'FOR)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-GAINS-CUT 'FOR)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'AGN)
 (list  'BRADY-BILL 'FOR)
)
) 
(setf (slot-value MEMBER.709 'ISSUES)  (list  'DEFICIT 'MILITARY 'EDUCATION 'ELDERLY 'HEALTH-CARE)
) 
(setf (slot-value MEMBER.709 'CREDO)  (list (init-stance '(WOMENS-RIGHTS PRO B MEMBER.709 MEMBER))
(init-stance '(CHILD-CARE PRO B MEMBER.709 MEMBER))
(init-stance '(DEFICIT CON B MEMBER.709 MEMBER))
(init-stance '(MILITARY PRO B MEMBER.709 MEMBER))
(init-stance '(EDUCATION PRO C MEMBER.709 MEMBER))
(init-stance '(ELDERLY PRO C MEMBER.709 MEMBER))
(init-stance '(HEALTH-CARE PRO C MEMBER.709 MEMBER))
)
) 
(setf (slot-value MEMBER.709 'GROUPS)  (list  'CFA 'ADA 'ACLU)
) 
(setf (slot-value MEMBER.709 'RELATIONS)  (list (init-relation '(ADA PRO B MEMBER.709 MEMBER))(init-relation '(ACLU PRO B MEMBER.709 MEMBER))(init-relation '(COPE PRO B MEMBER.709 MEMBER))(init-relation '(CFA PRO B MEMBER.709 MEMBER))(init-relation '(LCV PRO B MEMBER.709 MEMBER))(init-relation '(ACU CON B MEMBER.709 MEMBER))(init-relation '(NTU CON C MEMBER.709 MEMBER))(init-relation '(NSI CON B MEMBER.709 MEMBER))(init-relation '(COC CON C MEMBER.709 MEMBER))(init-relation '(CEI CON C MEMBER.709 MEMBER))(init-relation '(DEMOCRATS PRO C MEMBER.709 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.709 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.709 MEMBER)))
) 
(setf (slot-value MEMBER.709 'DISTRICT)  'CT-1) 
(setf (slot-value MEMBER.709 'TERM-START)  "1982") 
(setf (slot-value MEMBER.709 'PARTY)  'DEM) 
(setf (slot-value MEMBER.709 'COMMITTEES)  (list  'HOUSE-WAYS)
) 
(setf (slot-value MEMBER.709 'STATUS)  "Active") 
(setf (slot-value MEMBER.709 'DATE-OPEN) (list->date '(9 21 1988))) 
(setf (slot-value MEMBER.709 'SYMBOL)  'MEMBER.709) )
(insert-item MEMBER MEMBER.709)
(defvar MEMBER.1064)
(prog1 (setf MEMBER.1064 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1064 'NAME)  "Mickey Leland") 
(setf (slot-value MEMBER.1064 'VOTES)  (list  (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'AGN)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'FOR)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'AGN)
 (list  'TAX-REFORM 'AGN)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'AGN)
 (list  'DEFENSE-AUTHORIZATION 'FOR)
 (list  'SPACE-STATION 'FOR)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'FOR)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'FOR)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'FOR)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-TAX-CUT '--)
 (list  'EXTEND-SS-BENEFIT 'FOR)
 (list  'ESTAB-DOM-CONTENT 'FOR)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY 'AGN)
 (list  'LIMIT-ABORTIONS 'AGN)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM '--)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'CHILD-CARE '--)
)
) 
(setf (slot-value MEMBER.1064 'ISSUES)  (list  'HUNGER 'ISRAEL)
) 
(setf (slot-value MEMBER.1064 'CREDO)  (list (init-stance '(HUNGER PRO A MEMBER.1064 MEMBER))
(init-stance '(HOMELESS PRO A MEMBER.1064 MEMBER))
(init-stance '(HEALTH PRO B MEMBER.1064 MEMBER))
(init-stance '(HOUSING PRO B MEMBER.1064 MEMBER))
)
) 
(setf (slot-value MEMBER.1064 'GROUPS)  (list  'BLACKS 'POOR 'HISPANICS)
) 
(setf (slot-value MEMBER.1064 'RELATIONS)  (list (init-relation '(ADA PRO A MEMBER.1064 MEMBER))(init-relation '(ACLU PRO A MEMBER.1064 MEMBER))(init-relation '(COPE PRO A MEMBER.1064 MEMBER))(init-relation '(CFA PRO B MEMBER.1064 MEMBER))(init-relation '(LCV PRO B MEMBER.1064 MEMBER))(init-relation '(ACU CON C MEMBER.1064 MEMBER))(init-relation '(NTU CON C MEMBER.1064 MEMBER))(init-relation '(NSI CON C MEMBER.1064 MEMBER))(init-relation '(COC CON C MEMBER.1064 MEMBER))(init-relation '(CEI CON C MEMBER.1064 MEMBER))(init-relation '(DEMOCRATS PRO C MEMBER.1064 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.1064 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1064 MEMBER)))
) 
(setf (slot-value MEMBER.1064 'DISTRICT)  'TX-18) 
(setf (slot-value MEMBER.1064 'TERM-START)  "1978") 
(setf (slot-value MEMBER.1064 'TERM-END)  "1989") 
(setf (slot-value MEMBER.1064 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1064 'COMMITTEES)  (list  'HOUSE-ENERGY)
) 
(setf (slot-value MEMBER.1064 'STATUS)  "Active") 
(setf (slot-value MEMBER.1064 'DATE-OPEN) (list->date '(8 21 1989))) 
(setf (slot-value MEMBER.1064 'SYMBOL)  'MEMBER.1064) )
(insert-item MEMBER MEMBER.1064)
(defvar MEMBER.1048)
(prog1 (setf MEMBER.1048 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1048 'NAME)  "Ronald Charles Marlenee") 
(setf (slot-value MEMBER.1048 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'AGN)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'AGN)
 (list  'REFLAGGING-SHIPS 'AGN)
 (list  'HANDGUN-CONTROL 'FOR)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'AGN)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'FOR)
 (list  'LIMIT-IMPORTS 'AGN)
 (list  'CAP-TAX-CUT 'AGN)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'AGN)
 (list  'BAR-IMM-AMNESTY 'FOR)
 (list  'OK-SCHOOL-PRAY 'FOR)
 (list  'LIMIT-ABORTIONS 'AGN)
 (list  'APPROVE-ERA 'AGN)
 (list  'PASS-IMM-REFORM 'AGN)
 (list  'CANCEL-MX-MISSILE 'AGN)
 (list  'HALT-AID-TO-CONTRAS 'AGN)
 (list  'INCR-AID-TO-EL-SAL 'FOR)
 (list  'SUPP-NUCLEAR-FREEZE 'AGN)
 (list  'CAP-GAINS-CUT 'AGN)
 (list  'LMT-CLN-WATER-ACT 'FOR)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'AGN)
 (list  'BAN-POLYGRAPH 'AGN)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'FOR)
 (list  'LMT-TEXT-IMP 'AGN)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'FOR)
 (list  'TAX-REFORM 'AGN)
 (list  'S-AFRICA-SANC 'AGN)
 (list  'IMMIG-REFORM 'AGN)
 (list  'CHILD-CARE 'AGN)
 (list  'FLAG-BURNING 'FOR)
 (list  'BRADY-BILL 'AGN)
)
) 
(setf (slot-value MEMBER.1048 'RELATIONS)  (list (init-relation '(ADA CON A MEMBER.1048 MEMBER))(init-relation '(ACLU CON A MEMBER.1048 MEMBER))(init-relation '(COPE CON B MEMBER.1048 MEMBER))(init-relation '(CFA CON A MEMBER.1048 MEMBER))(init-relation '(LCV CON B MEMBER.1048 MEMBER))(init-relation '(ACU PRO A MEMBER.1048 MEMBER))(init-relation '(NSI PRO A MEMBER.1048 MEMBER))(init-relation '(COC PRO B MEMBER.1048 MEMBER))(init-relation '(CEI PRO B MEMBER.1048 MEMBER))(init-relation '(DEMOCRATS CON C MEMBER.1048 MEMBER))(init-relation '(REPUBLICANS PRO C MEMBER.1048 MEMBER)))
) 
(setf (slot-value MEMBER.1048 'DISTRICT)  'MT-2) 
(setf (slot-value MEMBER.1048 'TERM-START)  "1976") 
(setf (slot-value MEMBER.1048 'PARTY)  'REP) 
(setf (slot-value MEMBER.1048 'COMMITTEES)  (list  'HOUSE-AGRICULTURE 'HOUSE-INTERIOR)
) 
(setf (slot-value MEMBER.1048 'STATUS)  "Active") 
(setf (slot-value MEMBER.1048 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1048 'SYMBOL)  'MEMBER.1048) )
(insert-item MEMBER MEMBER.1048)
(defvar MEMBER.1067)
(prog1 (setf MEMBER.1067 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1067 'NAME)  "Joseph M. McDade") 
(setf (slot-value MEMBER.1067 'ENGLISH-SHORT)  "McDade") 
(setf (slot-value MEMBER.1067 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'AGN)
 (list  'SPACE-STATION 'FOR)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'AGN)
 (list  'REFLAGGING-SHIPS '--)
 (list  'HANDGUN-CONTROL 'FOR)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'AGN)
 (list  'HOME-HEALTH-CARE 'FOR)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-TAX-CUT 'AGN)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'FOR)
 (list  'BAR-IMM-AMNESTY 'FOR)
 (list  'OK-SCHOOL-PRAY 'FOR)
 (list  'LIMIT-ABORTIONS 'FOR)
 (list  'APPROVE-ERA 'AGN)
 (list  'PASS-IMM-REFORM 'FOR)
 (list  'CANCEL-MX-MISSILE 'AGN)
 (list  'HALT-AID-TO-CONTRAS '--)
 (list  'INCR-AID-TO-EL-SAL 'FOR)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'CAP-GAINS-CUT 'AGN)
 (list  'LMT-CLN-WATER-ACT 'FOR)
 (list  'RPL-TOBAC-SUB 'FOR)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'FOR)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'AGN)
 (list  'AID-ANGOLA-REB 'FOR)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC '--)
 (list  'IMMIG-REFORM 'FOR)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'FOR)
 (list  'BRADY-BILL 'FOR)
)
) 
(setf (slot-value MEMBER.1067 'ISSUES)  (list  'MODERATE)
) 
(setf (slot-value MEMBER.1067 'RELATIONS)  (list (init-relation '(ADA CON C MEMBER.1067 MEMBER))(init-relation '(ACLU CON B MEMBER.1067 MEMBER))(init-relation '(COPE PRO C MEMBER.1067 MEMBER))(init-relation '(CFA PRO B MEMBER.1067 MEMBER))(init-relation '(LCV CON C MEMBER.1067 MEMBER))(init-relation '(ACU PRO C MEMBER.1067 MEMBER))(init-relation '(NTU CON C MEMBER.1067 MEMBER))(init-relation '(NSI PRO B MEMBER.1067 MEMBER))(init-relation '(COC CON C MEMBER.1067 MEMBER))(init-relation '(CEI CON B MEMBER.1067 MEMBER))(init-relation '(DEMOCRATS CON C MEMBER.1067 MEMBER))(init-relation '(REPUBLICANS PRO C MEMBER.1067 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1067 MEMBER)))
) 
(setf (slot-value MEMBER.1067 'DISTRICT)  'PA-10) 
(setf (slot-value MEMBER.1067 'TERM-START)  "1962") 
(setf (slot-value MEMBER.1067 'PARTY)  'REP) 
(setf (slot-value MEMBER.1067 'COMMITTEES)  (list  'HOUSE-APPROPRIATIONS)
) 
(setf (slot-value MEMBER.1067 'STATUS)  "Active") 
(setf (slot-value MEMBER.1067 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1067 'SYMBOL)  'MEMBER.1067) )
(insert-item MEMBER MEMBER.1067)
(defvar MEMBER.1034)
(prog1 (setf MEMBER.1034 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1034 'NAME)  "Robert H. Michel") 
(setf (slot-value MEMBER.1034 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'AGN)
 (list  'SPACE-STATION 'FOR)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'AGN)
 (list  'REFLAGGING-SHIPS 'AGN)
 (list  'HANDGUN-CONTROL 'FOR)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'AGN)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS '--)
 (list  'LIMIT-IMPORTS 'AGN)
 (list  'CAP-TAX-CUT 'AGN)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'AGN)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY 'FOR)
 (list  'LIMIT-ABORTIONS 'FOR)
 (list  'APPROVE-ERA 'AGN)
 (list  'PASS-IMM-REFORM 'FOR)
 (list  'CANCEL-MX-MISSILE 'AGN)
 (list  'HALT-AID-TO-CONTRAS 'AGN)
 (list  'INCR-AID-TO-EL-SAL 'FOR)
 (list  'SUPP-NUCLEAR-FREEZE 'AGN)
 (list  'CAP-GAINS-CUT 'AGN)
 (list  'LMT-CLN-WATER-ACT 'FOR)
 (list  'RPL-TOBAC-SUB 'FOR)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'AGN)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'FOR)
 (list  'LMT-TEXT-IMP 'AGN)
 (list  'LIMIT-SDI 'AGN)
 (list  'AID-ANGOLA-REB 'FOR)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'AGN)
 (list  'IMMIG-REFORM 'FOR)
 (list  'CHILD-CARE 'AGN)
 (list  'FLAG-BURNING 'FOR)
)
) 
(setf (slot-value MEMBER.1034 'GROUPS)  (list  'REPUBLICANS)
) 
(setf (slot-value MEMBER.1034 'RELATIONS)  (list (init-relation '(ADA CON A MEMBER.1034 MEMBER))(init-relation '(ACLU CON A MEMBER.1034 MEMBER))(init-relation '(COPE CON B MEMBER.1034 MEMBER))(init-relation '(CFA CON B MEMBER.1034 MEMBER))(init-relation '(LCV CON A MEMBER.1034 MEMBER))(init-relation '(ACU PRO B MEMBER.1034 MEMBER))(init-relation '(NTU PRO C MEMBER.1034 MEMBER))(init-relation '(NSI PRO A MEMBER.1034 MEMBER))(init-relation '(COC PRO B MEMBER.1034 MEMBER))(init-relation '(CEI PRO B MEMBER.1034 MEMBER))(init-relation '(DEMOCRATS CON B MEMBER.1034 MEMBER))(init-relation '(REPUBLICANS PRO B MEMBER.1034 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1034 MEMBER)))
) 
(setf (slot-value MEMBER.1034 'DISTRICT)  'IL-18) 
(setf (slot-value MEMBER.1034 'TERM-START)  "1956") 
(setf (slot-value MEMBER.1034 'PARTY)  'REP) 
(setf (slot-value MEMBER.1034 'COMMITTEES)  (list  'HOUSE-MINORITY-LEADER)
) 
(setf (slot-value MEMBER.1034 'STATUS)  "Active") 
(setf (slot-value MEMBER.1034 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1034 'SYMBOL)  'MEMBER.1034) )
(insert-item MEMBER MEMBER.1034)
(defvar MEMBER.1060)
(prog1 (setf MEMBER.1060 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1060 'NAME)  "Clarence E. Miller") 
(setf (slot-value MEMBER.1060 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'AGN)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'AGN)
 (list  'REFLAGGING-SHIPS 'AGN)
 (list  'HANDGUN-CONTROL 'FOR)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'AGN)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'FOR)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-TAX-CUT 'AGN)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'AGN)
 (list  'BAR-IMM-AMNESTY 'FOR)
 (list  'OK-SCHOOL-PRAY 'FOR)
 (list  'LIMIT-ABORTIONS 'FOR)
 (list  'APPROVE-ERA 'AGN)
 (list  'PASS-IMM-REFORM 'FOR)
 (list  'CANCEL-MX-MISSILE 'AGN)
 (list  'HALT-AID-TO-CONTRAS 'AGN)
 (list  'INCR-AID-TO-EL-SAL 'FOR)
 (list  'SUPP-NUCLEAR-FREEZE 'AGN)
 (list  'CAP-GAINS-CUT 'AGN)
 (list  'LMT-CLN-WATER-ACT 'FOR)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'AGN)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'FOR)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'AGN)
 (list  'AID-ANGOLA-REB 'FOR)
 (list  'TAX-REFORM 'AGN)
 (list  'S-AFRICA-SANC 'AGN)
 (list  'IMMIG-REFORM 'AGN)
 (list  'CHILD-CARE 'AGN)
 (list  'FLAG-BURNING 'FOR)
 (list  'BRADY-BILL 'AGN)
)
) 
(setf (slot-value MEMBER.1060 'RELATIONS)  (list (init-relation '(ADA CON A MEMBER.1060 MEMBER))(init-relation '(COPE CON B MEMBER.1060 MEMBER))(init-relation '(CFA CON A MEMBER.1060 MEMBER))(init-relation '(LCV CON B MEMBER.1060 MEMBER))(init-relation '(ACU PRO B MEMBER.1060 MEMBER))(init-relation '(NSI PRO A MEMBER.1060 MEMBER))(init-relation '(COC PRO B MEMBER.1060 MEMBER))(init-relation '(CEI PRO C MEMBER.1060 MEMBER))(init-relation '(DEMOCRATS CON C MEMBER.1060 MEMBER))(init-relation '(REPUBLICANS PRO C MEMBER.1060 MEMBER)))
) 
(setf (slot-value MEMBER.1060 'DISTRICT)  'OH-10) 
(setf (slot-value MEMBER.1060 'TERM-START)  "1966") 
(setf (slot-value MEMBER.1060 'PARTY)  'REP) 
(setf (slot-value MEMBER.1060 'COMMITTEES)  (list  'HOUSE-APPROPRIATIONS)
) 
(setf (slot-value MEMBER.1060 'STATUS)  "Active") 
(setf (slot-value MEMBER.1060 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1060 'SYMBOL)  'MEMBER.1060) )
(insert-item MEMBER MEMBER.1060)
(defvar MEMBER.872)
(prog1 (setf MEMBER.872 (make-instance 'MEMBER))
(setf (slot-value MEMBER.872 'NAME)  "Bruce A. Morrison") 
(setf (slot-value MEMBER.872 'VOTES)  (list  (list  'LMT-CLN-WATER-ACT 'FOR)
 (list  'RPL-TOBAC-SUB 'FOR)
 (list  'GRM-RDMN-DEF-RED 'AGN)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'FOR)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI '--)
 (list  'AID-ANGOLA-REB 'AGN)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'PLANT-CLOSING 'FOR)
 (list  'CAP-TAX-CUT 'AGN)
 (list  'EXTEND-SS-BENEFIT 'FOR)
 (list  'ESTAB-DOM-CONTENT 'FOR)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY 'AGN)
 (list  'LIMIT-ABORTIONS 'AGN)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'AGN)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'DEFENSE-AUTHORIZATION 'FOR)
 (list  'SPACE-STATION 'FOR)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'AGN)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'FOR)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-GAINS-CUT 'FOR)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'AGN)
)
) 
(setf (slot-value MEMBER.872 'ISSUES)  (list  'HOUSING 'ENVIRONMENT 'SOCIAL-SECURITY 'HEALTH-CARE 'BUDGET-DEFICIT)
) 
(setf (slot-value MEMBER.872 'CREDO)  (list (init-stance '(DEATH-PENALTY CON A MEMBER.872 MEMBER))
(init-stance '(HOUSING PRO B MEMBER.872 MEMBER))
(init-stance '(ENVIRONMENT PRO B MEMBER.872 MEMBER))
(init-stance '(SOCIAL-SECURITY PRO B MEMBER.872 MEMBER))
(init-stance '(HEALTH-CARE PRO B MEMBER.872 MEMBER))
(init-stance '(BUDGET-DEFICIT CON B MEMBER.872 MEMBER))
(init-stance '(DRUGS PRO B MEMBER.872 MEMBER))
(init-stance '(GAY-RIGHTS PRO B MEMBER.872 MEMBER))
)
) 
(setf (slot-value MEMBER.872 'GROUPS)  (list  'LEGAL-SERVICES 'ACLU 'LABOR 'ADA)
) 
(setf (slot-value MEMBER.872 'RELATIONS)  (list (init-relation '(LEGAL-SERVICES PRO A MEMBER.872 MEMBER))(init-relation '(ACLU PRO B MEMBER.872 MEMBER))(init-relation '(LABOR PRO B MEMBER.872 MEMBER))(init-relation '(ADA PRO C MEMBER.872 MEMBER))(init-relation '(NRA CON C MEMBER.872 MEMBER))(init-relation '(DEMOCRATS PRO C MEMBER.872 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.872 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.872 MEMBER)))
) 
(setf (slot-value MEMBER.872 'STANCE-SORT-KEY)  'EQUITY) 
(setf (slot-value MEMBER.872 'DISTRICT)  'CT-3) 
(setf (slot-value MEMBER.872 'TERM-START)  "1982") 
(setf (slot-value MEMBER.872 'TERM-END)  "1990") 
(setf (slot-value MEMBER.872 'PARTY)  'DEM) 
(setf (slot-value MEMBER.872 'COMMITTEES)  (list  'HOUSE-BANKING 'HOUSE-JUDICIARY)
) 
(setf (slot-value MEMBER.872 'STATUS)  "Active") 
(setf (slot-value MEMBER.872 'DATE-OPEN) (list->date '(9 21 1988))) 
(setf (slot-value MEMBER.872 'SYMBOL)  'MEMBER.872) )
(insert-item MEMBER MEMBER.872)
(defvar MEMBER.1039)
(prog1 (setf MEMBER.1039 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1039 'NAME)  "William Huston Natcher") 
(setf (slot-value MEMBER.1039 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'FOR)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'AGN)
 (list  'HANDGUN-CONTROL 'FOR)
 (list  'CONTRA-AID2 'FOR)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'FOR)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-TAX-CUT 'AGN)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'FOR)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY 'FOR)
 (list  'LIMIT-ABORTIONS 'FOR)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'FOR)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'CAP-GAINS-CUT 'AGN)
 (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'FOR)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'FOR)
 (list  'BRADY-BILL 'AGN)
)
) 
(setf (slot-value MEMBER.1039 'RELATIONS)  (list (init-relation '(ADA PRO C MEMBER.1039 MEMBER))(init-relation '(COPE PRO B MEMBER.1039 MEMBER))(init-relation '(CFA PRO B MEMBER.1039 MEMBER))(init-relation '(LCV CON C MEMBER.1039 MEMBER))(init-relation '(ACU CON B MEMBER.1039 MEMBER))(init-relation '(NTU CON B MEMBER.1039 MEMBER))(init-relation '(NSI CON B MEMBER.1039 MEMBER))(init-relation '(COC CON B MEMBER.1039 MEMBER))(init-relation '(CEI CON A MEMBER.1039 MEMBER))(init-relation '(DEMOCRATS PRO C MEMBER.1039 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.1039 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1039 MEMBER)))
) 
(setf (slot-value MEMBER.1039 'DISTRICT)  'KY-2) 
(setf (slot-value MEMBER.1039 'TERM-START)  "1953") 
(setf (slot-value MEMBER.1039 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1039 'COMMITTEES)  (list  'HOUSE-APPROPRIATIONS)
) 
(setf (slot-value MEMBER.1039 'STATUS)  "Active") 
(setf (slot-value MEMBER.1039 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1039 'SYMBOL)  'MEMBER.1039) )
(insert-item MEMBER MEMBER.1039)
(defvar MEMBER.1079)
(prog1 (setf MEMBER.1079 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1079 'NAME)  "Stan Parris") 
(setf (slot-value MEMBER.1079 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'AGN)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'AGN)
 (list  'REFLAGGING-SHIPS 'AGN)
 (list  'HANDGUN-CONTROL 'FOR)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'AGN)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'FOR)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-TAX-CUT 'AGN)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'AGN)
 (list  'BAR-IMM-AMNESTY 'FOR)
 (list  'OK-SCHOOL-PRAY 'FOR)
 (list  'LIMIT-ABORTIONS '--)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'AGN)
 (list  'CANCEL-MX-MISSILE 'AGN)
 (list  'HALT-AID-TO-CONTRAS 'AGN)
 (list  'INCR-AID-TO-EL-SAL 'FOR)
 (list  'SUPP-NUCLEAR-FREEZE 'AGN)
 (list  'CAP-GAINS-CUT 'AGN)
 (list  'LMT-CLN-WATER-ACT 'FOR)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'AGN)
 (list  'BAN-POLYGRAPH 'AGN)
 (list  'RETAIN-GUN-CONTROL 'FOR)
 (list  'CONTRA-AID 'FOR)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'AGN)
 (list  'AID-ANGOLA-REB 'FOR)
 (list  'TAX-REFORM 'AGN)
 (list  'S-AFRICA-SANC 'AGN)
 (list  'IMMIG-REFORM 'AGN)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'FOR)
)
) 
(setf (slot-value MEMBER.1079 'RELATIONS)  (list (init-relation '(ADA CON B MEMBER.1079 MEMBER))(init-relation '(ACLU CON A MEMBER.1079 MEMBER))(init-relation '(COPE CON B MEMBER.1079 MEMBER))(init-relation '(CFA CON B MEMBER.1079 MEMBER))(init-relation '(LCV CON B MEMBER.1079 MEMBER))(init-relation '(ACU PRO B MEMBER.1079 MEMBER))(init-relation '(NTU CON C MEMBER.1079 MEMBER))(init-relation '(NSI PRO A MEMBER.1079 MEMBER))(init-relation '(COC PRO B MEMBER.1079 MEMBER))(init-relation '(CEI PRO C MEMBER.1079 MEMBER))(init-relation '(DEMOCRATS CON C MEMBER.1079 MEMBER))(init-relation '(REPUBLICANS PRO C MEMBER.1079 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1079 MEMBER)))
) 
(setf (slot-value MEMBER.1079 'DISTRICT)  'VA-8) 
(setf (slot-value MEMBER.1079 'TERM-START)  "1980") 
(setf (slot-value MEMBER.1079 'TERM-END)  "1990") 
(setf (slot-value MEMBER.1079 'PARTY)  'REP) 
(setf (slot-value MEMBER.1079 'COMMITTEES)  (list  'HOUSE-BANKING 'HOUSE-DC)
) 
(setf (slot-value MEMBER.1079 'STATUS)  "Active") 
(setf (slot-value MEMBER.1079 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1079 'SYMBOL)  'MEMBER.1079) )
(insert-item MEMBER MEMBER.1079)
(defvar MEMBER.1065)
(prog1 (setf MEMBER.1065 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1065 'NAME)  "Claude Denson Pepper") 
(setf (slot-value MEMBER.1065 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'FOR)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'AGN)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'FOR)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'FOR)
 (list  'AIDS '--)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-TAX-CUT 'FOR)
 (list  'EXTEND-SS-BENEFIT 'FOR)
 (list  'ESTAB-DOM-CONTENT 'FOR)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY 'AGN)
 (list  'LIMIT-ABORTIONS 'AGN)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'FOR)
 (list  'CANCEL-MX-MISSILE 'AGN)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'AGN)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'FOR)
 (list  'CONTRA-AID 'FOR)
 (list  'LMT-TEXT-IMP '--)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'FOR)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'CHILD-CARE '--)
)
) 
(setf (slot-value MEMBER.1065 'ISSUES)  (list  'AGING)
) 
(setf (slot-value MEMBER.1065 'GROUPS)  (list  'ELDERLY)
) 
(setf (slot-value MEMBER.1065 'RELATIONS)  (list (init-relation '(ADA PRO B MEMBER.1065 MEMBER))(init-relation '(ACLU PRO B MEMBER.1065 MEMBER))(init-relation '(COPE PRO A MEMBER.1065 MEMBER))(init-relation '(CFA PRO B MEMBER.1065 MEMBER))(init-relation '(LCV PRO C MEMBER.1065 MEMBER))(init-relation '(ACU CON B MEMBER.1065 MEMBER))(init-relation '(NTU CON B MEMBER.1065 MEMBER))(init-relation '(NSI PRO B MEMBER.1065 MEMBER))(init-relation '(COC CON B MEMBER.1065 MEMBER))(init-relation '(CEI CON A MEMBER.1065 MEMBER))(init-relation '(ELDERLY PRO A MEMBER.1065 MEMBER))(init-relation '(DEMOCRATS PRO C MEMBER.1065 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.1065 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1065 MEMBER)))
) 
(setf (slot-value MEMBER.1065 'DISTRICT)  'FL-18) 
(setf (slot-value MEMBER.1065 'TERM-START)  "1962") 
(setf (slot-value MEMBER.1065 'TERM-END)  "1989") 
(setf (slot-value MEMBER.1065 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1065 'COMMITTEES)  (list  'HOUSE-RULES 'HOUSE-AGING)
) 
(setf (slot-value MEMBER.1065 'STATUS)  "Active") 
(setf (slot-value MEMBER.1065 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1065 'SYMBOL)  'MEMBER.1065) )
(insert-item MEMBER MEMBER.1065)
(defvar MEMBER.1075)
(prog1 (setf MEMBER.1075 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1075 'NAME)  "James Henry Quillen") 
(setf (slot-value MEMBER.1075 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'AGN)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'AGN)
 (list  'REFLAGGING-SHIPS 'AGN)
 (list  'HANDGUN-CONTROL 'FOR)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'AGN)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS '--)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-TAX-CUT 'AGN)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'AGN)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY 'FOR)
 (list  'LIMIT-ABORTIONS 'FOR)
 (list  'APPROVE-ERA 'AGN)
 (list  'PASS-IMM-REFORM 'FOR)
 (list  'CANCEL-MX-MISSILE 'AGN)
 (list  'HALT-AID-TO-CONTRAS 'AGN)
 (list  'INCR-AID-TO-EL-SAL 'FOR)
 (list  'SUPP-NUCLEAR-FREEZE 'AGN)
 (list  'CAP-GAINS-CUT 'AGN)
 (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'FOR)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'AGN)
 (list  'AID-ANGOLA-REB 'FOR)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'AGN)
 (list  'IMMIG-REFORM 'FOR)
 (list  'CHILD-CARE 'AGN)
 (list  'FLAG-BURNING 'FOR)
 (list  'BRADY-BILL 'AGN)
)
) 
(setf (slot-value MEMBER.1075 'RELATIONS)  (list (init-relation '(ADA CON B MEMBER.1075 MEMBER))(init-relation '(ACLU CON A MEMBER.1075 MEMBER))(init-relation '(COPE CON B MEMBER.1075 MEMBER))(init-relation '(CFA CON C MEMBER.1075 MEMBER))(init-relation '(LCV CON A MEMBER.1075 MEMBER))(init-relation '(ACU PRO B MEMBER.1075 MEMBER))(init-relation '(NTU CON B MEMBER.1075 MEMBER))(init-relation '(NSI PRO A MEMBER.1075 MEMBER))(init-relation '(COC PRO C MEMBER.1075 MEMBER))(init-relation '(CEI CON C MEMBER.1075 MEMBER))(init-relation '(DEMOCRATS CON C MEMBER.1075 MEMBER))(init-relation '(REPUBLICANS PRO C MEMBER.1075 MEMBER)))
) 
(setf (slot-value MEMBER.1075 'DISTRICT)  'TN-1) 
(setf (slot-value MEMBER.1075 'TERM-START)  "1962") 
(setf (slot-value MEMBER.1075 'PARTY)  'REP) 
(setf (slot-value MEMBER.1075 'COMMITTEES)  (list  'HOUSE-RULES)
) 
(setf (slot-value MEMBER.1075 'STATUS)  "Active") 
(setf (slot-value MEMBER.1075 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1075 'SYMBOL)  'MEMBER.1075) )
(insert-item MEMBER MEMBER.1075)
(defvar MEMBER.1081)
(prog1 (setf MEMBER.1081 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1081 'NAME)  "Nick Joe Rahall") 
(setf (slot-value MEMBER.1081 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'FOR)
 (list  'SPACE-STATION 'FOR)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'FOR)
 (list  'HANDGUN-CONTROL 'FOR)
 (list  'CONTRA-AID2 'FOR)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'FOR)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-TAX-CUT 'FOR)
 (list  'EXTEND-SS-BENEFIT 'FOR)
 (list  'ESTAB-DOM-CONTENT 'FOR)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY '--)
 (list  'LIMIT-ABORTIONS 'FOR)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'FOR)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'CAP-GAINS-CUT 'FOR)
 (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'AGN)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'AGN)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'FOR)
 (list  'BRADY-BILL 'AGN)
)
) 
(setf (slot-value MEMBER.1081 'RELATIONS)  (list (init-relation '(ADA PRO B MEMBER.1081 MEMBER))(init-relation '(COPE PRO B MEMBER.1081 MEMBER))(init-relation '(CFA PRO B MEMBER.1081 MEMBER))(init-relation '(LCV PRO C MEMBER.1081 MEMBER))(init-relation '(ACU CON A MEMBER.1081 MEMBER))(init-relation '(NTU CON B MEMBER.1081 MEMBER))(init-relation '(NSI CON A MEMBER.1081 MEMBER))(init-relation '(COC CON B MEMBER.1081 MEMBER))(init-relation '(CEI CON A MEMBER.1081 MEMBER))(init-relation '(DEMOCRATS PRO C MEMBER.1081 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.1081 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1081 MEMBER)))
) 
(setf (slot-value MEMBER.1081 'DISTRICT)  'WV-4) 
(setf (slot-value MEMBER.1081 'TERM-START)  "1976") 
(setf (slot-value MEMBER.1081 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1081 'COMMITTEES)  (list  'HOUSE-INTERIOR 'HOUSE-PUBLIC-WORKS)
) 
(setf (slot-value MEMBER.1081 'STATUS)  "Active") 
(setf (slot-value MEMBER.1081 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1081 'SYMBOL)  'MEMBER.1081) )
(insert-item MEMBER MEMBER.1081)
(defvar MEMBER.1053)
(prog1 (setf MEMBER.1053 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1053 'NAME)  "Robert A. Roe") 
(setf (slot-value MEMBER.1053 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'FOR)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'FOR)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'FOR)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'FOR)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-TAX-CUT 'FOR)
 (list  'EXTEND-SS-BENEFIT 'FOR)
 (list  'ESTAB-DOM-CONTENT 'FOR)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY 'AGN)
 (list  'LIMIT-ABORTIONS 'FOR)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'FOR)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'CAP-GAINS-CUT 'AGN)
 (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'AGN)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'FOR)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB '--)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'FOR)
 (list  'BRADY-BILL 'FOR)
)
) 
(setf (slot-value MEMBER.1053 'RELATIONS)  (list (init-relation '(ADA PRO B MEMBER.1053 MEMBER))(init-relation '(ACLU PRO C MEMBER.1053 MEMBER))(init-relation '(COPE PRO A MEMBER.1053 MEMBER))(init-relation '(CFA PRO B MEMBER.1053 MEMBER))(init-relation '(LCV PRO C MEMBER.1053 MEMBER))(init-relation '(ACU CON A MEMBER.1053 MEMBER))(init-relation '(NTU CON B MEMBER.1053 MEMBER))(init-relation '(NSI CON A MEMBER.1053 MEMBER))(init-relation '(COC CON B MEMBER.1053 MEMBER))(init-relation '(CEI CON B MEMBER.1053 MEMBER))(init-relation '(DEMOCRATS PRO C MEMBER.1053 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.1053 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1053 MEMBER)))
) 
(setf (slot-value MEMBER.1053 'DISTRICT)  'NJ-8) 
(setf (slot-value MEMBER.1053 'TERM-START)  "1969") 
(setf (slot-value MEMBER.1053 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1053 'COMMITTEES)  (list  'HOUSE-PUBLIC-WORKS)
) 
(setf (slot-value MEMBER.1053 'STATUS)  "Active") 
(setf (slot-value MEMBER.1053 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1053 'SYMBOL)  'MEMBER.1053) )
(insert-item MEMBER MEMBER.1053)
(defvar MEMBER.1035)
(prog1 (setf MEMBER.1035 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1035 'NAME)  "Dan Rostenkowski") 
(setf (slot-value MEMBER.1035 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'AGN)
 (list  'SPACE-STATION 'FOR)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS '--)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'AGN)
 (list  'CAP-TAX-CUT 'FOR)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'AGN)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY '--)
 (list  'LIMIT-ABORTIONS 'FOR)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'FOR)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL '--)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'CAP-GAINS-CUT 'FOR)
 (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'FOR)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'AGN)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'AGN)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC '--)
 (list  'IMMIG-REFORM 'FOR)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'AGN)
 (list  'BRADY-BILL 'FOR)
)
) 
(setf (slot-value MEMBER.1035 'ISSUES)  (list  'TAXES)
) 
(setf (slot-value MEMBER.1035 'RELATIONS)  (list (init-relation '(ADA PRO B MEMBER.1035 MEMBER))(init-relation '(ACLU PRO C MEMBER.1035 MEMBER))(init-relation '(COPE PRO B MEMBER.1035 MEMBER))(init-relation '(LCV PRO A MEMBER.1035 MEMBER))(init-relation '(ACU CON B MEMBER.1035 MEMBER))(init-relation '(NTU CON B MEMBER.1035 MEMBER))(init-relation '(NSI CON A MEMBER.1035 MEMBER))(init-relation '(COC CON B MEMBER.1035 MEMBER))(init-relation '(CEI CON B MEMBER.1035 MEMBER))(init-relation '(DEMOCRATS PRO B MEMBER.1035 MEMBER))(init-relation '(REPUBLICANS CON B MEMBER.1035 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1035 MEMBER)))
) 
(setf (slot-value MEMBER.1035 'DISTRICT)  'IL-8) 
(setf (slot-value MEMBER.1035 'TERM-START)  "1958") 
(setf (slot-value MEMBER.1035 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1035 'COMMITTEES)  (list  'HOUSE-WAYS)
) 
(setf (slot-value MEMBER.1035 'STATUS)  "Active") 
(setf (slot-value MEMBER.1035 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1035 'SYMBOL)  'MEMBER.1035) )
(insert-item MEMBER MEMBER.1035)
(defvar MEMBER.821)
(prog1 (setf MEMBER.821 (make-instance 'MEMBER))
(setf (slot-value MEMBER.821 'NAME)  "John Grosvenor Rowland") 
(setf (slot-value MEMBER.821 'VOTES)  (list  (list  'LMT-CLN-WATER-ACT 'FOR)
 (list  'RPL-TOBAC-SUB 'FOR)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'AGN)
 (list  'LIMIT-SDI 'AGN)
 (list  'AID-ANGOLA-REB 'FOR)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'PLANT-CLOSING 'AGN)
 (list  'DEFENSE-AUTHORIZATION 'AGN)
 (list  'SPACE-STATION 'FOR)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'AGN)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'AGN)
 (list  'HOME-HEALTH-CARE 'FOR)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'AGN)
 (list  'CAP-GAINS-CUT 'AGN)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'FOR)
)
) 
(setf (slot-value MEMBER.821 'ISSUES)  (list  'VETERANS 'POWS 'MIAS 'VIETNAM-TRADE-RELATIONS 'BUDGET-FREEZE 'BUDGET-DEFICIT 'DRUGS 'DEATH-PENALTY)
) 
(setf (slot-value MEMBER.821 'CREDO)  (list (init-stance '(VETERANS PRO B MEMBER.821 MEMBER))
(init-stance '(POWS PRO B MEMBER.821 MEMBER))
(init-stance '(MIAS PRO B MEMBER.821 MEMBER))
(init-stance '(VIETNAM-TRADE-RELATIONS PRO B MEMBER.821 MEMBER))
(init-stance '(BUDGET-FREEZE PRO B MEMBER.821 MEMBER))
(init-stance '(BUDGET-DEFICIT CON B MEMBER.821 MEMBER))
(init-stance '(DRUGS PRO B MEMBER.821 MEMBER))
(init-stance '(DEATH-PENALTY PRO B MEMBER.821 MEMBER))
(init-stance '(ABORTION CON B MEMBER.821 MEMBER))
)
) 
(setf (slot-value MEMBER.821 'GROUPS)  (list  'NSI 'COC)
) 
(setf (slot-value MEMBER.821 'RELATIONS)  (list (init-relation '(ACLU CON C MEMBER.821 MEMBER))(init-relation '(COPE CON C MEMBER.821 MEMBER))(init-relation '(ACU PRO C MEMBER.821 MEMBER))(init-relation '(NSI PRO B MEMBER.821 MEMBER))(init-relation '(COC PRO B MEMBER.821 MEMBER))(init-relation '(REPUBLICANS PRO C MEMBER.821 MEMBER))(init-relation '(DEMOCRATS CON C MEMBER.821 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.821 MEMBER)))
) 
(setf (slot-value MEMBER.821 'DISTRICT)  'CT-5) 
(setf (slot-value MEMBER.821 'TERM-START)  "1984") 
(setf (slot-value MEMBER.821 'TERM-END)  "1990") 
(setf (slot-value MEMBER.821 'PARTY)  'REP) 
(setf (slot-value MEMBER.821 'COMMITTEES)  (list  'HOUSE-ARMED-SERVICES 'HOUSE-VETERANS-AFFAIRS 'HOUSE-INTELLIGENCE)
) 
(setf (slot-value MEMBER.821 'STATUS)  "Active") 
(setf (slot-value MEMBER.821 'DATE-OPEN) (list->date '(2 18 1989))) 
(setf (slot-value MEMBER.821 'SYMBOL)  'MEMBER.821) )
(insert-item MEMBER MEMBER.821)
(defvar MEMBER.1069)
(prog1 (setf MEMBER.1069 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1069 'NAME)  "Claudine Schneider") 
(setf (slot-value MEMBER.1069 'GENDER)  'FEMALE) 
(setf (slot-value MEMBER.1069 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'FOR)
 (list  'SPACE-STATION 'FOR)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'AGN)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'FOR)
 (list  'AIDS '--)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-TAX-CUT 'AGN)
 (list  'EXTEND-SS-BENEFIT 'FOR)
 (list  'ESTAB-DOM-CONTENT 'FOR)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY 'AGN)
 (list  'LIMIT-ABORTIONS 'AGN)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'FOR)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'CAP-GAINS-CUT 'AGN)
 (list  'LMT-CLN-WATER-ACT '--)
 (list  'RPL-TOBAC-SUB 'FOR)
 (list  'GRM-RDMN-DEF-RED '--)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'FOR)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'AGN)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC '--)
 (list  'IMMIG-REFORM 'FOR)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'AGN)
)
) 
(setf (slot-value MEMBER.1069 'RELATIONS)  (list (init-relation '(ADA PRO B MEMBER.1069 MEMBER))(init-relation '(ACLU PRO C MEMBER.1069 MEMBER))(init-relation '(COPE PRO C MEMBER.1069 MEMBER))(init-relation '(CFA PRO B MEMBER.1069 MEMBER))(init-relation '(ACU CON B MEMBER.1069 MEMBER))(init-relation '(NTU CON C MEMBER.1069 MEMBER))(init-relation '(NSI CON A MEMBER.1069 MEMBER))(init-relation '(COC CON C MEMBER.1069 MEMBER))(init-relation '(CEI CON C MEMBER.1069 MEMBER))(init-relation '(DEMOCRATS CON C MEMBER.1069 MEMBER))(init-relation '(REPUBLICANS PRO C MEMBER.1069 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1069 MEMBER)))
) 
(setf (slot-value MEMBER.1069 'DISTRICT)  'RI-2) 
(setf (slot-value MEMBER.1069 'TERM-START)  "1980") 
(setf (slot-value MEMBER.1069 'TERM-END)  "1990") 
(setf (slot-value MEMBER.1069 'PARTY)  'REP) 
(setf (slot-value MEMBER.1069 'COMMITTEES)  (list  'HOUSE-MERCHANT-MARINE 'HOUSE-SCIENCE 'HOUSE-AGING)
) 
(setf (slot-value MEMBER.1069 'STATUS)  "Active") 
(setf (slot-value MEMBER.1069 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1069 'SYMBOL)  'MEMBER.1069) )
(insert-item MEMBER MEMBER.1069)
(defvar MEMBER.1028)
(prog1 (setf MEMBER.1028 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1028 'NAME)  "Patricia Scott Schroeder") 
(setf (slot-value MEMBER.1028 'GENDER)  'FEMALE) 
(setf (slot-value MEMBER.1028 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'FOR)
 (list  'SPACE-STATION 'FOR)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'FOR)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'FOR)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-TAX-CUT 'FOR)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'FOR)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY 'AGN)
 (list  'LIMIT-ABORTIONS 'AGN)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'AGN)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'CAP-GAINS-CUT 'FOR)
 (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'FOR)
 (list  'GRM-RDMN-DEF-RED 'AGN)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'FOR)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'AGN)
 (list  'TAX-REFORM 'AGN)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'AGN)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'AGN)
 (list  'BRADY-BILL 'FOR)
)
) 
(setf (slot-value MEMBER.1028 'GROUPS)  (list  'BLACKS 'HISPANICS)
) 
(setf (slot-value MEMBER.1028 'RELATIONS)  (list (init-relation '(ADA PRO A MEMBER.1028 MEMBER))(init-relation '(ACLU PRO B MEMBER.1028 MEMBER))(init-relation '(COPE PRO C MEMBER.1028 MEMBER))(init-relation '(CFA PRO A MEMBER.1028 MEMBER))(init-relation '(LCV PRO A MEMBER.1028 MEMBER))(init-relation '(ACU CON A MEMBER.1028 MEMBER))(init-relation '(NTU CON C MEMBER.1028 MEMBER))(init-relation '(NSI CON A MEMBER.1028 MEMBER))(init-relation '(COC CON C MEMBER.1028 MEMBER))(init-relation '(CEI CON C MEMBER.1028 MEMBER))(init-relation '(DEMOCRATS PRO C MEMBER.1028 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.1028 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1028 MEMBER)))
) 
(setf (slot-value MEMBER.1028 'DISTRICT)  'CO-1) 
(setf (slot-value MEMBER.1028 'TERM-START)  "1972") 
(setf (slot-value MEMBER.1028 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1028 'COMMITTEES)  (list  'HOUSE-ARMED-SERVICES 'HOUSE-JUDICIARY)
) 
(setf (slot-value MEMBER.1028 'STATUS)  "Active") 
(setf (slot-value MEMBER.1028 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1028 'SYMBOL)  'MEMBER.1028) )
(insert-item MEMBER MEMBER.1028)
(defvar MEMBER.708)
(prog1 (setf MEMBER.708 (make-instance 'MEMBER))
(setf (slot-value MEMBER.708 'NAME)  "Christopher Shays") 
(setf (slot-value MEMBER.708 'VOTES)  (list  (list  'PLANT-CLOSING 'AGN)
 (list  'DEFENSE-AUTHORIZATION '--)
 (list  'SPACE-STATION 'FOR)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS '--)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE '--)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-GAINS-CUT 'AGN)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'AGN)
 (list  'BRADY-BILL 'FOR)
)
) 
(setf (slot-value MEMBER.708 'ISSUES)  (list  'BUDGET-DEFICIT 'TRANSPORTATION 'HOUSING 'DRUGS 'CLEAN-WATER 'EMPLOYMENT)
) 
(setf (slot-value MEMBER.708 'CREDO)  (list (init-stance '(BUDGET-DEFICIT CON B MEMBER.708 MEMBER))
(init-stance '(TRANSPORTATION PRO B MEMBER.708 MEMBER))
(init-stance '(HOUSING PRO B MEMBER.708 MEMBER))
(init-stance '(CLEAN-WATER PRO B MEMBER.708 MEMBER))
(init-stance '(EMPLOYMENT PRO B MEMBER.708 MEMBER))
(init-stance '(SPENDING CON B MEMBER.708 MEMBER))
)
) 
(setf (slot-value MEMBER.708 'RELATIONS)  (list (init-relation '(DEMOCRATS CON C MEMBER.708 MEMBER))(init-relation '(ADA PRO B MEMBER.708 MEMBER))(init-relation '(ACLU PRO C MEMBER.708 MEMBER))(init-relation '(COPE PRO C MEMBER.708 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.708 MEMBER)))
) 
(setf (slot-value MEMBER.708 'DISTRICT)  'CT-4) 
(setf (slot-value MEMBER.708 'TERM-START)  "1987") 
(setf (slot-value MEMBER.708 'PARTY)  'REP) 
(setf (slot-value MEMBER.708 'STATUS)  "Active") 
(setf (slot-value MEMBER.708 'DATE-OPEN) (list->date '(4 14 1989))) 
(setf (slot-value MEMBER.708 'SYMBOL)  'MEMBER.708) )
(insert-item MEMBER MEMBER.708)
(defvar MEMBER.1054)
(prog1 (setf MEMBER.1054 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1054 'NAME)  "Joseph Richard Skeen") 
(setf (slot-value MEMBER.1054 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'AGN)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'AGN)
 (list  'REFLAGGING-SHIPS 'AGN)
 (list  'HANDGUN-CONTROL 'FOR)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'AGN)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-TAX-CUT 'AGN)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'AGN)
 (list  'BAR-IMM-AMNESTY 'FOR)
 (list  'OK-SCHOOL-PRAY 'FOR)
 (list  'LIMIT-ABORTIONS 'FOR)
 (list  'APPROVE-ERA 'AGN)
 (list  'PASS-IMM-REFORM 'AGN)
 (list  'CANCEL-MX-MISSILE 'AGN)
 (list  'HALT-AID-TO-CONTRAS 'AGN)
 (list  'INCR-AID-TO-EL-SAL 'FOR)
 (list  'SUPP-NUCLEAR-FREEZE 'AGN)
 (list  'CAP-GAINS-CUT 'AGN)
 (list  'LMT-CLN-WATER-ACT 'FOR)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'AGN)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'FOR)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'AGN)
 (list  'AID-ANGOLA-REB 'FOR)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'AGN)
 (list  'IMMIG-REFORM 'AGN)
 (list  'CHILD-CARE 'AGN)
 (list  'FLAG-BURNING 'FOR)
 (list  'BRADY-BILL 'AGN)
)
) 
(setf (slot-value MEMBER.1054 'RELATIONS)  (list (init-relation '(ADA CON A MEMBER.1054 MEMBER))(init-relation '(ACLU CON A MEMBER.1054 MEMBER))(init-relation '(COPE CON A MEMBER.1054 MEMBER))(init-relation '(CFA CON A MEMBER.1054 MEMBER))(init-relation '(LCV CON A MEMBER.1054 MEMBER))(init-relation '(ACU PRO B MEMBER.1054 MEMBER))(init-relation '(NTU CON C MEMBER.1054 MEMBER))(init-relation '(NSI PRO A MEMBER.1054 MEMBER))(init-relation '(COC PRO B MEMBER.1054 MEMBER))(init-relation '(CEI PRO C MEMBER.1054 MEMBER))(init-relation '(DEMOCRATS CON C MEMBER.1054 MEMBER))(init-relation '(REPUBLICANS PRO C MEMBER.1054 MEMBER)))
) 
(setf (slot-value MEMBER.1054 'DISTRICT)  'NM-2) 
(setf (slot-value MEMBER.1054 'TERM-START)  "1980") 
(setf (slot-value MEMBER.1054 'PARTY)  'REP) 
(setf (slot-value MEMBER.1054 'COMMITTEES)  (list  'HOUSE-APPROPRIATIONS)
) 
(setf (slot-value MEMBER.1054 'STATUS)  "Active") 
(setf (slot-value MEMBER.1054 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1054 'SYMBOL)  'MEMBER.1054) )
(insert-item MEMBER MEMBER.1054)
(defvar MEMBER.1037)
(prog1 (setf MEMBER.1037 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1037 'NAME)  "Neal Edward Smith") 
(setf (slot-value MEMBER.1037 'ENGLISH-SHORT)  "Neal Smith") 
(setf (slot-value MEMBER.1037 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'AGN)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS '--)
 (list  'HANDGUN-CONTROL 'FOR)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'AGN)
 (list  'CAP-TAX-CUT 'AGN)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'AGN)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY 'AGN)
 (list  'LIMIT-ABORTIONS 'AGN)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'FOR)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'CAP-GAINS-CUT 'AGN)
 (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'AGN)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'AGN)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'AGN)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'AGN)
 (list  'BRADY-BILL 'AGN)
)
) 
(setf (slot-value MEMBER.1037 'RELATIONS)  (list (init-relation '(ADA PRO C MEMBER.1037 MEMBER))(init-relation '(ACLU PRO C MEMBER.1037 MEMBER))(init-relation '(COPE PRO B MEMBER.1037 MEMBER))(init-relation '(LCV PRO C MEMBER.1037 MEMBER))(init-relation '(ACU CON B MEMBER.1037 MEMBER))(init-relation '(NTU CON B MEMBER.1037 MEMBER))(init-relation '(NSI CON A MEMBER.1037 MEMBER))(init-relation '(COC CON B MEMBER.1037 MEMBER))(init-relation '(CEI CON B MEMBER.1037 MEMBER))(init-relation '(DEMOCRATS PRO C MEMBER.1037 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.1037 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1037 MEMBER)))
) 
(setf (slot-value MEMBER.1037 'DISTRICT)  'IA-4) 
(setf (slot-value MEMBER.1037 'TERM-START)  "1958") 
(setf (slot-value MEMBER.1037 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1037 'COMMITTEES)  (list  'HOUSE-APPROPRIATIONS)
) 
(setf (slot-value MEMBER.1037 'STATUS)  "Active") 
(setf (slot-value MEMBER.1037 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1037 'SYMBOL)  'MEMBER.1037) )
(insert-item MEMBER MEMBER.1037)
(defvar MEMBER.1078)
(prog1 (setf MEMBER.1078 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1078 'NAME)  "Peter Smith") 
(setf (slot-value MEMBER.1078 'VOTES)  (list  (list  'CAP-GAINS-CUT 'AGN)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'AGN)
)
) 
(setf (slot-value MEMBER.1078 'RELATIONS)  (list (init-relation '(DEMOCRATS CON C MEMBER.1078 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1078 MEMBER)))
) 
(setf (slot-value MEMBER.1078 'DISTRICT)  'VT-AL) 
(setf (slot-value MEMBER.1078 'TERM-START)  "1988") 
(setf (slot-value MEMBER.1078 'TERM-END)  "1990") 
(setf (slot-value MEMBER.1078 'PARTY)  'REP) 
(setf (slot-value MEMBER.1078 'COMMITTEES)  (list  'HOUSE-EDUCATION 'HOUSE-GOVERNMENT-OPERATIONS)
) 
(setf (slot-value MEMBER.1078 'STATUS)  "Active") 
(setf (slot-value MEMBER.1078 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1078 'SYMBOL)  'MEMBER.1078) )
(insert-item MEMBER MEMBER.1078)
(defvar MEMBER.1051)
(prog1 (setf MEMBER.1051 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1051 'NAME)  "Robert Clinton Smith") 
(setf (slot-value MEMBER.1051 'ENGLISH-SHORT)  "Bob Smith") 
(setf (slot-value MEMBER.1051 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'AGN)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'AGN)
 (list  'REFLAGGING-SHIPS 'AGN)
 (list  'HANDGUN-CONTROL 'FOR)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'AGN)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'FOR)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-GAINS-CUT 'AGN)
 (list  'LMT-CLN-WATER-ACT 'FOR)
 (list  'RPL-TOBAC-SUB 'FOR)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'AGN)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'FOR)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'AGN)
 (list  'AID-ANGOLA-REB 'FOR)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'AGN)
 (list  'IMMIG-REFORM 'AGN)
 (list  'CHILD-CARE 'AGN)
 (list  'FLAG-BURNING 'FOR)
)
) 
(setf (slot-value MEMBER.1051 'RELATIONS)  (list (init-relation '(ADA CON A MEMBER.1051 MEMBER))(init-relation '(ACLU CON A MEMBER.1051 MEMBER))(init-relation '(COPE CON B MEMBER.1051 MEMBER))(init-relation '(CFA CON C MEMBER.1051 MEMBER))(init-relation '(LCV PRO C MEMBER.1051 MEMBER))(init-relation '(ACU PRO A MEMBER.1051 MEMBER))(init-relation '(NTU PRO C MEMBER.1051 MEMBER))(init-relation '(NSI PRO A MEMBER.1051 MEMBER))(init-relation '(COC PRO A MEMBER.1051 MEMBER))(init-relation '(CEI PRO B MEMBER.1051 MEMBER))(init-relation '(DEMOCRATS CON C MEMBER.1051 MEMBER))(init-relation '(REPUBLICANS PRO C MEMBER.1051 MEMBER)))
) 
(setf (slot-value MEMBER.1051 'DISTRICT)  'NH-1) 
(setf (slot-value MEMBER.1051 'TERM-START)  "1984") 
(setf (slot-value MEMBER.1051 'TERM-END)  "1990") 
(setf (slot-value MEMBER.1051 'PARTY)  'REP) 
(setf (slot-value MEMBER.1051 'COMMITTEES)  (list  'HOUSE-VETERANS-AFFAIRS)
) 
(setf (slot-value MEMBER.1051 'STATUS)  "Active") 
(setf (slot-value MEMBER.1051 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1051 'SYMBOL)  'MEMBER.1051) )
(insert-item MEMBER MEMBER.1051)
(defvar MEMBER.1049)
(prog1 (setf MEMBER.1049 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1049 'NAME)  "Virginia Dodd Smith") 
(setf (slot-value MEMBER.1049 'ENGLISH-SHORT)  "Ginnie Smith") 
(setf (slot-value MEMBER.1049 'GENDER)  'FEMALE) 
(setf (slot-value MEMBER.1049 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'AGN)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'AGN)
 (list  'REFLAGGING-SHIPS 'AGN)
 (list  'HANDGUN-CONTROL 'FOR)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'AGN)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'FOR)
 (list  'LIMIT-IMPORTS 'AGN)
 (list  'CAP-TAX-CUT 'AGN)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'AGN)
 (list  'BAR-IMM-AMNESTY 'FOR)
 (list  'OK-SCHOOL-PRAY 'FOR)
 (list  'LIMIT-ABORTIONS 'FOR)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'FOR)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'AGN)
 (list  'INCR-AID-TO-EL-SAL 'FOR)
 (list  'SUPP-NUCLEAR-FREEZE 'AGN)
 (list  'CAP-GAINS-CUT 'AGN)
 (list  'LMT-CLN-WATER-ACT 'FOR)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'AGN)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'FOR)
 (list  'LMT-TEXT-IMP 'AGN)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'FOR)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'CHILD-CARE 'AGN)
 (list  'FLAG-BURNING 'FOR)
)
) 
(setf (slot-value MEMBER.1049 'RELATIONS)  (list (init-relation '(ADA CON A MEMBER.1049 MEMBER))(init-relation '(ACLU CON B MEMBER.1049 MEMBER))(init-relation '(COPE CON A MEMBER.1049 MEMBER))(init-relation '(CFA CON C MEMBER.1049 MEMBER))(init-relation '(LCV CON B MEMBER.1049 MEMBER))(init-relation '(ACU PRO C MEMBER.1049 MEMBER))(init-relation '(NTU PRO C MEMBER.1049 MEMBER))(init-relation '(NSI PRO B MEMBER.1049 MEMBER))(init-relation '(COC PRO B MEMBER.1049 MEMBER))(init-relation '(CEI PRO C MEMBER.1049 MEMBER))(init-relation '(DEMOCRATS CON C MEMBER.1049 MEMBER))(init-relation '(REPUBLICANS PRO C MEMBER.1049 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1049 MEMBER)))
) 
(setf (slot-value MEMBER.1049 'DISTRICT)  'NE-3) 
(setf (slot-value MEMBER.1049 'TERM-START)  "1974") 
(setf (slot-value MEMBER.1049 'TERM-END)  "1990") 
(setf (slot-value MEMBER.1049 'PARTY)  'REP) 
(setf (slot-value MEMBER.1049 'COMMITTEES)  (list  'HOUSE-APPROPRIATIONS)
) 
(setf (slot-value MEMBER.1049 'STATUS)  "Active") 
(setf (slot-value MEMBER.1049 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1049 'SYMBOL)  'MEMBER.1049) )
(insert-item MEMBER MEMBER.1049)
(defvar MEMBER.1041)
(prog1 (setf MEMBER.1041 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1041 'NAME)  "Olympia J. Snowe") 
(setf (slot-value MEMBER.1041 'GENDER)  'FEMALE) 
(setf (slot-value MEMBER.1041 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'FOR)
 (list  'SPACE-STATION 'FOR)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'AGN)
 (list  'HANDGUN-CONTROL 'FOR)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-TAX-CUT 'AGN)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'AGN)
 (list  'BAR-IMM-AMNESTY 'FOR)
 (list  'OK-SCHOOL-PRAY 'FOR)
 (list  'LIMIT-ABORTIONS 'AGN)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'FOR)
 (list  'CANCEL-MX-MISSILE 'AGN)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'FOR)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'CAP-GAINS-CUT 'AGN)
 (list  'LMT-CLN-WATER-ACT 'FOR)
 (list  'RPL-TOBAC-SUB 'FOR)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'FOR)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'FOR)
 (list  'BRADY-BILL 'AGN)
)
) 
(setf (slot-value MEMBER.1041 'RELATIONS)  (list (init-relation '(ADA CON C MEMBER.1041 MEMBER))(init-relation '(COPE CON C MEMBER.1041 MEMBER))(init-relation '(CFA PRO C MEMBER.1041 MEMBER))(init-relation '(LCV PRO C MEMBER.1041 MEMBER))(init-relation '(ACU CON C MEMBER.1041 MEMBER))(init-relation '(NTU PRO C MEMBER.1041 MEMBER))(init-relation '(NSI PRO C MEMBER.1041 MEMBER))(init-relation '(COC PRO C MEMBER.1041 MEMBER))(init-relation '(CEI CON C MEMBER.1041 MEMBER))(init-relation '(DEMOCRATS CON C MEMBER.1041 MEMBER))(init-relation '(REPUBLICANS PRO C MEMBER.1041 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1041 MEMBER)))
) 
(setf (slot-value MEMBER.1041 'DISTRICT)  'ME-2) 
(setf (slot-value MEMBER.1041 'TERM-START)  "1978") 
(setf (slot-value MEMBER.1041 'PARTY)  'REP) 
(setf (slot-value MEMBER.1041 'COMMITTEES)  (list  'HOUSE-FOREIGN)
) 
(setf (slot-value MEMBER.1041 'STATUS)  "Active") 
(setf (slot-value MEMBER.1041 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1041 'SYMBOL)  'MEMBER.1041) )
(insert-item MEMBER MEMBER.1041)
(defvar MEMBER.1073)
(prog1 (setf MEMBER.1073 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1073 'NAME)  "Floyd D. Spence") 
(setf (slot-value MEMBER.1073 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'AGN)
 (list  'SPACE-STATION '--)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'AGN)
 (list  'REFLAGGING-SHIPS 'FOR)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'AGN)
 (list  'HOME-HEALTH-CARE '--)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-TAX-CUT 'AGN)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'AGN)
 (list  'BAR-IMM-AMNESTY 'FOR)
 (list  'OK-SCHOOL-PRAY 'FOR)
 (list  'LIMIT-ABORTIONS 'FOR)
 (list  'APPROVE-ERA 'AGN)
 (list  'PASS-IMM-REFORM 'AGN)
 (list  'CANCEL-MX-MISSILE 'AGN)
 (list  'HALT-AID-TO-CONTRAS 'AGN)
 (list  'INCR-AID-TO-EL-SAL 'FOR)
 (list  'SUPP-NUCLEAR-FREEZE 'AGN)
 (list  'CAP-GAINS-CUT 'AGN)
 (list  'LMT-CLN-WATER-ACT 'FOR)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'AGN)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'FOR)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'AGN)
 (list  'AID-ANGOLA-REB 'FOR)
 (list  'TAX-REFORM 'AGN)
 (list  'S-AFRICA-SANC 'AGN)
 (list  'IMMIG-REFORM 'AGN)
 (list  'CHILD-CARE '--)
 (list  'FLAG-BURNING 'FOR)
 (list  'BRADY-BILL 'AGN)
)
) 
(setf (slot-value MEMBER.1073 'RELATIONS)  (list (init-relation '(ADA CON A MEMBER.1073 MEMBER))(init-relation '(ACLU CON A MEMBER.1073 MEMBER))(init-relation '(COPE CON B MEMBER.1073 MEMBER))(init-relation '(CFA CON B MEMBER.1073 MEMBER))(init-relation '(LCV CON B MEMBER.1073 MEMBER))(init-relation '(ACU PRO B MEMBER.1073 MEMBER))(init-relation '(NTU PRO C MEMBER.1073 MEMBER))(init-relation '(NSI PRO A MEMBER.1073 MEMBER))(init-relation '(COC PRO B MEMBER.1073 MEMBER))(init-relation '(CEI PRO C MEMBER.1073 MEMBER))(init-relation '(DEMOCRATS CON C MEMBER.1073 MEMBER))(init-relation '(REPUBLICANS PRO C MEMBER.1073 MEMBER)))
) 
(setf (slot-value MEMBER.1073 'DISTRICT)  'SC-2) 
(setf (slot-value MEMBER.1073 'TERM-START)  "1970") 
(setf (slot-value MEMBER.1073 'PARTY)  'REP) 
(setf (slot-value MEMBER.1073 'COMMITTEES)  (list  'HOUSE-ARMED-SERVICES 'HOUSE-AGING)
) 
(setf (slot-value MEMBER.1073 'STATUS)  "Active") 
(setf (slot-value MEMBER.1073 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1073 'SYMBOL)  'MEMBER.1073) )
(insert-item MEMBER MEMBER.1073)
(defvar MEMBER.1061)
(prog1 (setf MEMBER.1061 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1061 'NAME)  "Louis Stokes") 
(setf (slot-value MEMBER.1061 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'FOR)
 (list  'SPACE-STATION 'FOR)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'FOR)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'FOR)
 (list  'STAR-WARS '--)
 (list  'HOME-HEALTH-CARE 'FOR)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-TAX-CUT 'FOR)
 (list  'EXTEND-SS-BENEFIT 'FOR)
 (list  'ESTAB-DOM-CONTENT 'FOR)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY 'AGN)
 (list  'LIMIT-ABORTIONS 'AGN)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'AGN)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'CAP-GAINS-CUT 'FOR)
 (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'AGN)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL '--)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'AGN)
 (list  'TAX-REFORM '--)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'CHILD-CARE 'AGN)
 (list  'FLAG-BURNING 'AGN)
 (list  'BRADY-BILL 'FOR)
)
) 
(setf (slot-value MEMBER.1061 'ISSUES)  (list  'BLACKS)
) 
(setf (slot-value MEMBER.1061 'GROUPS)  (list  'BLACKS)
) 
(setf (slot-value MEMBER.1061 'RELATIONS)  (list (init-relation '(BLACKS PRO A MEMBER.1061 MEMBER))(init-relation '(ADA PRO A MEMBER.1061 MEMBER))(init-relation '(ACLU PRO A MEMBER.1061 MEMBER))(init-relation '(COPE PRO A MEMBER.1061 MEMBER))(init-relation '(CFA PRO B MEMBER.1061 MEMBER))(init-relation '(LCV PRO C MEMBER.1061 MEMBER))(init-relation '(ACU CON A MEMBER.1061 MEMBER))(init-relation '(NTU CON B MEMBER.1061 MEMBER))(init-relation '(NSI CON A MEMBER.1061 MEMBER))(init-relation '(COC CON B MEMBER.1061 MEMBER))(init-relation '(CEI CON A MEMBER.1061 MEMBER))(init-relation '(DEMOCRATS PRO C MEMBER.1061 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.1061 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1061 MEMBER)))
) 
(setf (slot-value MEMBER.1061 'DISTRICT)  'OH-21) 
(setf (slot-value MEMBER.1061 'TERM-START)  "1968") 
(setf (slot-value MEMBER.1061 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1061 'COMMITTEES)  (list  'HOUSE-APPROPRIATIONS)
) 
(setf (slot-value MEMBER.1061 'STATUS)  "Active") 
(setf (slot-value MEMBER.1061 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1061 'SYMBOL)  'MEMBER.1061) )
(insert-item MEMBER MEMBER.1061)
(defvar MEMBER.1066)
(prog1 (setf MEMBER.1066 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1066 'NAME)  "Michael L. Synar") 
(setf (slot-value MEMBER.1066 'VOTES)  (list  (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'AGN)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'FOR)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'AGN)
 (list  'TAX-REFORM 'AGN)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'CAP-TAX-CUT 'FOR)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'AGN)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY 'AGN)
 (list  'LIMIT-ABORTIONS 'AGN)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'FOR)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'DEFENSE-AUTHORIZATION 'FOR)
 (list  'SPACE-STATION 'FOR)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'AGN)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'FOR)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'AGN)
 (list  'CAP-GAINS-CUT 'FOR)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'AGN)
 (list  'BRADY-BILL 'FOR)
)
) 
(setf (slot-value MEMBER.1066 'ISSUES)  (list  'INDIAN-AFFAIRS 'ENERGY-DEREGULATION 'FAIR-HOUSING 'BAN-TOBACCO)
) 
(setf (slot-value MEMBER.1066 'GROUPS)  (list  'INDIANS 'FARM)
) 
(setf (slot-value MEMBER.1066 'RELATIONS)  (list (init-relation '(ADA PRO B MEMBER.1066 MEMBER))(init-relation '(ACLU PRO B MEMBER.1066 MEMBER))(init-relation '(COPE PRO C MEMBER.1066 MEMBER))(init-relation '(LCV PRO C MEMBER.1066 MEMBER))(init-relation '(ACU CON C MEMBER.1066 MEMBER))(init-relation '(NTU CON C MEMBER.1066 MEMBER))(init-relation '(NSI CON B MEMBER.1066 MEMBER))(init-relation '(COC CON B MEMBER.1066 MEMBER))(init-relation '(CEI CON C MEMBER.1066 MEMBER))(init-relation '(DEMOCRATS PRO C MEMBER.1066 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.1066 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1066 MEMBER)))
) 
(setf (slot-value MEMBER.1066 'DISTRICT)  'OK-2) 
(setf (slot-value MEMBER.1066 'TERM-START)  "1978") 
(setf (slot-value MEMBER.1066 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1066 'COMMITTEES)  (list  'HOUSE-ENERGY 'HOUSE-JUDICIARY)
) 
(setf (slot-value MEMBER.1066 'STATUS)  "Active") 
(setf (slot-value MEMBER.1066 'DATE-OPEN) (list->date '(8 21 1989))) 
(setf (slot-value MEMBER.1066 'SYMBOL)  'MEMBER.1066) )
(insert-item MEMBER MEMBER.1066)
(defvar MEMBER.1084)
(prog1 (setf MEMBER.1084 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1084 'NAME)  "Esteban Edward Torres") 
(setf (slot-value MEMBER.1084 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'FOR)
 (list  'SPACE-STATION 'FOR)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'FOR)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'FOR)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'FOR)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-TAX-CUT 'FOR)
 (list  'EXTEND-SS-BENEFIT 'FOR)
 (list  'ESTAB-DOM-CONTENT 'FOR)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY 'AGN)
 (list  'LIMIT-ABORTIONS 'AGN)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'AGN)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'CAP-GAINS-CUT 'FOR)
 (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL '--)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'AGN)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'AGN)
 (list  'BRADY-BILL 'FOR)
)
) 
(setf (slot-value MEMBER.1084 'ISSUES)  (list  'HISPANICS)
) 
(setf (slot-value MEMBER.1084 'GROUPS)  (list  'HISPANICS)
) 
(setf (slot-value MEMBER.1084 'RELATIONS)  (list (init-relation '(ADA PRO B MEMBER.1084 MEMBER))(init-relation '(ACLU PRO B MEMBER.1084 MEMBER))(init-relation '(COPE PRO A MEMBER.1084 MEMBER))(init-relation '(CFA PRO B MEMBER.1084 MEMBER))(init-relation '(LCV PRO C MEMBER.1084 MEMBER))(init-relation '(ACU CON A MEMBER.1084 MEMBER))(init-relation '(NTU CON B MEMBER.1084 MEMBER))(init-relation '(NSI CON A MEMBER.1084 MEMBER))(init-relation '(COC CON B MEMBER.1084 MEMBER))(init-relation '(CEI CON B MEMBER.1084 MEMBER))(init-relation '(DEMOCRATS PRO C MEMBER.1084 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.1084 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1084 MEMBER))(init-relation '(HISPANICS PRO A MEMBER.1084 MEMBER))(init-relation '(BLACKS PRO B MEMBER.1084 MEMBER)))
) 
(setf (slot-value MEMBER.1084 'DISTRICT)  'CA-34) 
(setf (slot-value MEMBER.1084 'TERM-START)  "1982") 
(setf (slot-value MEMBER.1084 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1084 'COMMITTEES)  (list  'HOUSE-BANKING 'HOUSE-SMALL-BUSINESS)
) 
(setf (slot-value MEMBER.1084 'STATUS)  "Active") 
(setf (slot-value MEMBER.1084 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1084 'SYMBOL)  'MEMBER.1084) )
(insert-item MEMBER MEMBER.1084)
(defvar MEMBER.1086)
(prog1 (setf MEMBER.1086 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1086 'NAME)  "Robert G. Torricelli") 
(setf (slot-value MEMBER.1086 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'FOR)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'FOR)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'FOR)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'FOR)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-TAX-CUT 'FOR)
 (list  'EXTEND-SS-BENEFIT 'FOR)
 (list  'ESTAB-DOM-CONTENT 'FOR)
 (list  'BAR-IMM-AMNESTY 'FOR)
 (list  'OK-SCHOOL-PRAY 'AGN)
 (list  'LIMIT-ABORTIONS 'AGN)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'FOR)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'CAP-GAINS-CUT 'FOR)
 (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'FOR)
 (list  'GRM-RDMN-DEF-RED 'AGN)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'FOR)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'AGN)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'AGN)
 (list  'BRADY-BILL 'FOR)
)
) 
(setf (slot-value MEMBER.1086 'RELATIONS)  (list (init-relation '(ADA PRO B MEMBER.1086 MEMBER))(init-relation '(ACLU PRO C MEMBER.1086 MEMBER))(init-relation '(COPE PRO A MEMBER.1086 MEMBER))(init-relation '(CFA PRO B MEMBER.1086 MEMBER))(init-relation '(LCV PRO C MEMBER.1086 MEMBER))(init-relation '(ACU CON A MEMBER.1086 MEMBER))(init-relation '(NTU CON C MEMBER.1086 MEMBER))(init-relation '(NSI CON A MEMBER.1086 MEMBER))(init-relation '(COC CON B MEMBER.1086 MEMBER))(init-relation '(CEI CON B MEMBER.1086 MEMBER))(init-relation '(DEMOCRATS PRO C MEMBER.1086 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.1086 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1086 MEMBER)))
) 
(setf (slot-value MEMBER.1086 'DISTRICT)  'NJ-9) 
(setf (slot-value MEMBER.1086 'TERM-START)  "1982") 
(setf (slot-value MEMBER.1086 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1086 'COMMITTEES)  (list  'HOUSE-FOREIGN 'HOUSE-SCIENCE)
) 
(setf (slot-value MEMBER.1086 'STATUS)  "Active") 
(setf (slot-value MEMBER.1086 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1086 'SYMBOL)  'MEMBER.1086) )
(insert-item MEMBER MEMBER.1086)
(defvar MEMBER.1025)
(prog1 (setf MEMBER.1025 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1025 'NAME)  "Morris K. Udall") 
(setf (slot-value MEMBER.1025 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'FOR)
 (list  'SPACE-STATION 'FOR)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'FOR)
 (list  'HANDGUN-CONTROL 'AGN)
 (list  'CONTRA-AID2 'FOR)
 (list  'STAR-WARS '--)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'AGN)
 (list  'CAP-TAX-CUT 'FOR)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'FOR)
 (list  'BAR-IMM-AMNESTY 'AGN)
 (list  'OK-SCHOOL-PRAY 'AGN)
 (list  'LIMIT-ABORTIONS 'AGN)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'AGN)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'CAP-GAINS-CUT 'FOR)
 (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'AGN)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'AGN)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'FOR)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'AGN)
)
) 
(setf (slot-value MEMBER.1025 'ISSUES)  (list  'PROGRESSIVE)
) 
(setf (slot-value MEMBER.1025 'RELATIONS)  (list (init-relation '(ADA PRO B MEMBER.1025 MEMBER))(init-relation '(ACLU PRO A MEMBER.1025 MEMBER))(init-relation '(COPE PRO B MEMBER.1025 MEMBER))(init-relation '(LCV PRO C MEMBER.1025 MEMBER))(init-relation '(ACU CON B MEMBER.1025 MEMBER))(init-relation '(NTU CON B MEMBER.1025 MEMBER))(init-relation '(NSI CON B MEMBER.1025 MEMBER))(init-relation '(COC CON B MEMBER.1025 MEMBER))(init-relation '(CEI CON B MEMBER.1025 MEMBER))(init-relation '(DEMOCRATS PRO C MEMBER.1025 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.1025 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1025 MEMBER)))
) 
(setf (slot-value MEMBER.1025 'DISTRICT)  'AZ-2) 
(setf (slot-value MEMBER.1025 'TERM-START)  "1961") 
(setf (slot-value MEMBER.1025 'TERM-END)  "1991") 
(setf (slot-value MEMBER.1025 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1025 'COMMITTEES)  (list  'HOUSE-FOREIGN)
) 
(setf (slot-value MEMBER.1025 'STATUS)  "Active") 
(setf (slot-value MEMBER.1025 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1025 'SYMBOL)  'MEMBER.1025) )
(insert-item MEMBER MEMBER.1025)
(defvar MEMBER.1050)
(prog1 (setf MEMBER.1050 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1050 'NAME)  "Barbara F. Vucanovich") 
(setf (slot-value MEMBER.1050 'GENDER)  'FEMALE) 
(setf (slot-value MEMBER.1050 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'AGN)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'AGN)
 (list  'REFLAGGING-SHIPS 'AGN)
 (list  'HANDGUN-CONTROL 'FOR)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'AGN)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'FOR)
 (list  'LIMIT-IMPORTS 'AGN)
 (list  'CAP-TAX-CUT 'AGN)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'AGN)
 (list  'BAR-IMM-AMNESTY 'FOR)
 (list  'OK-SCHOOL-PRAY 'FOR)
 (list  'LIMIT-ABORTIONS 'FOR)
 (list  'APPROVE-ERA 'AGN)
 (list  'PASS-IMM-REFORM 'FOR)
 (list  'CANCEL-MX-MISSILE 'AGN)
 (list  'HALT-AID-TO-CONTRAS 'AGN)
 (list  'INCR-AID-TO-EL-SAL 'FOR)
 (list  'SUPP-NUCLEAR-FREEZE 'AGN)
 (list  'CAP-GAINS-CUT 'AGN)
 (list  'LMT-CLN-WATER-ACT 'FOR)
 (list  'RPL-TOBAC-SUB 'FOR)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'AGN)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'FOR)
 (list  'LMT-TEXT-IMP 'AGN)
 (list  'LIMIT-SDI 'AGN)
 (list  'AID-ANGOLA-REB 'FOR)
 (list  'TAX-REFORM 'AGN)
 (list  'S-AFRICA-SANC 'AGN)
 (list  'IMMIG-REFORM 'FOR)
 (list  'CHILD-CARE 'AGN)
 (list  'FLAG-BURNING 'FOR)
 (list  'BRADY-BILL 'AGN)
)
) 
(setf (slot-value MEMBER.1050 'RELATIONS)  (list (init-relation '(ADA CON A MEMBER.1050 MEMBER))(init-relation '(ACLU CON A MEMBER.1050 MEMBER))(init-relation '(COPE CON A MEMBER.1050 MEMBER))(init-relation '(CFA CON C MEMBER.1050 MEMBER))(init-relation '(LCV CON A MEMBER.1050 MEMBER))(init-relation '(ACU PRO B MEMBER.1050 MEMBER))(init-relation '(NSI PRO A MEMBER.1050 MEMBER))(init-relation '(COC PRO A MEMBER.1050 MEMBER))(init-relation '(CEI PRO C MEMBER.1050 MEMBER))(init-relation '(DEMOCRATS CON C MEMBER.1050 MEMBER))(init-relation '(REPUBLICANS PRO C MEMBER.1050 MEMBER)))
) 
(setf (slot-value MEMBER.1050 'DISTRICT)  'NV-2) 
(setf (slot-value MEMBER.1050 'TERM-START)  "1982") 
(setf (slot-value MEMBER.1050 'PARTY)  'REP) 
(setf (slot-value MEMBER.1050 'COMMITTEES)  (list  'HOUSE-ADMINISTRATION 'HOUSE-INTERIOR)
) 
(setf (slot-value MEMBER.1050 'STATUS)  "Active") 
(setf (slot-value MEMBER.1050 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1050 'SYMBOL)  'MEMBER.1050) )
(insert-item MEMBER MEMBER.1050)
(defvar MEMBER.1046)
(prog1 (setf MEMBER.1046 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1046 'NAME)  "Jamie L. Whitten") 
(setf (slot-value MEMBER.1046 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'FOR)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS 'AGN)
 (list  'HANDGUN-CONTROL 'FOR)
 (list  'CONTRA-AID2 'FOR)
 (list  'STAR-WARS 'FOR)
 (list  'HOME-HEALTH-CARE 'FOR)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-TAX-CUT 'FOR)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT '--)
 (list  'BAR-IMM-AMNESTY 'FOR)
 (list  'OK-SCHOOL-PRAY 'FOR)
 (list  'LIMIT-ABORTIONS 'FOR)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'AGN)
 (list  'CANCEL-MX-MISSILE 'FOR)
 (list  'HALT-AID-TO-CONTRAS 'FOR)
 (list  'INCR-AID-TO-EL-SAL 'AGN)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'CAP-GAINS-CUT 'AGN)
 (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'AGN)
 (list  'BAN-POLYGRAPH 'AGN)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'AGN)
 (list  'LMT-TEXT-IMP 'FOR)
 (list  'LIMIT-SDI 'FOR)
 (list  'AID-ANGOLA-REB 'FOR)
 (list  'TAX-REFORM 'FOR)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'AGN)
 (list  'CHILD-CARE 'FOR)
 (list  'FLAG-BURNING 'FOR)
)
) 
(setf (slot-value MEMBER.1046 'RELATIONS)  (list (init-relation '(ADA PRO C MEMBER.1046 MEMBER))(init-relation '(COPE CON C MEMBER.1046 MEMBER))(init-relation '(CFA PRO C MEMBER.1046 MEMBER))(init-relation '(LCV CON B MEMBER.1046 MEMBER))(init-relation '(ACU CON B MEMBER.1046 MEMBER))(init-relation '(NTU CON B MEMBER.1046 MEMBER))(init-relation '(COC CON B MEMBER.1046 MEMBER))(init-relation '(CEI CON B MEMBER.1046 MEMBER))(init-relation '(DEMOCRATS PRO C MEMBER.1046 MEMBER))(init-relation '(REPUBLICANS CON C MEMBER.1046 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1046 MEMBER)))
) 
(setf (slot-value MEMBER.1046 'DISTRICT)  'MS-1) 
(setf (slot-value MEMBER.1046 'TERM-START)  "1941") 
(setf (slot-value MEMBER.1046 'PARTY)  'DEM) 
(setf (slot-value MEMBER.1046 'COMMITTEES)  (list  'HOUSE-APPROPRIATIONS)
) 
(setf (slot-value MEMBER.1046 'STATUS)  "Active") 
(setf (slot-value MEMBER.1046 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1046 'SYMBOL)  'MEMBER.1046) )
(insert-item MEMBER MEMBER.1046)
(defvar MEMBER.1024)
(prog1 (setf MEMBER.1024 (make-instance 'MEMBER))
(setf (slot-value MEMBER.1024 'NAME)  "Don Young") 
(setf (slot-value MEMBER.1024 'VOTES)  (list  (list  'DEFENSE-AUTHORIZATION 'AGN)
 (list  'SPACE-STATION 'AGN)
 (list  'CIVIL-RIGHTS-RESTORATION-ACT 'FOR)
 (list  'REFLAGGING-SHIPS '--)
 (list  'HANDGUN-CONTROL 'FOR)
 (list  'CONTRA-AID2 'AGN)
 (list  'STAR-WARS 'AGN)
 (list  'HOME-HEALTH-CARE 'AGN)
 (list  'AIDS 'AGN)
 (list  'LIMIT-IMPORTS 'FOR)
 (list  'CAP-TAX-CUT 'AGN)
 (list  'EXTEND-SS-BENEFIT 'AGN)
 (list  'ESTAB-DOM-CONTENT 'FOR)
 (list  'BAR-IMM-AMNESTY 'FOR)
 (list  'OK-SCHOOL-PRAY 'FOR)
 (list  'LIMIT-ABORTIONS 'FOR)
 (list  'APPROVE-ERA 'FOR)
 (list  'PASS-IMM-REFORM 'AGN)
 (list  'CANCEL-MX-MISSILE 'AGN)
 (list  'HALT-AID-TO-CONTRAS 'AGN)
 (list  'INCR-AID-TO-EL-SAL 'FOR)
 (list  'SUPP-NUCLEAR-FREEZE 'FOR)
 (list  'CAP-GAINS-CUT 'AGN)
 (list  'LMT-CLN-WATER-ACT 'AGN)
 (list  'RPL-TOBAC-SUB 'AGN)
 (list  'GRM-RDMN-DEF-RED 'FOR)
 (list  'BAN-POLYGRAPH 'FOR)
 (list  'RETAIN-GUN-CONTROL 'AGN)
 (list  'CONTRA-AID 'FOR)
 (list  'LMT-TEXT-IMP 'AGN)
 (list  'LIMIT-SDI 'AGN)
 (list  'AID-ANGOLA-REB 'FOR)
 (list  'TAX-REFORM 'AGN)
 (list  'S-AFRICA-SANC 'FOR)
 (list  'IMMIG-REFORM 'AGN)
 (list  'CHILD-CARE 'AGN)
 (list  'FLAG-BURNING 'FOR)
 (list  'BRADY-BILL 'AGN)
)
) 
(setf (slot-value MEMBER.1024 'RELATIONS)  (list (init-relation '(ADA CON B MEMBER.1024 MEMBER))(init-relation '(ACLU CON B MEMBER.1024 MEMBER))(init-relation '(COPE CON C MEMBER.1024 MEMBER))(init-relation '(CFA CON B MEMBER.1024 MEMBER))(init-relation '(LCV CON B MEMBER.1024 MEMBER))(init-relation '(ACU PRO C MEMBER.1024 MEMBER))(init-relation '(NTU CON C MEMBER.1024 MEMBER))(init-relation '(NSI PRO A MEMBER.1024 MEMBER))(init-relation '(COC PRO C MEMBER.1024 MEMBER))(init-relation '(CEI CON C MEMBER.1024 MEMBER))(init-relation '(DEMOCRATS CON C MEMBER.1024 MEMBER))(init-relation '(REPUBLICANS PRO C MEMBER.1024 MEMBER))(init-relation '(COUNTRY PRO C MEMBER.1024 MEMBER)))
) 
(setf (slot-value MEMBER.1024 'DISTRICT)  'AK-AL) 
(setf (slot-value MEMBER.1024 'TERM-START)  "1973") 
(setf (slot-value MEMBER.1024 'PARTY)  'REP) 
(setf (slot-value MEMBER.1024 'COMMITTEES)  (list  'HOUSE-INTERIOR)
) 
(setf (slot-value MEMBER.1024 'STATUS)  "Active") 
(setf (slot-value MEMBER.1024 'DATE-OPEN) (list->date '(9 19 1989))) 
(setf (slot-value MEMBER.1024 'SYMBOL)  'MEMBER.1024) )
(insert-item MEMBER MEMBER.1024)