test

program test(N:Integer <- 10000)

Run all tests.