comparison src/Large.v @ 445:0650420c127b

Finished vertical spacing
author Adam Chlipala <adam@chlipala.net>
date Wed, 01 Aug 2012 17:31:56 -0400
parents 8077352044b2
children 980962258b49
comparison
equal deleted inserted replaced
444:0d66f1a710b8 445:0650420c127b
191 191
192 << 192 <<
193 Error: Expects a disjunctive pattern with 3 branches. 193 Error: Expects a disjunctive pattern with 3 branches.
194 >> 194 >>
195 *) 195 *)
196
197 Abort. 196 Abort.
198 197
199 (** Unsurprisingly, the old proof fails, because it explicitly says that there are two inductive cases. To update the script, we must, at a minimum, remember the order in which the inductive cases are generated, so that we can insert the new case in the appropriate place. Even then, it will be painful to add the case, because we cannot walk through proof steps interactively when they occur inside an explicit set of cases. *) 198 (** Unsurprisingly, the old proof fails, because it explicitly says that there are two inductive cases. To update the script, we must, at a minimum, remember the order in which the inductive cases are generated, so that we can insert the new case in the appropriate place. Even then, it will be painful to add the case, because we cannot walk through proof steps interactively when they occur inside an explicit set of cases. *)
200 199
201 Theorem eval_times : forall k e, 200 Theorem eval_times : forall k e,
560 Lemma slow' : forall x y, P x y -> Q x y -> S x y -> f x = f y. 559 Lemma slow' : forall x y, P x y -> Q x y -> S x y -> f x = f y.
561 Time eauto 6. 560 Time eauto 6.
562 (** << 561 (** <<
563 Finished transaction in 2. secs (1.264079u,0.s) 562 Finished transaction in 2. secs (1.264079u,0.s)
564 >> 563 >>
565 564 %\vspace{-.15in}%Why has the search time gone up so much? The [info] command is not much help, since it only shows the result of search, not all of the paths that turned out to be worthless. *)
566 Why has the search time gone up so much? The [info] command is not much help, since it only shows the result of search, not all of the paths that turned out to be worthless. *)
567 565
568 (* begin thide *) 566 (* begin thide *)
569 Restart. 567 Restart.
570 info eauto 6. 568 info eauto 6.
571 (** %\vspace{-.15in}%[[ 569 (** %\vspace{-.15in}%[[