Mercurial > cpdt > repo

comparison src/Subset.v @ 76:82a2189fa283

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Spell check
author Adam Chlipala <adamc@hcoop.net>
date Fri, 03 Oct 2008 15:11:44 -0400
parents ec2c1830a7a1
children d07c77659c20
comparison
equal deleted inserted replaced
75:ec2c1830a7a1 76:82a2189fa283
231 | O => fun _ => False_rec _ _ 231 | O => fun _ => False_rec _ _
232 | S n' => fun _ => exist _ n' _ 232 | S n' => fun _ => exist _ n' _
233 end); crush. 233 end); crush.
234 Defined. 234 Defined.
235 235
236 (** We end the "proof" with [Defined] instead of [Qed], so that the definition we constructed remains visible. This contrasts to the case of ending a proof with [Qed], where the details of the proof are hidden afterward. Let us see what our prooof script constructed. *) 236 (** We end the "proof" with [Defined] instead of [Qed], so that the definition we constructed remains visible. This contrasts to the case of ending a proof with [Qed], where the details of the proof are hidden afterward. Let us see what our proof script constructed. *)
237 237
238 Print pred_strong4. 238 Print pred_strong4.
239 (** [[ 239 (** [[
240 240
241 pred_strong4 = 241 pred_strong4 =