PROGRAM  "progname"
VERSION "0.0000"

IMPORT  "xma"   'required for POWER

DECLARE FUNCTION  Entry ()

FUNCTION  Entry ()
    PRINT "0 ^ 0 = "; 0 ** 0
    PRINT "0 ^ 0 = "; POWER(0, 0)
END FUNCTION
END PROGRAM