assert_game_rule(is_in(X, Y), Ref):-
	asserta(location(X, Y), Ref),
	location(X, Y),
	write('didnt backtrack').

assert_game_rule(is_now(X, of(Y, Z)), [Ref1|Ref2]):-
	is_a(Y, direction),
	asserta(is_now(X, of(Y, Z)), Ref1),
	opposite(Y, OppY),
	asserta(is_now(X, of(OppY, Z)), Ref2).

assert_game_rule(X, Ref):-
	asserta(X, Ref).