
:-recorda(commcs,[unknown,mr,a,[[[classready,false]],[[prreadi,true]]]],REF).

:-recorda(commcs,[unknown,mr,a,[[[classready,false],[prreadi,true]],[[readics,true]]]],REF).


:-recorda(prreadi,[unknown,mr,a,[[],[[prreadia,true],[prreadib,true],[prreadic,true]]]],REF).


/*
:-recorda(readics,[unknown,mr,a,[[[startoflesson,true],[classpresent,true]],[[readia,true],[prreadia,true]]]],REF).

:-recorda(readics,[unknown,mr,a,[[[startoflesson,true],[classpresent,true]],[[readib,true],[prreadib,true]]]],REF).

:-recorda(readics,[unknown,mr,a,[[[startoflesson,true],[classpresent,true]],[[readic,true],[prreadic,true]]]],REF).

:-recorda(prreadia,[unknown,mr,a,[[[startoflesson,true],[classpresent,true]],[[wereresponsive,false],[wereresponsive,true]]]],REF).

:-recorda(prreadib,[unknown,mr,a,[[[startoflesson,true],[classpresent,true]],[[wereresponsive,false],[wereresponsive,true]]]],REF).

:-recorda(prreadic,[unknown,mr,a,[[[startoflesson,true],[classpresent,true]],[[wereresponsive,false],[wereresponsive,true]]]],REF).
*/
:-recorda(readics,[unknown,mr,a,[[[startoflesson,true]],[[readia,true],[prreadia,true]]]],REF).

:-recorda(readics,[unknown,mr,a,[[[startoflesson,true]],[[readib,true],[prreadib,true]]]],REF).

:-recorda(readics,[unknown,mr,a,[[[startoflesson,true]],[[readic,true],[prreadic,true]]]],REF).

:-recorda(prreadia,[unknown,mr,a,[[[startoflesson,true]],[[wereresponsive,false],[wereresponsive,true]]]],REF).

:-recorda(prreadib,[unknown,mr,a,[[[startoflesson,true]],[[wereresponsive,false],[wereresponsive,true]]]],REF).

/*
:-recorda(prreadic,[unknown,mr,a,[[[startoflesson,true],[classpresent,true]],[[wereresponsive,false],[wereresponsive,true]]]],REF).
*/
:-recorda(prreadic,[unknown,mr,a,[[[startoflesson,true]],[[wereresponsive,false],[wereresponsive,true]]]],REF).

:-recorda(readics,[unknown,mr,a,[[[startoflesson,false]],[[readia,true],[prreadia,true]]]],REF).

:-recorda(readics,[unknown,mr,a,[[[startoflesson,false]],[[readib,true],[prreadib,true]]]],REF).

:-recorda(readics,[unknown,mr,a,[[[startoflesson,false]],[[readic,true],[prreadic,true]]]],REF).

:-recorda(prreadia,[unknown,mr,a,[[[startoflesson,false]],[[wereresponsive,false],[wereresponsive,true]]]],REF).

:-recorda(prreadib,[unknown,mr,a,[[[startoflesson,false]],[[wereresponsive,false],[wereresponsive,true]]]],REF).

:-recorda(prreadic,[unknown,mr,a,[[[startoflesson,false]],[[wereresponsive,false],[wereresponsive,true]]]],REF).



:-recorda(wereresponsive,[unknown,mr,a,[[[startoflesson,true]],[[settled,false],[settled,true]]]],REF).

:-recorda(settled,[false,mr,a,[[],[[distracted,false],[distracted,true]]]],REF).

:-recorda(wereresponsive,[unknown,mr,a,[[[startoflesson,false]],[[busy,false],[busy,true]]]],REF).

:-recorda(readics,[unknown,mr,a,[[[prreadia,true],[readia,true]],[[csreadiaa,true]]]],REF).

:-recorda(readics,[unknown,mr,a,[[[prreadia,true],[readib,true]],[[csreadiab,true]]]],REF).

:-recorda(readics,[unknown,mr,a,[[[prreadib,true],[readia,true]],[[csreadiba,true]]]],REF).

:-recorda(readics,[unknown,mr,a,[[[prreadib,true],[readib,true]],[[csreadibb,true]]]],REF).

:-recorda(readics,[unknown,mr,a,[[[prreadib,true],[readic,true]],[[csreadibc,true]]]],REF).

:-recorda(readics,[unknown,mr,a,[[[prreadic,true],[readib,true]],[[csreadicb,true]]]],REF).

:-recorda(readics,[unknown,mr,a,[[[prreadic,true],[readic,true]],[[csreadicc,true]]]],REF).

:-recorda(readics,[unknown,mr,a,[[[startoflesson,false]],[[approcuingtoattend,false],[approcuingtoattend,true]]]],REF).

:-recorda(readics,[unknown,mr,a,[[[startoflesson,true]],[[startonwork,false],[startonwork,true],[direction,false],[direction,true]]]],REF).
