link ../../libf_gcm/phymars/wstats.F90