For this assignment, you may use the version of query2.scm that we developed in class today as your starting point. This version includes support for patterns like (when was ... made).
(what (movie movies) (was were) made (in before after since) _)This pattern contains four wild-cards, so its associated action procedure should take four arguments. The third argument can be used to decide which type of comparison operator to use in searching the database. For example:
(what movies were made before 1950) ((casablanca) (citizen kane) (gone with the wind) (metropolis))
(what (movie movies) (was were) made between _ and _)For example:
(what movies were made between 1960 and 1970) ((lawrence of arabia) (the manchurian candidate) (spartacus))
(equal-titles? '(the godfather) '(godfather)) => #t (equal-titles? '(2001 a space odyssey) '(the 2001 space odyssey)) => #t (equal-titles? '(2001 a space odyssey) '(2001 a space oddity)) => #f (when was godfather made) 1972
(matches? '(made in <number>) '(made in 1974)) => #t (matches? '(made in <number>) '(made in japan)) => #f (what movies were made in 1974) ((amarcord) (chinatown)) (what movies were made in japan) (i do not understand)
(what ((movie was) (movies were)) made in _)Change the query system to support this new wild-card list format. Don't forget to update the wild-card lists in other pattern/action rules so that they contain lists instead of symbols.