TESTS: refacter red...print-test.r to run faster