make arguments of some definitions implicit in cubical.square

2018-09-05 14:45:03 +02:00 · 2018-09-05 14:45:03 +02:00 · 8d2da84b61
commit 8d2da84b61
parent c5d31f76d7
1 changed files with 1 additions and 0 deletions
--- a/hott/cubical/square.hlean
+++ b/hott/cubical/square.hlean
@ -552,6 +552,7 @@ namespace eq

  definition square_fill_r : Σ (p : a₂₀ = a₂₂) , square p₁₀ p₁₂ p₀₁ p :=
  by induction p₁₀; induction p₁₂; exact ⟨_, !hrefl⟩
+  variables {p₁₀ p₁₂ p₀₁ p₂₁}

  /- Squares having an 'ap' term on one face -/
  --TODO find better names