kei-q

Warming up --------------------------------------
    rewrite2 && full     9.576k i/100ms
     rewrite && full     9.081k i/100ms
        orig && full     8.088k i/100ms
Calculating -------------------------------------
    rewrite2 && full    100.151k (± 4.4%) i/s -    507.528k in   5.078509s
     rewrite && full     94.131k (± 5.0%) i/s -    472.212k in   5.030891s
        orig && full     83.549k (± 3.9%) i/s -    420.576k in   5.041819s

Comparison:

kei-q

import Cocoa

extension Sequence where Iterator.Element == CGFloat {
    func normalize() -> [Iterator.Element] {
        let maxVal = reduce(0) { $0 < $1 ? $1 : $0 }
        return map { $0 / maxVal }
    }
}

kei-q

解法について

それぞれの横線があるところで、そこにいる人が場所を入れ替わる。 また両名ともその横線を通っているはず。

*Solver> swap ['A'..'H'] '2'
("ACBDEFGH","BC")

kei-q

let rightTriangles = {
    (1...10).flatMap { c in
        (1...c).flatMap { a in
            (1...a).flatMap { b in
                (a,b,c)
            }
        }
    }.filter { (a,b,c) in
        let b1 = a*a + b*b == c*c
        let b2 = a+b+c == 24

kei-q

#!/usr/bin/env ruby

require 'json'

template_name = ARGV[0]
contents = File.read(template_name)
json = JSON.parse(contents, symbolize_names: true)

def traverse(hash, &block)
  hash.each {|key, value|

kei-q

#!/usr/bin/env ruby
# require: awesome_print, rubocop

require 'ap'
require 'json'

if ARGV.count != 2
  puts 'usage: ./script.rb <input_json_file> <output_sour_file_name>'
  exit 1
end

kei-q

main :: IO () 
main = do
  return $ zip [1..] [1..]
  putStrLn "hoge"

fib1 = 1 : 1 : zipWith (+) fib1 (tail fib1)

fib2 0 = 1
fib2 1 = 1

kei-q

import System.Random

main = getStdGen >>= putStrLn . mconcat . go 0 . randomRs (0,1)

go n (1:_) | 4<=n = ["ドコキ・ヨ・シ！"]
go n (x:xs) = ["ドコ","ズン"]!!x : go ((n+1)*x) xs

kei-q

hoge

aaa

• a
• b
• c

kei-q

❯ erl
Erlang/OTP 17 [erts-6.4] [source] [64-bit] [smp:8:8] [async-threads:10] [hipe] [kernel-poll:false] [dtrace]

Eshell V6.4  (abort with ^G)
1> c(band_supervisor).
{ok,band_supervisor}
2> band_supervisor:start_link(jamband).
{ok,<0.39.0>}
3> {ok, Pid} = supervisor:start_child(band_supervisor, [djembe,good]).
Musician Wanda Ann, playing the djembe entered the room