ProofNat.Bool.disc_ft: def of lawful-words@0.1.0.0
Import: import lawful-words@0.1.0.0/proof_nat.bend as ProofNat
Lines 10-15 of lawful-words@0.1.0.0/proof_nat.bend: https://jend.leeeet.dev/read.txt?path=lawful-words@0.1.0.0/proof_nat.bend&start_line=10&end_line=15

import Base

def Bool.disc_ft(b: Bool) -> Type:
  match b:
    case False{}:
      Unit
    case True{}:
      Empty

Uses (3):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Empty
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Unit