def FR

bend-collections-laws-math@1.0.0.0 · proofs/math/typed/u64int.bend:732

import Base
import bend-collections-laws-math@1.0.0.0/src/math/u64.bend as WU

732# the value when the flag says it fits
733def FR(ok: Bool, a: WU.U64, x: Nat) -> Type:
734  match ok:
735    case True{}:
736      {v(a) == x : Nat}
737    case False{}:
738      {x == x : Nat}