Skip to content

Instantly share code, notes, and snippets.

#!/usr/bin/python
print("hello from python")
(set-env!
:source-paths #{"src/scss" "src/clj" "src/cljs" "src/cljc"}
:resource-paths #{"html" "resources"}
:dependencies '[[org.clojure/clojure "1.10.1"]
[org.clojure/clojurescript "1.10.520"]
;; server
[compojure "1.6.1"]
[ring/ring-core "1.7.1"]
[ring/ring-jetty-adapter "1.7.1"]
let wire1 = ["R98" ; "U47" ; "R26" ; "D63" ; "R33" ; "U87" ; "L62" ; "D20" ; "R33" ; "U53" ; "R51"]
let wire2 = ["U98" ; "R91" ; "D20" ; "R16" ; "D67" ; "R40" ; "U7" ; "R15" ; "U6" ; "R7"]
type point = {
x : float ;
y : float
}
type line = {
p1 : point ;
let increasing (chr_lst : char list) =
List.fold_left
(fun last_int chr ->
if last_int >= 0 then
let chr_int = int_of_string (String.make 1 chr) in
if last_int <= chr_int then
chr_int
else
(-1)
else
This file has been truncated, but you can view the full file.
127.0.0.1 000001.ink
127.0.0.1 0001interac.com
127.0.0.1 00043138.com
127.0.0.1 00053138.com
127.0.0.1 00056789.com
127.0.0.1 00063138.com
127.0.0.1 000877009webmaster.000webhostapp.com
127.0.0.1 00093138.com
127.0.0.1 000jq3q.rxportalhosting.com
127.0.0.1 000lohc.wcomhost.com