(  i i i i i i i       ooooo    o        ooooooo   ooooo   ooooo
  I I I I I I I      8     8   8           8     8     o  8    8
  I  \ `+' /  I      8         8           8     8        8    8
   \  `-+-'  /       8         8           8      ooooo   8oooo
    `-__|__-'        8         8           8           8  8
        |            8     o   8           8     o     8  8
  ------+------       ooooo    8oooooo  ooo8ooo   ooooo   8

Welcome to GNU CLISP 2.47 (2008-10-23) <http://clisp.cons.org/>

Copyright (c) Bruno Haible, Michael Stoll 1992, 1993
Copyright (c) Bruno Haible, Marcus Daniels 1994-1997
Copyright (c) Bruno Haible, Pierpaolo Bernardi, Sam Steingold 1998
Copyright (c) Bruno Haible, Sam Steingold 1999-2000
Copyright (c) Sam Steingold, Bruno Haible 2001-2008

Type :h and hit Enter for context help.

[1]> load "hw1-2.lisp")

;; Loading file hw1-2.lisp ...
;; Loaded file hw1-2.lisp
T
[2]> (load "hw1-2-data.lisp")

;; Loading file hw1-2-data.lisp ...
;; Loaded file hw1-2-data.lisp
T
[3]> s1

(FROGS THAT BUGS AVOID CHASE BUGS THAT MICE THAT DOGS THAT CATS SEE LOVE
 FOLLOW)
[4]> (convert s1)

(FROGS THAT ARE AVOIDED BY BUGS CHASE BUGS THAT ARE FOLLOWED BY MICE THAT ARE
 LOVED BY DOGS THAT ARE SEEN BY CATS)
[5]> s2

(BUGS THAT MICE CHASE HIT CATS THAT DOGS CHASE)
[6]> (convert s2)

(BUGS THAT ARE CHASED BY MICE HIT CATS THAT ARE CHASED BY DOGS)
[7]> s3

(DOGS THAT LOVE FROGS SEE BIRDS THAT BUGS AVOID)
[8]> (convert s3)

:ERRONEOUS
[9]> s4

(BUGS THAT BUGS LOVE LOVE BUGS THAT CATS THAT DOGS CHASE SEE)
[10]> (convert s4)

(BUGS THAT ARE LOVED BY BUGS LOVE BUGS THAT ARE SEEN BY CATS THAT ARE CHASED BY
 DOGS)
[11]> s5

(CATS THAT FROGS THAT BUGS AVOID SEE FOLLOW CHASE CATS THAT MICE AVOID)
[12]> (convert s5)

:ERRONEOUS
[13]> s6

(CATS THAT DOGS CHASE PREFER CATS THAT MICE AVOID)
[14]> (convert s6)

:ERRONEOUS
[15]> s7

(CATS THAT DOGS CHASE PREFER CATS DOGS THAT MICE AVOID)
[16]> (convert s7)

:ERRONEOUS
[17]> 
Bye.