added 1fundamentalgroup quest 3

This commit is contained in:
Jlh18 2021-10-30 20:58:27 +01:00
parent 5ff2b6837e
commit 334bb6eace
2 changed files with 2 additions and 2 deletions

View File

@ -4,6 +4,6 @@ open import Cubical.Foundations.Prelude
open import Cubical.HITs.S1
open import 1FundamentalGroup.Quest1Solutions
outOfS¹ : (B : Type) (b : B base) b b (x : ) B x
outOfS¹ : (B : Type) (b : B base) PathP (λ i B (loop i)) b b (x : ) B x
outOfS¹ B b p base = b
outOfS¹ B b p (loop i) = {!p i!}
outOfS¹ B b p (loop i) = p i