18 lines
323 B
Plaintext
18 lines
323 B
Plaintext
a: to :rational [1 2]
|
|
b: to :rational [3 4]
|
|
|
|
print ["a:" a]
|
|
print ["b:" b]
|
|
|
|
print ["a + b :" a + b]
|
|
print ["a - b :" a - b]
|
|
print ["a * b :" a * b]
|
|
print ["a / b :" a / b]
|
|
print ["a // b :" a // b]
|
|
print ["a % b :" a % b]
|
|
|
|
print ["reciprocal b:" reciprocal b]
|
|
print ["neg a:" neg a]
|
|
|
|
print ["pi ~=" to :rational 3.14]
|