/* VEGMAS

Formula for biomass of a vegatable

Alan Bundy, 7.9.83 */


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

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

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

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


