{motive : Lean.Expr → Sort u} →
  (t : Lean.Expr) →
    ((u : Lean.Level) → motive (Lean.Expr.sort u)) →
      ((fn arg : Lean.Expr) → motive (fn.app arg)) → (Nat.hasNotBit 40 t.ctorIdx → motive t) → motive t