PROGRAM icosa_lmdz USE icosa_init_mod CALL icosa_init END PROGRAM icosa_lmdz