view paper/src/AgdaModusPonens.agda @ 109:f6d00a13f923

Add ()
author atton
date Mon, 13 Feb 2017 14:11:30 +0900
parents 9d154c48a1f6
children
line wrap: on
line source

f : {A B C : Set} -> ((A -> B) × (B -> C)) -> (A -> C)
f = \p x -> (snd p) ((fst p) x)