/* Maxima computer algebra system */

print ("mumble");

/* this
  /* this is
    /* this is a nested comment */ nested comment
   */ comment
 */

sin(%pi); /* should be highlighted again */

/* programming keywords */

if a then b elseif c then d else f;
for x:1 thru 10 step 2 do print(x);
for z:-2 while z < 0 do print(z);
for m:0 unless m > 10 do print(m);
for x in [1, 2, 3] do print(x);
foo and bar or not baz;

/* different kinds of integers */

ibase : 18 $
[0, 1234, 1234., 0abcdefgh];
reset (ibase) $

/* strings */

s1 : "\"now\" is";
s2 : "the 'time' for all good men";
print (s1, s2, "to come to the aid",
  "of their country");

/* expressions */

foo (x, y, z) :=
  if x > 1 + y
    then z - x*y
  elseif y <= 100!
    then x/(y + z)^2
  else z - y . x . y;