source
Equations instToStringBool = { toString := fun b => bif b then "true" else "false" } Equations instToStringDecidable = {
toString := fun h =>
match h with
| isTrue h => "true"
| isFalse h => "false" } Equations One or more equations did not get rendered due to their size. Instances For Equations instToStringList = { toString := List.toString } Equations instToStringULift = { toString := fun v => toString v .down } Equations One or more equations did not get rendered due to their size. Instances For Equations One or more equations did not get rendered due to their size. Equations instToStringProd = {
toString := fun x =>
match x with
| (a , b ) => "(" ++ toString a ++ ", " ++ toString b ++ ")" } Equations instToStringSigma = {
toString := fun x =>
match x with
| { fst := a , snd := b } => "⟨" ++ toString a ++ ", " ++ toString b ++ "⟩" } Equations instToStringSubtype = { toString := fun s => toString s .val } Equations One or more equations did not get rendered due to their size.