Skip to content

Instantly share code, notes, and snippets.

@abevoelker
Last active August 29, 2015 14:14
Show Gist options
  • Select an option

  • Save abevoelker/2899d92473d1b01fd9f9 to your computer and use it in GitHub Desktop.

Select an option

Save abevoelker/2899d92473d1b01fd9f9 to your computer and use it in GitHub Desktop.

Revisions

  1. abevoelker revised this gist Feb 23, 2015. 1 changed file with 1 addition and 1 deletion.
    2 changes: 1 addition & 1 deletion algebraic_data_type.scala
    Original file line number Diff line number Diff line change
    @@ -1,4 +1,4 @@
    sealed trait Tree[T]
    case class Empty[T]() extends Tree[T]
    case object Empty extends Tree[Nothing]
    case class Leaf[T](value: T) extends Tree[T]
    case class Node[T](left: Tree[T], right: Tree[T]) extends Tree[T]
  2. abevoelker created this gist Feb 4, 2015.
    3 changes: 3 additions & 0 deletions algebraic_data_type.hs
    Original file line number Diff line number Diff line change
    @@ -0,0 +1,3 @@
    data Tree = Empty
    | Leaf Int
    | Node Tree Tree
    4 changes: 4 additions & 0 deletions algebraic_data_type.scala
    Original file line number Diff line number Diff line change
    @@ -0,0 +1,4 @@
    sealed trait Tree[T]
    case class Empty[T]() extends Tree[T]
    case class Leaf[T](value: T) extends Tree[T]
    case class Node[T](left: Tree[T], right: Tree[T]) extends Tree[T]