Basic components:
1. Meteo which allows to watch the solar activity during a year (it is based on the data of the model Cedar Bog)
DYNAMIC BEHAVIOUR
suns:= 95.9[kJ/m^2] * (1+0.635 * SIN (2[1/d] * Pi *T/365));
WHENEVER T >= TNext DO
sun^:= suns - Oblako;
TNext^:= TNext + 1[d];
END
END OF Meteo
2. Forage. Norms and diets of feeding are defined in it.
DYNAMIC BEHAVIOUR
sun_bio:= sun * Bio_Fac;
WHENEVER T >= TNext DO
TNext^:= TNext +1[d];
Seno^:= 9 * Numb_young + 14 * Numb_old;
Silos^:= 8 * Numb_young + 12 * Numb_old;
Kombicorm^:= 5 * Numb_young + 7 * Numb_old;
Koncentrat^:= 2 * Numb_young + 3 * Numb_old;
Fosfat^:= 0.04 * Numb_young + 0.06 * Numb_old;
Sol^:= 0.03 * Numb_young + 0.05 * Numb_old;
END
DIFFERENTIAL EQUATIONS
p':= sun_bio - 4.03[1/a] * p;
BioMassa':= 0.48[1/a] * p - 17.87[1/a] * BioMassa;
END
END OF Forage