Commit 9785331f authored by Ralf Jung's avatar Ralf Jung

demo unparallel processing

parent 6a39300e
......@@ -1070,6 +1070,7 @@ Qed.
Next Obligation. by intros F1 F2 A B [??]; rewrite /= !rFunctor_id. Qed.
Next Obligation.
intros F1 F2 A1 A2 A3 B1 B2 B3 f g f' g' [??]; simpl.
do 10000 try tauto.
by rewrite !rFunctor_compose.
Notation "F1 * F2" := (prodRF F1%RF F2%RF) : rFunctor_scope.
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment