INT d: VAL pi IS 3: VAL r IS d / 2: -- d can't be calculated at compile time INT a: INT c: SEQ stdin ? d INT r2 = r * r: PAR a := pi * r2 c := pi * d stdout ! c stdout ! a