合成を実施するためにnewfineフォーマットデータを読む。 read_polar modules/m_polar2008.f90 subroutine read_polar( path, rr, itobs, istatus ) こちらを使えば、よいはず。 read_rkdp(fnam,rkdp,ito,istatus) read(iu,iostat=io) ito初めに、時間を読む…