link ../phylmd/stratocu_if.f90