为什么这个洞的背景不正常化?

时间:2018-03-16 01:51:28

标签: functional-programming idris

在以下程序中:

module Bytes

import Data.Fin

%default total

Byte : Type
Byte = Fin 256

fromNat : Nat -> Byte
fromNat n = maybe FZ (\x=>x) (natToFin n 256)

toNat : Byte -> Nat
toNat FZ     = Z
toNat (FS b) = S (toNat b)

prop : (b : Byte) -> fromNat (toNat b) = b
prop FZ     = ?prop_rhs_1
prop (FS x) = ?prop_rhs_2

?prop_rhs_1未正确规范化。伊德里斯说它的背景是:

--------------------------------------
prop_rhs_1 : maybe (Delay FZ) (Delay (\x => x)) (natToFin _ 256) = FZ

请注意,它显示(natToFin _ 256)而不是(natToFin Z 256),应该标准化为Just FZ

0 个答案:

没有答案