/* FORMUL.
Standard Formulae for Processes
Alan Bundy 16.2.81 */

formula(grazing(Comp), rate_of_grazing(Comp)) :- animal(Comp).

formula(grazing(Comp1), grazing(Comp2)) :- 
	vegetable(Comp1), animal(Comp2),
	grazes_on(Comp2,Comp1).

formula(defecation(Comp), rate_of_defecation(Comp)) :- animal(Comp).

formula(respiration(Comp),
	specific_rate_of_respiration(Comp)*biomass(Comp)
		*biomass_respiration(Comp)).

formula(growth(Comp), photosynthesis(Comp)-respiration(Comp)) :-
	vegetable(Comp).

formula(photosynthesis(Comp),
	specific_rate_of_photosynthesis(Comp)*biomass(Comp)
		*biomass_photosynthesis(Comp)).



