Skip to content

Instantly share code, notes, and snippets.

@siddhartha-gadgil
Created March 21, 2014 02:58
Show Gist options
  • Select an option

  • Save siddhartha-gadgil/9678618 to your computer and use it in GitHub Desktop.

Select an option

Save siddhartha-gadgil/9678618 to your computer and use it in GitHub Desktop.
_:+_ : {A : Set} → {n : ℕ} → A → Vec A n → Vec A (succ n)
a :+ [] = a :: []
a :+ (x :: xs) = x :: (a :+ xs)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment