Mercurial > hg > Papers > 2017 > atton-master

changeset 109:f6d00a13f923

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add ()
author atton
date Mon, 13 Feb 2017 14:11:30 +0900
parents 4b26c8020229
children 5ad74fb83f72
files paper/src/AgdaModusPonens.agda
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/paper/src/AgdaModusPonens.agda	Mon Feb 13 13:59:20 2017 +0900
+++ b/paper/src/AgdaModusPonens.agda	Mon Feb 13 14:11:30 2017 +0900
@@ -1,2 +1,2 @@
-f : {A B C : Set} -> (A -> B) × (B -> C) -> (A -> C)
-f = (\p x -> snd p ((fst p) x))
+f : {A B C : Set} -> ((A -> B) × (B -> C)) -> (A -> C)
+f = \p x -> (snd p) ((fst p) x)