Skip to content

Instantly share code, notes, and snippets.

@mizukmb
Created June 16, 2017 08:24
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save mizukmb/e649308cfd14f55e199eeba8ecdeb94c to your computer and use it in GitHub Desktop.
Save mizukmb/e649308cfd14f55e199eeba8ecdeb94c to your computer and use it in GitHub Desktop.
-- 引数の数字が 100 よりも大きいか返す関数
-- -> 数字の比較
-- -> 100よりも大きいか
gt100 :: Int -> Ordering
-- compare 1 2
-- compare 100 x
gt100 = compare 100
compare' a = gt100 a
@mizukmb
Copy link
Author

mizukmb commented Jun 23, 2017

これカリー化じゃなく部分適用

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment