have h := insertRatUnits_postcondition f hf units ⟨li.1, li.2.2⟩
case mk.mk.refl
n : Nat
f : DefaultFormula n
hf : f.ratUnits = #[] ∧ f.assignments.size = n
units : List (Literal (PosFin n))
i j : Fin (f.insertRatUnits units).fst.ratUnits.size
i_ne_j : i ≠ j
li : PosFin n
bi : Bool
hi : (f.insertRatUnits units).fst.ratUnits[i] = (li, bi)
hj : (f.insertRatUnits units).fst.ratUnits[j] = (li, bi)
⊢ False
case mk.mk.refl
n : Nat
f : DefaultFormula n
hf : f.ratUnits = #[] ∧ f.assignments.size = n
units : List (Literal (PosFin n))
i j : Fin (f.insertRatUnits units).fst.ratUnits.size
i_ne_j : i ≠ j
li : PosFin n
bi : Bool
hi : (f.insertRatUnits units).fst.ratUnits[i] = (li, bi)
hj : (f.insertRatUnits units).fst.ratUnits[j] = (li, bi)
h :
  let assignments_i := (f.insertRatUnits units).fst.assignments[↑⟨li.val, ⋯⟩];
  let original_assignments_i := f.assignments[↑⟨li.val, ⋯⟩];
  (assignments_i = original_assignments_i ∧
      ∀ (j : Fin (f.insertRatUnits units).fst.ratUnits.size),
        (f.insertRatUnits units).fst.ratUnits[j].fst.val ≠ ↑⟨li.val, ⋯⟩) ∨
    (∃ j b i_gt_zero,
        (f.insertRatUnits units).fst.ratUnits[j] = (⟨↑⟨li.val, ⋯⟩, ⋯⟩, b) ∧
          assignments_i = addAssignment b original_assignments_i ∧
            ¬hasAssignment b original_assignments_i = true ∧
              ∀ (k : Fin (f.insertRatUnits units).fst.ratUnits.size),
                k ≠ j → (f.insertRatUnits units).fst.ratUnits[k].fst.val ≠ ↑⟨li.val, ⋯⟩) ∨
      ∃ j1 j2 i_gt_zero,
        (f.insertRatUnits units).fst.ratUnits[j1] = (⟨↑⟨li.val, ⋯⟩, ⋯⟩, true) ∧
          (f.insertRatUnits units).fst.ratUnits[j2] = (⟨↑⟨li.val, ⋯⟩, ⋯⟩, false) ∧
            assignments_i = both ∧
              original_assignments_i = unassigned ∧
                ∀ (k : Fin (f.insertRatUnits units).fst.ratUnits.size),
                  k ≠ j1 → k ≠ j2 → (f.insertRatUnits units).fst.ratUnits[k].fst.val ≠ ↑⟨li.val, ⋯⟩
⊢ False