@use Control.
@use SistemaAutonomo.

Controller SistemaAutonomoController.

Control : SistemaAutonomoController {

	+ to init:
		teorias (list).
		sa (object).

		sa = new SistemaAutonomo.
		teorias = 3 new Teorias.
		teorias{0} init named "t1" with-action 1.
		teorias{1} init named "t2" with-action 2.
		teorias{2} init named "t3" with-action 3.

		(teorias{0}) add-dato-inicial name "sensor1" value 10.5.
		(teorias{0}) add-dato-inicial name "sensor2" value 0.5.
		(teorias{1}) add-dato-inicial name "sensor1" value 0.5.
		(teorias{1}) add-dato-inicial name "sensor2" value 10.5.
		(teorias{2}) add-dato-inicial name "sensor1" value 5.5.
		(teorias{2}) add-dato-inicial name "sensor2" value 5.5.

		sa add teoria (teorias{0}).
		sa add teoria (teorias{1}).
		sa add teoria (teorias{2}).

		free teorias{0}.
		free teorias{1}.
		free teorias{2}.
		free sa.

}