Code: Select all
/usr/local/src/Smoke/hysplit/trunk/exec/hycs_std 20150716-121032
HYSPLIT4 - Initialization 20150716-121032
USE: svn info | tail -n3
to fill in these three records
with the version information!
NOTICE main: using namelist file - SETUP.20150716-121032
At line 315 of file metset.f (unit = 70, file = 'MESSAGE.20150716-121032')
Fortran runtime error: Cannot write to file opened for READ
When I open up the metset.f file line 315 is part of an IF statement that goes like this.
Code: Select all
313 INQUIRE(UNIT=KF21,OPENED=FTEST)
314 IF(FTEST)THEN
315 WRITE(KF21,*)'Simulation Date (CCYYMMDD): ',REAL_CLOCK(1)(:8)