Sponsored Content
Full Discussion: Error running FORTRAN code
Top Forums Programming Error running FORTRAN code Post 302534895 by sandhyakg on Wednesday 29th of June 2011 06:12:04 AM
Old 06-29-2011
Hi Tytalus,

Details you asked for are here:
Fortran:

IBM XL Fortran Enterprise Edition for AIX, V11.1.

OS:

AIX 5.3.0.0

All the files are read concurrently as:
Code:
 DO i=1,numfiles
         tmp = trim(basefile)
         WRITE(tmp(LEN_TRIM(tmp)+1:LEN_TRIM(tmp)+4),33) i
         OPEN(unit=10+i, file=tmp, status='old', iostat=ios)
         IF ( ios /= 0 ) THEN
            PRINT *,'Unable to open',TRIM(tmp)
         ELSE
            IF(verbose) PRINT *,TRIM(tmp),' opened succesfully'
         ENDIF
      ENDDO

All the files are closed at the end of the program as

Code:
 CLOSE ( unit = 10 );
      DO i=1,numfiles
         CLOSE (unit=10+i)
      ENDDO

Since it is a very big program of ~ 500 lines (it is part of the numerical model, not written by me) I could write only the relevant part here.

regrds,
s.

Last edited by pludi; 07-05-2011 at 05:44 PM..
 

9 More Discussions You Might Find Interesting

1. Programming

Error while running the C code

Hi Sir, I am running C program which include directfb.h header files. root@lxdevenv:~/Desktop# vi n.c root@lxdevenv:~/Desktop# gcc n.c -o n -I/usr/local/include/directfb -L/usr/local/lib -ldirectfb -lfusion -ldirect -lpthread -lm n.c: In function ‘main':... (2 Replies)
Discussion started by: Ravikishore
2 Replies

2. Programming

Making FORTRAN code more efficient

Hi, I have a very large, very old FORTRAN code that I work with. The code is quite messy and I was wondering if I can speed up execution time by finding subroutines that code execution spends the most time in. Is there any kind of software I can use to see where the code spends most of the... (1 Reply)
Discussion started by: rks171
1 Replies

3. UNIX and Linux Applications

Getting error code when running the script 2 (RC)2

hi All, we have a script to remove the files from particular path,when we tryingto run manually the script went to success and removed the files but the same script which is running by other team it got failed and giving the error "2 (RC)2 "..what is the cause of the failure..and we passing the... (2 Replies)
Discussion started by: nagavenkatesh
2 Replies

4. Programming

Help with make this Fortran code more efficient (in HPC manner)

Hi there, I had run into some fortran code to modify. Obviously, it was written without thinking of high performance computing and not parallelized... Now I would like to make the code "on track" and parallel. After a whole afternoon thinking, I still cannot find where to start. Can any one... (3 Replies)
Discussion started by: P_E_M_Lee
3 Replies

5. Programming

Using Doxygen on Fortran code

I am using doxygen for documenting my fortran code. I want to write some notes after the header in different parts of the subroutine. Any idea what the tags should be as anything I write after the header is not displayed ... (0 Replies)
Discussion started by: kristinu
0 Replies

6. Programming

Removing goto statements in FORTRAN code

I have the code below and I want to remove the "go to" statements. Any idea how I can do it? if (iorder == 0) then tmincurrent = 1.0e11 if(ireverse == 0 .or. istop /= 1) then do i = 1, 6 if ((side(i) /= sidelimit(i)) .and. (tminside(i) < tmincurrent)) then ... (1 Reply)
Discussion started by: kristinu
1 Replies

7. Programming

Strange characters in FORTRAN code output

Hi guys, After compiling a .f90 code and executing it, i get strange characters in the output file like : ^@^@^@^@^@^@^@^@^@^@^@^@^@^@^@^@^@^@^@^@^@^@^@^@^@^@^@^@^@^@ Are these windows characters? how can i get rid of this? Much appreciated. Paul (1 Reply)
Discussion started by: Paul Moghadam
1 Replies

8. Homework & Coursework Questions

FORTRAN error *** glibc detected ***

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

9. Programming

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... (5 Replies)
Discussion started by: KathyB148
5 Replies
binfmtf(1)							     binfmt_C								binfmtf(1)

NAME
binfmtf-interpreter - binfmt_misc fortran handler SYNOPSIS
binfmtf-interpreter fortran-source-file-name [command-line opions ...] DESCRIPTION
binfmtf-interpreter compiles a fortran source file specified on the command-line using the g77 compiler, and executes the resulting file. It is designed to be used as a handler for binfmt_misc handler, which is a system used in Linux for handling arbitrary files as executa- bles. The command-line options are passed on to the compiled binary. FILE MAGIC
There is a requirement for Fortran source files to have the magic characters c BINFMTF: at the beginning of the file. That line also is used to specify the additional command-line options for Fortran compiler. ENVIRONMENT
G77 The compiler used. The default is to use g77 BINFMTCTMPDIR Temporary directory used for binary and execution. Falls back to $TMPDIR $TEMPDIR or /tmp BINFMTC_DEBUG enables debug output if set. BINFMTC_G77_OPTS Additional G77 options. Use BINFMTC_DEBUG to verify the options being passed on to g77. The default is -O2 -Wall AUTHOR
Junichi Uekawa (dancer@debian.org) Upstream page is available at http://www.netfort.gr.jp/~dancer/software/ SEE ALSO
binfmtasm-interpreter(1), binfmtc-interpreter(1), binfmtcxx-interpreter(1), binfmtf95-interpreter(1), binfmtgcj-interpreter(1) binfmt_misc Dancer 2005 Jun 4 binfmtf(1)
All times are GMT -4. The time now is 02:19 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy