head_bias([heads,tails,toss,biased,fair]). determination(heads,toss). determination(heads,biased). determination(heads,fair). determination(heads,tails). determination(heads,heads). :-set(d,100).