| Re: Reading in fortran files [message #3079] |
Fri, 04 November 1994 10:06 |
sjt
Messages: 72
Registered: November 1993
|
Member |
|
|
John Holland (ajh@met.ed.ac.uk) wrote:
: Sorry if this is an obvious question but ....
: Is there a way of reading in unformatted direct access fortran files, and if
: so, how? I normally use unformatted serial access fortran files, but it would
: be quite useful to be able to do it this way too.
: Thanks for your help
: John
Both are do-able on unix or VMS.
Infile was a fortran direct access file:
VMS:
openr,ilu,/get, file, lrecl ; lrecl is length of record in bytes
Unix:
openr, ilu, /get, file ; You need to know the length of record
; you were using in FTN.
Infile was fortran sequential file:
VMS:
openr, ilu, /get, file, /segmented
Unix:
openr, ilu, /get, file, /f77_unformatted
In all cases you then just use readu in the usual way.
--
+------------------------+---------------------------------- --+---------+
| James Tappin, | School of Physics & Space Research | O__ |
| sjt@xun8.sr.bham.ac.uk | University of Birmingham | -- \/` |
| "If all else fails--read the instructions!" | |
+----------------------------------------------------------- --+---------+
|
|
|
|
| Re: Reading in fortran files [message #3080 is a reply to message #3079] |
Fri, 04 November 1994 08:29  |
nowicki
Messages: 11
Registered: May 1993
|
Junior Member |
|
|
In article <Cyqvqw.GqA@festival.ed.ac.uk>, ajh@met.ed.ac.uk (John Holland) writes:
> Sorry if this is an obvious question but ....
>
> Is there a way of reading in unformatted direct access fortran files, and if
> so, how? I normally use unformatted serial access fortran files, but it would
> be quite useful to be able to do it this way too.
>
> Thanks for your help
>
> John
>
John,
Check out the ASSOC command. We use that to access unformatted direct
access files we have created using Fortran on a DEC AXP running OVMS.
Good luck,
-Greg
/* Greg Nowicki | Mail Stop 401A | LIDAR Applications Group */
/* NASA Langley Research Center | Hampton, Virginia 23681-0001 */
/* Voice: (804) 864-2713 | FAX: (804) 864-7790 */
/* nowicki@tardis.larc.nasa.gov | My opinions and mine alone . . . */
|
|
|
|
comp.lang.idl-pvwave archive
Members
Search
Help
Login
Home
