Richie Porte helps Team BMC take lead of Tour de Suisse