/* Copyright (C) Wolfgang Menzel, Universität Hamburg, 2003-06-27 This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. */ :- use_module(instance_diag). :- nl. :- write_ln('a simple instance-based system with error anticipation'). :- write_ln('subject-verb agreement in simple sentence'). :- nl. exercise(agreement1,'Build a sentence using the following words.'). item(agreement1,1,'Mary, sleep', [[[mary, sleeps]], [[mary, is, sleeping]], [[mary, slept]], [[mary, has, been, sleeping]], [[mary, will, sleep]], [[mary, will, be, sleeping]]]). item(agreement1,2,'I, drink', [[[i, drink]], [[i, am, drinking]], [[i, drank]], [[i, have, been, drinking]], [[i, will, drink]], [[i, will, be, drinking]]]). item(agreement1,3,'he, walk', [[[he, walks]], [[he, walked]], [[he, will, walk]], [[he, is, walking]], [[he, has, been, walking]], [[he, will, be, walking]]]). item(agreement1,4,'they, dance', [[[they, dance]], [[they, are, dancing]], [[they, danced]], [[they, have, been, dancing]], [[they, will, dance]], [[they, will, be, dancing]]]). :- do_exercise(agreement1).