Skip to content

Instantly share code, notes, and snippets.

/gist:4269466

Created December 12, 2012 16:53
Show Gist options
  • Save anonymous/4269466 to your computer and use it in GitHub Desktop.
Save anonymous/4269466 to your computer and use it in GitHub Desktop.
Download ZIP

Revisions

  1. @invalid-email-address Anonymous created this gist Dec 12, 2012.
    4 changes: 4 additions & 0 deletions gistfile1.clj
    View file
    Original file line number Diff line number Diff line change
    @@ -0,0 +1,4 @@
    (defc numberc [x]
    (number? x))

    (unifier '(?x) '(1) :when {'?x numberc})