09-04-2015
write() shouldn't be failing though, unless the file itself is invalid. What's writing to it is probably less interesting and relevant than what's being written to.
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
IOINIT(3F) IOINIT(3F)
NAME
ioinit - change f77 I/O initialization
SYNOPSIS
logical function ioinit (cctl, bzro, apnd, prefix, vrbose)
logical cctl, bzro, apnd, vrbose
character*(*) prefix
DESCRIPTION
This routine will initialize several global parameters in the f77 I/O system, and attach externally defined files to logical units at run
time. The effect of the flag arguments applies to logical units opened after ioinit is called. The exception is the preassigned units, 5
and 6, to which cctl and bzro will apply at any time. Ioinit is written in Fortran-77.
By default, carriage control is not recognized on any logical unit. If cctl is .true. then carriage control will be recognized on format-
ted output to all logical units except unit 0, the diagnostic channel. Otherwise the default will be restored.
By default, trailing and embedded blanks in input data fields are ignored. If bzro is .true. then such blanks will be treated as zeros.
Otherwise the default will be restored.
By default, all files opened for sequential access are positioned at their beginning. It is sometimes necessary or convenient to open at
the END-OF-FILE so that a write will append to the existing data. If apnd is .true. then files opened subsequently on any logical unit
will be positioned at their end upon opening. A value of .false. will restore the default behavior.
Ioinit may be used to associate file names with Fortran logical unit numbers through environment variables (see "Introduction to the f77
I/O Library" for a more general way of doing this). If the argument prefix is a non-blank string, then names of the form prefixNN will be
sought in the program environment. The value associated with each such name found will be used to open logical unit NN for formatted
sequential access. For example, if f77 program myprogram included the call
call ioinit (.true., .false., .false., 'FORT', .false.)
then when the following sequence
% setenv FORT01 mydata
% setenv FORT12 myresults
% myprogram
would result in logical unit 1 opened to file mydata and logical unit 12 opened to file myresults. Both files would be positioned at their
beginning. Any formatted output would have column 1 removed and interpreted as carriage control. Embedded and trailing blanks would be
ignored on input.
If the argument vrbose is .true. then ioinit will report on its activity.
The effect of
call ioinit (.true., .true., .false., '', .false.)
can be achieved without the actual call by including ``-lI66'' on the f77 command line. This gives carriage control on all logical units
except 0, causes files to be opened at their beginning, and causes blanks to be interpreted as zero's.
The internal flags are stored in a labeled common block with the following definition:
integer*2 ieof, ictl, ibzr
common /ioiflg/ ieof, ictl, ibzr
FILES
/usr/lib/libI77.a f77 I/O library
/usr/lib/libI66.a sets older fortran I/O modes
SEE ALSO
getarg(3F), getenv(3F), ``Introduction to the f77 I/O Library''
BUGS
Prefix can be no longer than 30 characters. A pathname associated with an environment name can be no longer than 255 characters.
The ``+'' carriage control does not work.
4.2 Berkeley Distribution May 27, 1986 IOINIT(3F)