MODULE Test; IMPORT Out; BEGIN Out.String("A"); Out.Char("A"); Out.Ln; ASSERT("A" = 041X); ASSERT(041X = "A"); ASSERT(ORD("A") = 041H); ASSERT(041H = ORD("A")); ASSERT("A" = "A"); END Test.