Fix looking for swissreg patents
Fix looking for swissreg patent. Adapted unit tests