view Paper/src/agda/syllogism.agda.replaced @ 1:a72446879486

Init paper
author soto <soto@cr.ie.u-ryukyu.ac.jp>
date Thu, 12 Jan 2023 20:28:50 +0900 (2023-01-12)
parents
children
line wrap: on
line source
syllogism : {A B C : Set} !$\rightarrow$! ((A !$\rightarrow$! B) !$\wedge$! (B !$\rightarrow$! C)) !$\rightarrow$! (A !$\rightarrow$! C)
syllogism x a = _!$\wedge$!_.p2 x (_!$\wedge$!_.p1 x a)