Add new indexing functions

This commit is contained in:
Kiana Sheibani 2022-08-29 13:55:55 -04:00
parent 9ece7e6963
commit 3246e0ed94
Signed by: toki
GPG key ID: 6CB106C25E86A9F7
3 changed files with 81 additions and 37 deletions

View file

@ -65,6 +65,6 @@ power (S n@(S _)) x = x *. power n x
||| number power.
|||
||| This is the operator form of `power`.
public export
public export %inline
(^) : MultGroup a => a -> Nat -> a
(^) = flip power
a ^ n = power n a