Update ActivePatternTests.fs