Sha256: 150987764c8f50fa260697b857cb05f8a3a88c23f2f15318d0c327f024761c9b

Contents?: true

Size: 243 Bytes

Versions: 68

Compression:

Stored size: 243 Bytes

Contents

open Core_kernel

type 'a t = { value : 'a; left : 'a t option; right : 'a t option }
  [@@deriving sexp]

let rec equal veq a b =
  veq a.value b.value &&
  Option.equal (equal veq) a.left b.left &&
  Option.equal (equal veq) a.right b.right

Version data entries

68 entries across 68 versions & 1 rubygems

Version Path
trackler-2.2.1.119 tracks/ocaml/exercises/zipper/tree.ml
trackler-2.2.1.118 tracks/ocaml/exercises/zipper/tree.ml
trackler-2.2.1.117 tracks/ocaml/exercises/zipper/tree.ml
trackler-2.2.1.116 tracks/ocaml/exercises/zipper/tree.ml
trackler-2.2.1.115 tracks/ocaml/exercises/zipper/tree.ml
trackler-2.2.1.114 tracks/ocaml/exercises/zipper/tree.ml
trackler-2.2.1.113 tracks/ocaml/exercises/zipper/tree.ml
trackler-2.2.1.111 tracks/ocaml/exercises/zipper/tree.ml