Record fine for failures at Credit Suisse