2015-08-12 01:43:42 +00:00
|
|
|
import data.rat
|
|
|
|
|
open rat
|
|
|
|
|
|
2015-10-14 01:35:16 +00:00
|
|
|
check (4.0:rat)
|
|
|
|
|
check (2.3:rat)
|
|
|
|
|
check (1.00:rat)
|
|
|
|
|
check (10.213:rat)
|
|
|
|
|
|
|
|
|
|
check -(0.3:rat)
|
|
|
|
|
check (10.213:rat)
|
|
|
|
|
check (2.3:rat)
|
|
|
|
|
check (1.0:rat)
|
2015-08-12 01:43:42 +00:00
|
|
|
|
2015-10-14 01:35:16 +00:00
|
|
|
eval (λ v, (1.0:rat)) (2:nat)
|
