RosettaCodeData/Task/Arithmetic-Complex/Pop11/arithmetic-complex.pop11
Ingy döt Net d066446780 langs a-z
2013-04-10 22:43:41 -07:00

19 lines
201 B
Text

lvars a = 1.0 +: 1.0, b = 2.0 +: 5.0 ;
a+b =>
a*b =>
1/a =>
a-b =>
a-a =>
a/b =>
a/a =>
;;; The same, but using exact values
1 +: 1 -> a;
2 +: 5 -> b;
a+b =>
a*b =>
1/a =>
a-b =>
a-a =>
a/b =>
a/a =>