Heat forces 4,000 French schools to close