Parameter File FORTRAN format
Column headings (not in data files)
write(15,'(a,1x,a)')
* 'YEAR MO DY HR MN Hs Tp Dp Depth Ta Pres Wspd',
* 'Wdir Temp Temp'
write(15,'(a,1x,a)')
* ' UTC m sec deg m sec mB m/s',
* ' deg Air(C) Sea(C)'
Data
write(15,'(i4.4,1x,i2.2,1x,i2.2,1x,i2.2,1x,i2.2,1x,f5.2,1x,f5.2,
* 1x,a3,1x,f8.2,1x,f5.2,1x,f6.1,1x,f6.2,1x,a3,2x,f4.1,
* 3x,f4.1)')
* year, month, day, hour, minute, hs, tp, dp, depth, ta, pres,
* wind_speed, wind_dir, temp_air, temp_sea
~
|