link ../phylmd/read_pstoke0.F90