link ../../../ext/IOIPSL/src/mathelp.f90