module Value import Term import Misc %default total public export data NF : Type where NType : NF NDef : Name -> NF NLam : NF -> (Term 1 -> PI NF) -> NF