Test.obn

   1 MODULE Test;
   2
   3 IMPORT Out;
   4
   5 BEGIN
   6   IF "abc" = "abc" THEN
   7     Out.String("Equal abc = abc"); Out.Ln;
   8   ELSE
   9     Out.String("WAT: MUST BE abc = abc"); Out.Ln;
  10   END;
  11
  12   IF "cba" > "abc" THEN
  13     Out.String("Great cba > abc"); Out.Ln;
  14   ELSE
  15     Out.String("WAT: MUST BE cba = abc"); Out.Ln;
  16   END;
  17
  18   IF "abc" < "bc" THEN
  19     Out.String("Less abc < bc"); Out.Ln;
  20   ELSE
  21     Out.String("WAT: MUST BE abc < bc"); Out.Ln;
  22   END;
  23 END Test.