Migrated tests to contact-chain.R