We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent c16edad commit 24f4632Copy full SHA for 24f4632
Cubical/Data/Fin/LehmerCode.agda
@@ -191,10 +191,6 @@ encode = equivFun lehmerEquiv
191
decode : LehmerCode n → Fin n ≃ Fin n
192
decode = invEq lehmerEquiv
193
194
--- Use the one in Cubical.Data.Nat.Properties instead
195
-factorial : ℕ → ℕ
196
-factorial = _!
197
-
198
lehmerFinEquiv : LehmerCode n ≃ Fin (n !)
199
lehmerFinEquiv {zero} = isContr→Equiv isContrLehmerZero isContrFin1
200
lehmerFinEquiv {suc n} = _ ≃⟨ invEquiv lehmerSucEquiv ⟩
0 commit comments