Index of /705/coursedir/old/balanced

To test your solution to Assignment 2, do the following.

Load my balanced.ml (or another fast correct implementation):

  # #use "balanced.ml";;

Load testing harness:

  # #use "balanced-test.ml"
  ...
  val test :
    (int list -> int list list) -> (int list -> int list list) -> bool -> unit = <fun>

Apply function test to correct balanced function, and give result a name:

  # let f = test balanced;;
  val f : (int list -> int list list) -> bool -> unit = <fun>

Load your balanced function:

  # #use "my-balanced.ml";;

Apply f to your function and false:

  # f balanced false;;

If this reports errors because you forgot to remove duplicate answers, try

  # f balanced true;;

to see if that's the only problem.

Look at balanced-test.ml to see what the tests are.