A := (AddressCard new)
    set: 'Letter' value: 'A';
    set: 'Last' value: 'Ackermann';
    set: 'First' value: 'Wilhelm';
    set: 'Address' value: '1122 222nd St SW';
    set: 'City' value: 'Theoryville';
    set: 'State' value: 'OR';
    set: 'Zip' value: '99246';
    set: 'Phone' value: '(503)555-2323';
    set: 'Status' value: 'Genius'.

B := (AddressCard new)
    set: 'Letter' value: 'B';
    last: 'Boole' first: 'Mister';   "Note alternative entry format"
    set: 'Address' value: '1123 222nd St SW';
    set: 'City' value: 'Theoryville';
    set: 'State' value: 'OR';
    set: 'Zip' value: '99246';
    set: 'Phone' value: '(503)555-7890';
    set: 'Status' value: 'Genius'.

C := (AddressCard new)
    set: 'Letter' value: 'C';
    set: 'Last' value: 'Chomsky';
    set: 'First' value: 'Noam';
    set: 'Address' value: '714 85th Ave N';
    set: 'City' value: 'Atlantis';
    set: 'State' value: 'State of Mind';
    set: 'Zip' value: '12345';
    set: 'Phone' value: '1-900-Talk2Me';
    set: 'Status' value: 'Genius'.

D := (AddressCard new)
    set: 'Letter' value: 'D';
    set: 'Last' value: 'Dijkstra';
    set: 'First' value: 'Captain';
    set: 'Address' value: 'Deck 3 Room 1';
    set: 'City' value: 'Starship Enterprise';
    set: 'State' value: 'Alpha Quadrant';
    set: 'Zip' value: '001';
    set: 'Phone' value: 'Pickard Alpha One';
    set: 'Status' value: 'Genius';
    set: 'Occupation' value: 'Starship Captain'.

E := (AddressCard new)
    set: 'Letter' value: 'E';
    set: 'Last' value: 'Englebart';
    set: 'First' value: 'Douglas';
    set: 'Address' value: 'X_Coord 45 Y_Coord 15';
    set: 'City' value: 'Bremerton';
    set: 'State' value: 'WA';
    set: 'Zip' value: '99878';
    set: 'Phone' value: '(206) ClickMe';
    set: 'Status' value: 'Dork';
    set: 'Occupation' value: 'Ex-Inventor'.


F := (AddressCard new)
    set: 'Letter' value: 'F';
    set: 'Last' value: 'Fourier';
    set: 'First' value: 'Analysis';
    set: 'Address' value: '23900 54th Avenue West';
    set: 'City' value: 'Theoryville';
    set: 'State' value: 'OR';
    set: 'Zip' value: '99246';
    set: 'Phone' value: '901-744-4256';
    set: 'Status' value: 'Genius'.


G := (AddressCard new)
    set: 'Letter' value: 'G';
    set: 'Last' value: 'Badros';
    set: 'First' value: 'Greg';
    set: 'Address' value: 'xxxx 25th NE';
    set: 'City' value: 'Seattle';
    set: 'State' value: 'WA';
    set: 'Zip' value: '98115';
    set: 'Phone' value: '(206) 444-1234';
    set: 'Status' value: 'Deity and Genius';
    set: 'Occupation' value: 'CSE341 Professor'.


H := (AddressCard new)
    set: 'Letter' value: 'H';
    set: 'Last' value: 'Hsu';
    set: 'First' value: 'Eugene';
    set: 'Address' value: '615 6th St Apt 302';
    set: 'City' value: 'Kirkland';
    set: 'State' value: 'WA';
    set: 'Zip' value: '98033';
    set: 'Phone' value: '(425)827-7445';
    set: 'Status' value: 'Bacterium';
    set: 'Occupation' value: 'CSE341 Student';
    set: 'Hobby' value: 'Ass Kissing'.

I := (AddressCard new)
    set: 'Letter' value: 'I';
    set: 'Last' value: 'Icarus';
    set: 'First' value: 'Kid';
    set: 'Address' value: 'Davy Jones Locker';
    set: 'City' value: 'North Sea';
    set: 'State' value: 'Atlantic Ocean';
    set: 'Zip' value: '00001';
    set: 'Phone' value: '555-555-5555';
    set: 'Status' value: 'Dead';
    set: 'Occupation' value: 'Flying too high for his own darn good'.

J := (AddressCard new)
    set: 'Letter' value: 'J';
    set: 'Last' value: 'Aldrich';
    set: 'First' value: 'Jonathan';
    set: 'Address' value: 'Chateaux Suite 11';
    set: 'City' value: 'Seattle';
    set: 'State' value: 'WA';
    set: 'Zip' value: '98105';
    set: 'Phone' value: '(206) 555-1234';
    set: 'Status' value: 'Genius';
    set: 'Occupation' value: 'CSE143 Professor'.

K := (AddressCard new)
    set: 'Letter' value: 'K';
    set: 'Last' value: 'Yasuhara';
    set: 'First' value: 'Ken';
    set: 'Address' value: 'xxxx Brooklyn Ave NE Apt 315';
    set: 'City' value: 'Seattle';
    set: 'State' value: 'WA';
    set: 'Zip' value: '98105';
    set: 'Phone' value: '(206) 444-4321';
    set: 'Status' value: 'Aspiring Genius';
    set: 'Occupation' value: 'CSE341 TA  and Graduate Student'.

L := (AddressCard new)
    set: 'Letter' value: 'L';
    set: 'Last' value: 'Phan';
    set: 'First' value: 'Peter';
    set: 'Address' value: '23902 46th Avenue West';
    set: 'City' value: 'Mountlake Terrace';
    set: 'State' value: 'WA';
    set: 'Zip' value: '98043';
    set: 'Phone' value: '(425)778-8939';
    set: 'Status' value: 'Sleepy';
    set: 'Occupation' value: 'CSE143 Consultant and CSE341 Student';
    set: 'Hobbies' value: 'Rollerblading and Ass Kissing'.

M := (AddressCard new)
    set: 'Letter' value: 'M';
    set: 'Last' value: 'Shukla';
    set: 'First' value: 'Bina';
    set: 'Address' value: '3345 Veranda Dr.';
    set: 'City' value: 'Pleasantville';
    set: 'State' value: 'NY';
    set: 'Zip' value: '10238';
    set: 'Phone' value: '(606)555-1234';
    set: 'Status' value: 'Aspiring Genius';
    set: 'Occupation' value: 'CSE143 TA and CSE341 Student'.

N := (AddressCard new)
    set: 'Letter' value: 'N';
    set: 'Last' value: 'Phan';
    set: 'First' value: 'Diane';
    set: 'Address' value: '23902 46th Avenue West';
    set: 'City' value: 'Mountlake Terrace';
    set: 'State' value: 'WA';
    set: 'Zip' value: '98043';
    set: 'Phone' value: '(425)778-8939';
    set: 'Status' value: 'Sleepy';
    set: 'Occupation' value: 'Software Engineer at ATT Wireless'.

AB := AddressBook new. AB1 := AddressBook new. AB2 := AddressBook new.

AB add: A; add: B; add: C; add: D; add: E; add: F; add: G; add: H; add: I; add: J;
       add: K; add: L; add: M; add: N.
AB1 add: A; add: B; add: C; add: D; add: E; add: F; add: G; add: H; add: I; add: J.
AB2 add: H; add: I; add: J; add: K; add: L; add: M.