Luca Antiga lantiga
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| # Copyright (c) 2010, Luca Antiga, Orobix Srl. | |
| # All rights reserved. | |
| # | |
| # Redistribution and use in source and binary forms, with or without | |
| # modification, are permitted provided that the following conditions are | |
| # met: | |
| # | |
| # * Redistributions of source code must retain the above copyright | |
| # notice, this list of conditions and the following disclaimer. | |
| # |
lantiga
/ let-map.clj
Last active
October 11, 2015 17:58
let-map macro (creating a map using a let form) and map-let (using a map to establish local bindings in a let form)
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (defmacro let-map | |
| "Takes a binding form (as in let) and returns a map of (keywordized) | |
| binding names and bound values. It allows to construct a map sequentially. | |
| Usage: | |
| (let-map [a 1 b (+ a 1)]) | |
| => {:a 1 :b 2}" | |
| [kv] | |
| (let [ks (map keyword (take-nth 2 kv))] | |
| `(let [~@kv] | |
| (into {} (map vec (partition 2 (interleave '~ks (take-nth 2 ~kv)))))))) |
lantiga
/ archimedes-test.project.clj
Last active
May 24, 2016 19:38
Working setup and sample Clojure code for Archimedes and Ogre (http://clojurewerkz.org/) on OrientDB 1.3 (http://orientdb.org/) via Blueprints (https://github.com/tinkerpop/blueprints/wiki).
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (defproject archimedes-test "0.1.0-SNAPSHOT" | |
| :description "FIXME: write description" | |
| :url "http://example.com/FIXME" | |
| :license {:name "Eclipse Public License" | |
| :url "http://www.eclipse.org/legal/epl-v10.html"} | |
| :dependencies [[org.clojure/clojure "1.5.1"] | |
| [com.orientechnologies/orient-commons "1.3.0"] | |
| [com.orientechnologies/orientdb-core "1.3.0"] | |
| [com.tinkerpop.blueprints/blueprints-orient-graph "2.3.0"] | |
| [clojurewerkz/ogre "2.3.0.1"] |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (ns asyncatom.core | |
| (:require [clojure.core.async :refer [chan go <! >! <!!]]) | |
| (:refer-clojure :exclude [atom swap! reset! compare-and-set! deref])) | |
| (defn atom [v] | |
| (let [c (chan)] | |
| (go | |
| (loop [v v] | |
| (let [[cmd oc & args] (<! c) | |
| v (condp = cmd |
lantiga
/ react_ki
Last active
August 29, 2015 13:56
ki port of the official React tutorial: http://facebook.github.io/react/docs/tutorial.html. See ki at https://github.com/lantiga/ki.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| ki -o react_ki.out.js react_ki.js |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| ki macro (export $name $val) | |
| (js exports.$name = $val) | |
| ki require core | |
| // Ported from https://github.com/clojure/clojurescript/blob/master/src/cljs/clojure/data.cljs | |
| ki (ns diff |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (ns carla.core | |
| (:require [clojure.math.combinatorics :as combo])) | |
| (defn- fact-matches? [fact match] | |
| (= match (select-keys fact (keys match)))) | |
| (defn make-rules [] []) | |
| (defn make-session [] {:facts #{}}) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| ### Keybase proof | |
| I hereby claim: | |
| * I am lantiga on github. | |
| * I am lantiga (https://keybase.io/lantiga) on keybase. | |
| * I have a public key whose fingerprint is C364 40F7 E6D0 2B02 AF9C FC34 BE4B 71AA 57A8 4B6A | |
| To claim this, I am signing this object: |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| class Vmtk < Formula | |
| desc "The Vascular Modeling Toolkit" | |
| homepage "http://www.vmtk.org" | |
| url "https://github.com/vmtk/vmtk/archive/v1.3.2.tar.gz" | |
| version "1.3.2" | |
| sha256 "2632a74341605bd3ddd97971fad70941329e77a112f9363bc5053a1e2ba7c30e" | |
| head "https://github.com/vmtk/vmtk.git" | |
| revision 1 | |
| # bottle do |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| import torch | |
| import torch.nn as nn | |
| from torch.autograd import Variable | |
| from graphviz import Digraph | |
| def name(node, annotation=None): | |
| kind = node.kind() |
OlderNewer