fact: Definition O_monad_strength_assoc1 (A B C : Type) : O_functor (equiv_prod_assoc A B C)^-1 o O_monad_strength (A*B) C == O_monad_strength A (B*C) o functor_prod idmap (O_monad_strength B C) o (equiv_prod_assoc A B (O C))^-1.
imports: HoTT.Basics HoTT.Types Equiv.BiInv Extensions HProp HFiber NullHomotopy Limits.Pullback PathAny Colimits.Pushout