link ../../libf_gcm/phymars/phyetat0.F