fact: Definition c2t'_beta `{Funext} : {bl1 : PathSquare (ap (fun y => c2t' base y) loop) loop_b 1 1 & {bl2 : PathSquare (ap (fun x => c2t' x base) loop) loop_a 1 1 & PathCube (sq_ap011 c2t' loop loop) surf bl2 bl2 bl1 bl1}}.
imports: Basics Types Cubical Spaces.Circle Spaces.Torus.Torus