case class Cons[+A](h: () => A, t: () => Stream[A]) extends Stream[A]

object Stream {


  def cons[A](hd: => A, t: => Stream[A]): Stream[A] = {
    lazy val head = hd
    lazy val tail = t
    Cons(() => head, () => tail)
  }