diff options
Diffstat (limited to 'src/CoqUp/Helper.v')
-rw-r--r-- | src/CoqUp/Helper.v | 21 |
1 files changed, 0 insertions, 21 deletions
diff --git a/src/CoqUp/Helper.v b/src/CoqUp/Helper.v deleted file mode 100644 index 292d011..0000000 --- a/src/CoqUp/Helper.v +++ /dev/null @@ -1,21 +0,0 @@ -Module Option. - -Definition default {T : Type} (x : T) (u : option T) : T := - match u with - | Some y => y - | _ => x - end. - -Definition map {S : Type} {T : Type} (f : S -> T) (u : option S) : option T := - match u with - | Some y => Some (f y) - | _ => None - end. - -Definition liftA2 {T : Type} (f : T -> T -> T) (a : option T) (b : option T) : option T := - match a with - | Some x => map (f x) b - | _ => None - end. - -End Option. |