2018-06-26 20:11 GMT+02:00 Marco Maggesi <marco.magg...@unifi.it>:
> # REWRITE_CONV[PORTIA; EXISTS_BOOL_THM]
> `?ig is. (ig <=> ~pg) /\ (is <=> (ig <=> ~is))`;;
>
> val it : thm = |- (?ig is. (ig <=> ~pg) /\ (is <=> ig <=> ~is)) <=> pg
>
Sorry, I made a mistake (thm PORTIA in the rewrite). Here is the
corrected version:
# REWRITE_CONV[EXISTS_BOOL_THM]
`?ig is. (ig <=> ~pg) /\ (is <=> (ig <=> ~is))`;;
val it : thm = |- (?ig is. (ig <=> ~pg) /\ (is <=> ig <=> ~is)) <=> pg
------------------------------------------------------------------------------
Check out the vibrant tech community on one of the world's most
engaging tech sites, Slashdot.org! http://sdm.link/slashdot
_______________________________________________
hol-info mailing list
hol-info@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/hol-info
