vBind :: String -> (Value -> Value) -> Bind Nom Value
vBind x f = bind (s2n x) (f (var x))
vBind :: String -> (Value -> Value) -> Bind Nom Value
vBind x f = bind (s2n x) (f (var x))
vBind x f = bind (s2n x) (f (var x))