08-06-2010
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 execution process?
Also, I made some changes to the code so it writes a whole bunch of extra output files during execution. I just ran the unmodified version of the code and noticed it seems to run a lot faster than my modified version. Does writing to text files bog down the execution that much?
9 More Discussions You Might Find Interesting
1. 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
2. Programming
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
3. Shell Programming and Scripting
Hi all,
Need some help in the following code. (Running this code at cygwin in windows vista)
cat /home/ebanpan/Input_Logs/*.log > /home/ebanpan/Input_Logs/input.log
sed '/^Total/d;/^Bye/d;/^Output has been logged/d' /home/ebanpan/Input_Logs/input.log > /home/ebanpan/output.log
this code... (6 Replies)
Discussion started by: bansalpankaj88
6 Replies
4. Programming
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
5. Shell Programming and Scripting
egrep -v "#" ${SERVERS} | while read shosts
do
grep -Pi "|" ${LOGFILE} | egrep "${snhosts}" | egrep "NOTIFICATION:" | awk -F";" '{print $3}' | sort -n | uniq | while read CEXIST
do
... (6 Replies)
Discussion started by: SkySmart
6 Replies
6. Programming
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. Shell Programming and Scripting
Hi all,
I am working on an extremely large collection of text data (about 2 million XML files) in a directory. I have changed the extension from .xml to .dat. Right now I am using this code to remove the XML tags, but the code is way too slow. It seems that it is taking fore-ever:
#ls -1 *.dat... (1 Reply)
Discussion started by: shoaibjameel123
1 Replies
8. Programming
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
9. Shell Programming and Scripting
Heyas
I've been told my scipts would be insecure, and to fix that.
Figured i might rethink some parts of my coding style, meanwhile i tried to write an additional catcher.
After reading:
fail : Security Issues - didnt help too much, infact - it confused me even more.
n/a:... (8 Replies)
Discussion started by: sea
8 Replies
LEARN ABOUT DEBIAN
mpi_add_error_code
MPI_Add_error_code(3) MPI MPI_Add_error_code(3)
NAME
MPI_Add_error_code - Add and MPI error code to an MPI error class
SYNOPSIS
int MPI_Add_error_code(int errorclass, int *errorcode)
INPUT PARAMETER
errorclass
- Error class to add an error code.
OUTPUT PARAMETER
errorcode
- New error code for this error class.
THREAD AND INTERRUPT SAFETY
This routine is thread-safe. This means that this routine may be safely used by multiple threads without the need for any user-provided
thread locks. However, the routine is not interrupt safe. Typically, this is due to the use of memory allocation routines such as malloc
or other non-MPICH runtime routines that are themselves not interrupt-safe.
NOTES FOR FORTRAN
All MPI routines in Fortran (except for MPI_WTIME and MPI_WTICK ) have an additional argument ierr at the end of the argument list. ierr
is an integer and has the same meaning as the return value of the routine in C. In Fortran, MPI routines are subroutines, and are invoked
with the call statement.
All MPI objects (e.g., MPI_Datatype , MPI_Comm ) are of type INTEGER in Fortran.
ERRORS
All MPI routines (except MPI_Wtime and MPI_Wtick ) return an error value; C routines as the value of the function and Fortran routines in
the last argument. Before the value is returned, the current MPI error handler is called. By default, this error handler aborts the MPI
job. The error handler may be changed with MPI_Comm_set_errhandler (for communicators), MPI_File_set_errhandler (for files), and
MPI_Win_set_errhandler (for RMA windows). The MPI-1 routine MPI_Errhandler_set may be used but its use is deprecated. The predefined
error handler MPI_ERRORS_RETURN may be used to cause error values to be returned. Note that MPI does not guarentee that an MPI program can
continue past an error; however, MPI implementations will attempt to continue whenever possible.
MPI_SUCCESS
- No error; MPI routine completed successfully.
MPI_ERR_OTHER
- Other error; use MPI_Error_string to get more information about this error code.
LOCATION
add_error_code.c
5/20/2010 MPI_Add_error_code(3)