Adjust test to match emailed example

I emailed this example to the SWI-Prolog mailing list as part of v0.1.0
release.  I want the test to exactly match the example to make sure I
got it right.