printa([H|T]) :- !, printPairs([H|T]). 
printa(S) :- 
	functor(S,F,_), 
	about(F,_,Fields,S,_), 
	printPairs(Fields).