09-04-2015
Error in my FORTRAN program
I have a Fortran program and I am writing out to logical unit 7. The program is reading from a text file and writing to the new file formatted. It gets through the read and writes some to the file but then stops with the following error:
1525-013 The sequential WRITE statement cannot be completed because an errno value of 25 (Not a typewriter) was received while writi
ng the file ACA_TRANSMIT.XML. The program will stop.
I have looked for the error and can only discern it is some type of I/O error, but I cannot find a way to resolve it.
There are many WRITE statements and quite a lot of FORMAT statements, so I'm not sure where to begin. If the source file is changed, the program stops at different places in the write.
I am running a combo FORTRAN77/90 on UNIX AIX editor.
10 More Discussions You Might Find Interesting
1. Linux
Hi everybody:
Could anybody help me where could I download Fortran 90 complier?
Thanks in advance. :) (2 Replies)
Discussion started by: tonet
2 Replies
2. UNIX for Dummies Questions & Answers
Hello,
I have a FORTRAN code that I want to compile using F90 compiler. However,
when I enter the command:
f90 ./code.f -o ./code.out
It would give me prompt saying that absoft license has failed, or something.
I remember, however, that I could enter some keyword that ends with 'soft'
in... (1 Reply)
Discussion started by: Iamthe great
1 Replies
3. Programming
Hello,
we are a group of students (mechanical engineering) who are trying to port UNIX-software to a PC Linux system during a study project. The first goals were achieved: compiling the Fortran code and creating object files. However, we encounter errors during the linking process.
This is... (0 Replies)
Discussion started by: Dynamo
0 Replies
4. Programming
Hi,
I am new to this forum and do not know whether this is the appropriate place to post this question. Anyway am trying my luck.
I have a fortran program swanhcat.ftn, which is part of a wave modelling system. There is also a file hcat.nml which is required to run this program. The program's... (9 Replies)
Discussion started by: sandhyakg
9 Replies
5. Programming
Hello,
I have some Fortran code that is providing the following error:
At line 1165 of lapc_shells_2.f
Fortran runtime error: Insufficient data descriptors in format after reversion
Here are the lines just above and including 1165:
WRITE (*,"('ATTEMPTING TO READ PLATE... (1 Reply)
Discussion started by: jm4smtddd
1 Replies
6. Homework & Coursework Questions
1. The problem statement, all variables and given/known data:
I was given this program to work with that is supposed to work as it is. It comes with a makefile so all I should have to do is use the make command, then type ./blub to execute the program. A list of data should then appear in the... (3 Replies)
Discussion started by: Arjani
3 Replies
7. Shell Programming and Scripting
Need assistance in Fortran Compiler
I need to install Fortran compiler on Linux distribution . I don't have root access to use rpm or yum to install compiler . Is there any way I can get it ?
Are there any sites that has fortran compiler . Any links to download and install . (10 Replies)
Discussion started by: ajayram_arya
10 Replies
8. Programming
I am writing some code in fortran that defines certain shapes.
Currently I have a cuboid and a prism. Now a parallelepiped is both a cuboid and a prism. Is there a way to code this?
Currently I only have
Type, Extends (Cuboid) :: Parallelepipied
How can I do so that Parallelepipied is... (3 Replies)
Discussion started by: kristinu
3 Replies
9. Homework & Coursework Questions
Use and complete the template provided. The entire template must be completed. If you don't, your post may be deleted!
1. The problem statement, all variables and given/known data:
I'm doing aproximation of derivative called five-point stencil. For every value of x, in interval , in step... (0 Replies)
Discussion started by: antonija
0 Replies
10. Programming
Dear folks
I have a large data set which contains 400K columns. I decide to select 50K determined columns from the whole 400K columns. Is there any suggested fortran program which could do this process for me? I need to also mention that I store all of the columns id in one file which may help... (1 Reply)
Discussion started by: sajmar
1 Replies
STRUCT(1) General Commands Manual STRUCT(1)
NAME
struct - structure Fortran programs
SYNOPSIS
struct [ option ] ... file
DESCRIPTION
Struct translates the Fortran program specified by file (standard input default) into a Ratfor program. Wherever possible, Ratfor control
constructs replace the original Fortran. Statement numbers appear only where still necessary. Cosmetic changes are made, including chang-
ing Hollerith strings into quoted strings and relational operators into symbols (.e.g. ".GT." into ">"). The output is appropriately
indented.
The following options may occur in any order.
-s Input is accepted in standard format, i.e. comments are specified by a c, C, or * in column 1, and continuation lines are specified
by a nonzero, nonblank character in column 6. Normally input is in the form accepted by f77(1)
-i Do not turn computed goto statements into switches. (Ratfor does not turn switches back into computed goto statements.)
-a Turn sequences of else ifs into a non-Ratfor switch of the form
switch
{ case pred1: code
case pred2: code
case pred3: code
default: code
}
The case predicates are tested in order; the code appropriate to only one case is executed. This generalized form of switch state-
ment does not occur in Ratfor.
-b Generate goto's instead of multilevel break statements.
-n Generate goto's instead of multilevel next statements.
-tn Make the nonzero integer n the lowest valued label in the output program (default 10).
-cn Increment successive labels in the output program by the nonzero integer n (default 1).
-en If n is 0 (default), place code within a loop only if it can lead to an iteration of the loop. If n is nonzero, admit a small code
segments to a loop if otherwise the loop would have exits to several places including the segment, and the segment can be reached
only from the loop. `Small' is close to, but not equal to, the number of statements in the code segment. Values of n under 10 are
suggested.
FILES
/tmp/struct*
/usr/libexec/struct/*
SEE ALSO
f77(1)
BUGS
Struct knows Fortran 66 syntax, but not full Fortran 77.
If an input Fortran program contains identifiers which are reserved words in Ratfor, the structured version of the program will not be a
valid Ratfor program.
The labels generated cannot go above 32767.
If you get a goto without a target, try -e .
7th Edition October 22, 1996 STRUCT(1)