]> git.llucax.com Git - z.facultad/75.68/celdas.git/blobdiff - trunk/src/breve/SistemaAutonomo.tz
Agrega un modo de salida intentando que sea más fácil generar tablas con la evolución...
[z.facultad/75.68/celdas.git] / trunk / src / breve / SistemaAutonomo.tz
index 3bcf5c11da3d77103f89c0140f0679115c7953cf..e2fd6b8e1f944ab70d4335d8445cfba475735269 100644 (file)
@@ -37,8 +37,8 @@ Object : SistemaAutonomo {
        + variables:\r
                ptr (pointer).\r
 \r
-       + to init:\r
-               ptr = SistemaAutonomoNew().     \r
+       + to init with-max-pasos max-pasos = 4 (int) with-max-teorias max-teorias = 15 (int):\r
+               ptr = SistemaAutonomoNew(max-pasos, max-teorias).\r
                \r
        + to add teoria theTeoria (object):\r
                SistemaAutonomoAddTeoria(ptr, (theTeoria get-ptr)).\r