/* ANIMAS

Formula for biomass of a animal

Alan Bundy, 8.9.83 */


isform(animas, situation(Animal, Vegetable, Time),
			d(BioMass)/d(T) =  Food - Energy)
	:- ncc grazes(Animal,Vegetable),
	   cc biomass(Animal,Time,BioMass),
	   cc clocktime(Time,T),
	   cc respiration(Animal,Time,Energy),
	   cc grazing(Animal,Vegetable,Time,Food).

prepare(animas, BM, biomass, biomass(A,T,BM), situation(A,V,T))
	:- ncc grazes(A,V).		% form situation in most direct way

relates(animas, [biomass]).	% animas relates only biomasses

preference(animas,1).	% animas is a first preference formula


