logicalguess

package scalaz

final case class Dag[A](value: A, dependencies: IList[Dag[A]]){
  def toTree(implicit A: Order[A]): DagTree[A] =
    DagTree(value, dependencies.map(_.toTree))
}

object Dag {
  def single[A](a: A): Dag[A] = Dag(a, INil())