defmodule LinearCongruentialGenerator do
  def generate(_, list, counter) when counter == 0 do
    file = File.open!("result.txt", [:read, :utf8, :write])
    writeToFile(list, file)
  end
  def generate(number, list, counter) when counter > 0  do
    counter = counter-1
    newNumber = rem((number*1103515245+12345), round(:math.pow(2, 31)))
    element = [newNumber]
    generate(newNumber, list ++ element, counter)
  end

  def writeToFile(list, _) when length(list) == 0 do  end
  def writeToFile(list, file) do
    IO.puts(file, hd(list))
    IO.puts(file, " ")
    writeToFile(tl(list), file)
  end
end

LinearCongruentialGenerator.generate(15, [], 100)