Infinity-Profan

//Examples of zeilenweises- and zeilenübergreifendes write:
print "Dies is
one Text with of/ one
Stringkonstante with
Zeilenumbrüchen"
print "Dies is\No Text with of/ one \nStringkonstante with\nZeilenumbrüchen."
print 10+20;print 30+40
print 10+20
print 30+40
print (10
+20
+30)
print (10+20+30)

a=10
a=10,b=10
a=10 b=10

a[0]=10
a.0=10
//
a["test"]["test"]=10
a.Test.Test=10
//
b=[10,20,30]
//
c=["Hallo"=10,"Welt"=["pt2"=20,"pt3"=30]]

// InfinityProfan Program v0.7.12
var str_text = "mm"
var str_leer = ""
var str_zero = "0"
var str_zahl = "900"
var null_var = zero
var a = 3
var b = 4
print "??? rumwurzeln ???"
print "Die simple Variante /too with Space-Operator."
print "  c = " + st(sqrt(a*a+b*b))// gives 5 = root 25 from
print "  c = " + st sqrt a*a+b*b// gives 5
print "  c = " + sqrt a*a+b*b// gives 5
print "Jetzt goes it schief: "
print "          c = " + sqrt a*a+b*b + "mm"// gives NaN hardship a Number because of "mm"
print "Da goes what! "
print "  c = " + sqrt a*a+b*b + ""// gives 5 from
print "  c = " + sqrt a*a+b*b + "0"// gives 15.8.. = root 250 from
print "  c = " + sqrt a*a+b*b + "900"// gives 16.9.. = root 25900 from
print "  c = " + sqrt a*a+b*b + zero// gives 5 from
print "... without root ..."
print a*a+b*b + str_text// gives 25mm from
print a*a+b*b + str_leer// gives 25 from
print a*a+b*b + str_zero// gives 250 from
print a*a+b*b + str_zahl// gives 25900 from
print a*a+b*b + null_var// gives 25 from
print " ... with root ..."
print "  c = " + sqrt a*a+b*b + str_text// gives NaN from
print "  c = " + sqrt a*a+b*b + str_leer// gives 5 from
print "  c = " + sqrt a*a+b*b + str_zero// gives 15.8.. = root 250 from
print "  c = " + sqrt a*a+b*b + str_zahl// gives 16.9.. = root 25900 from
print "  c = " + sqrt a*a+b*b + null_var// gives 5 from
print "---------------------------------
"
print "So ought to it his: "
print  "     c = " + sqrt(a*a+b*b) + "mm"// gives 5mm from...here Klammer necessary!
//
// ... as long as tappt im dunkeln still in the XProfan.api missing BETA !

proc sqrt(p1)

    return math(math.sqrt,p1)

endproc