prueba_while_loop.txt

DEFVAR
   FLOAT : a1;a2;a3;a4
   INT	: b1;b2
   STRING : c1;c2;c3
ENDDEF


WHILE (a1 > a2) {
  b2 := 8+2
  WHILE (a3 > a4) {
    b2 := b1*3
  }
}