Credit Suisse could lose 4,000 jobs