Andre Dublin andredublin

I hereby claim:

To claim this, I am signing this object:

	(defn parse-int [s] (Integer/parseInt s))

	(defn chunk-lines-by-blank
	"Given a seq of lines, assumes that chunks of lines are separated by a blank line
	(a line containing only white space) and returns a seq of those chunks
	(with each chunk being its own seq of lines)"
	[lines]
	(->> lines
	(partition-by clojure.string/blank?)
	(filter (fn [c]

	Day 1
	let solve () =
	let list = File.ReadLines("input.txt") \|> Seq.map (fun str -> (int str)) \|> Seq.toArray
	let rec loop n rest=
	let found = list \|> Array.tryFind(fun value -> value + n = 2020)
	if found.IsSome then printfn "%A" (found.Value * n)
	else loop (Array.head rest) (Array.tail rest)

	loop (Array.head list) (Array.tail list)

	Paket version 5.194.0
	Starting full restore process.
	Performance:
	- Disk IO: 1 minute, 1 second
	- Runtime: 1 minute, 7 seconds
	This runner is now obsolete with FAKE 5, please upgrade to the new .Net Core runner. See https://fake.build/fake-migrate-to-fake-5.html
	To remove this warning you can append the '--removeLegacyFakeWarning' argument or set the 'FAKE_NO_LEGACY_WARNING' environment variable to 'true'
	Building project with version: LocalBuild
	Shortened DependencyGraph for Target Build:
	<== Build

	pragma solidity ^0.4.23;

	import "./Ownable.sol";

	contract MyToken is Ownable {
	mapping (address => bool) public agents;

	modifier onlyAgent {
	require(agents[msg.sender]);
	_;

	pragma solidity ^0.4.23;

	import "./MyToken.sol";

	contract Agent {
	MyToken token;

	constructor(MyToken _token) public {
	token = _token
	}