SgdPROOF.ne_succ: def of bendtorch-core@0.1.0.0
Import: import bendtorch-core@0.1.0.0/src/autograd/sgd_PROOF.bend as SgdPROOF
Lines 107-113 of bendtorch-core@0.1.0.0/src/autograd/sgd_PROOF.bend: https://jend.leeeet.dev/read.txt?path=bendtorch-core@0.1.0.0/src/autograd/sgd_PROOF.bend&start_line=107&end_line=113

import Base

# A list of n nodes never has id n + 1 + extra at its head.
def ne_succ(+number: Nat, -extra: Nat) -> {False{} == Nat.is_eq(number, 1n+Nat.add(number, extra)) : Bool}:
  match number:
    case 0n:
      {==}
    case 1n+rest:
      ne_succ(rest, extra)

Uses (4):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat.add
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat.is_eq