ESV1987
Junior Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
fninp4 содержит имя файла eop_ba_d.bin
Файл бесформатный, прямого доступа, пишется приложением в unix'е.
lenrec=4*1+8*5
open ( unit=kan_1, file=fninp4,
1 status='old', err=22, access='direct',
2 form='unformatted', recl=lenrec )
открытие файла происходит без ошибок
но потом при считывании сразу возникает ошибка В/В (при отладке модуля в Unix её нет):
do 8 m=m1,m2
read ( unit=kan_1, err=25, rec=m ) mjd, eop, cor_nut
|
