link ../phylmd/stratocu_if.F90