link ../../../EXTERNAL/IOIPSL/src/restcom.f90