X-Git-Url: https://git.llucax.com/z.facultad/75.68/celdas.git/blobdiff_plain/1088130bd95d5a1cfad4d3fb94e835c11048db6f..5530730f6759a3c449df3e78f122084d16f825d6:/trunk/src/breve/SistemaAutonomo.tz diff --git a/trunk/src/breve/SistemaAutonomo.tz b/trunk/src/breve/SistemaAutonomo.tz index 3bcf5c1..e2fd6b8 100644 --- a/trunk/src/breve/SistemaAutonomo.tz +++ b/trunk/src/breve/SistemaAutonomo.tz @@ -37,8 +37,8 @@ Object : SistemaAutonomo { + variables: ptr (pointer). - + to init: - ptr = SistemaAutonomoNew(). + + to init with-max-pasos max-pasos = 4 (int) with-max-teorias max-teorias = 15 (int): + ptr = SistemaAutonomoNew(max-pasos, max-teorias). + to add teoria theTeoria (object): SistemaAutonomoAddTeoria(ptr, (theTeoria get-ptr)).