topic Re: RUNNING A COMMAND IN FOTRAN in Operating System - Linux

RUNNING A COMMAND IN FOTRAN

Henry Chua — Tue, 21 Mar 2006 10:03:24 GMT

Hi guys,

Does anyone know how to run a command in FOTRAN i.e. the same way the statment "system" does in ANSI C. Pls advise.

Thanks!

Best regards
Henry

Re: RUNNING A COMMAND IN FOTRAN

Peter Godron — Tue, 21 Mar 2006 10:27:56 GMT

Henry,
according to
http://www.docs.hp.com/en/B3908-90003/B3908-90003.pdf
the system(str) command should get you want you need, at least on hp using fortran90.

Re: RUNNING A COMMAND IN FOTRAN

Arunvijai_4 — Tue, 21 Mar 2006 10:51:38 GMT

Hi Henry,

Here it is,

http://www.codecomments.com/archive271-2005-3-429704.html
System commands only added in Fortran 2003.

-Arun

Re: RUNNING A COMMAND IN FOTRAN

A. Clay Stephenson — Tue, 21 Mar 2006 10:54:07 GMT

Yes there is a 3F system function in addition to the more common 3C system for C.
Man 3F system for details.

Re: RUNNING A COMMAND IN FOTRAN

Michael D. Zorn — Wed, 22 Mar 2006 17:19:53 GMT

We use system(). One way is

character*80 command
....
command = '/usr/local/bin/myprog'
call system(command)

You can also build commands in the program:

command = 'cat ' // someFileName

or even in the argument:

call system('cat ' // someFileName)

The FORTRAN 9000 manual says system() is a libU77 routine. We don't have to invoke a compiler directive, but we do have to link the library (though it may come in automatically). The only linker options I use regularly are

-lfsys -lm