X-Git-Url: https://git.llucax.com/z.facultad/75.68/celdas.git/blobdiff_plain/1088130bd95d5a1cfad4d3fb94e835c11048db6f..3de9a6adae2fe5a00ec315ba34f08f6d91a5b265:/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)).