Real constants and functions: Difference between revisions

Content added Content deleted
(→‎{{header|Tcl}}: + pi = acos(-1))
Line 439: Line 439:
=={{header|Tcl}}==
=={{header|Tcl}}==
<lang tcl>expr {exp(1)} ;# e
<lang tcl>expr {exp(1)} ;# e
expr {4 * atan(1)} ;# pi
expr {4 * atan(1)} ;# pi -- also, simpler: expr acos(-1)
expr {sqrt($x)} ;# square root
expr {sqrt($x)} ;# square root
expr {log($x)} ;# natural logarithm, also log10
expr {log($x)} ;# natural logarithm, also log10