Spectral/susp_product.hlean

6 lines
153 B
Text
Raw Normal View History

2017-06-07 00:09:19 +00:00
import core
open susp smash pointed wedge prod
2017-06-07 15:38:33 +00:00
definition susp_product (X Y : Type*) : ⅀ (X × Y) ≃* ⅀ X (⅀ Y ⅀ (X ∧ Y)) :=
2017-06-07 00:09:19 +00:00
sorry