Added 'un'. Started generalizing Nat to (i -> j) -> (i -> j) -> *