Data update

Task/Real-constants-and-functions/XBasic/real-constants-and-functions.basic

@@ -1,4 +1,4 @@
-PROGRAM	"progname"
+PROGRAM	"realcaf"
 VERSION  "0.0000"
 
 IMPORT	"xma"
@@ -9,15 +9,12 @@ DECLARE FUNCTION Floor (x)
 
 FUNCTION  Entry ()
   DOUBLE e, pi, x, y
-
   e = EXP(1)
   PRINT "e     = "; e          ' e  not available
   pi = 4 * ATAN(1)
   PRINT "pi    = "; pi         ' pi not available
-
   x = 12.345
   y = 1.23
-
   PRINT "sqrt  = "; SQRT (x)   ' square root
   PRINT "ln    = "; LOG (x)    ' natural logarithm base e
   PRINT "log10 = "; LOG10 (x)  ' base 10 logarithm