Module Loko.Option

val map : ( 'S, 'F, 'G, 'T ) optic -> ( 'S Stdlib.Option.t, 'F Stdlib.Option.t, 'G Stdlib.Option.t, 'T Stdlib.Option.t ) optic

An isomorphism between options.

val elems : ( 'F Stdlib.Option.t, 'F, 'G, 'G Stdlib.Option.t ) optic

A prism over the removable optional value.

let Some 3 = L.over L.Option.elems ((+) 2) (Some 1)
let None = L.remove L.Option.elems (Some 1)
let Some 1 = L.review L.Option.elems 1