k47.cz
mastodon twitter RSS
bandcamp explorer

birthdays.scala

— k47 (CC by)
// Scala version of http://www.cs.nyu.edu/~michaels/screencasts/Java_vs_K/Java_vs_K.html

// Java 36 řádků
// Scala: 10 řádků
// J: 44 velice kryptických znaků

val people = 10
val days = 365
val sampleSize = 1000

var t = for {
  k <- 0 until sampleSize
  bdays = Array.fill(people)(util.Random.nextInt(days))
} yield if (bdays.distinct.size != bdays.size) 1 else 0

println(t.sum)
píše k47, ascii@k47.cz