Join 2 FORTRAN Codes: Problem Solved w/ Intel Compiler & Linux

[Milentije]

I have a problem,actually I want to join two FORTRAN codes.One of them is main and the other calculates some issues(geophysics stuff).I am not sure that the second code can be represented as subroutine because it has 2000+ lines,with 10 subroutines inside itself.How to solve this?Is it possible that one executable calls the other?I am working on Linux,with Intel Fortran compiler.

 

[Milentije]

I need interface between two programs.I can not put second program as module cause I get errors like this:
mt2ddib1.for(23): error #6274: This statement must not appear in the specification part of a module
open(2,file='test_p7.dat',status='old')
--------^
mt2ddib1.for(29): error #6274: This statement must not appear in the specification part of a module
open(3,file='test_sh7.dat',status='old')
--------^
mt2ddib1.for(30): error #6274: This statement must not appear in the specification part of a module
open(4,file='test_res.dat',status='old')
--------^
mt2ddib1.for(35): error #6274: This statement must not appear in the specification part of a module
open(50,file='e.dat',status='unknown')

 

[Mark44]

The four OPEN statements are in the wrong places. Apparently mt2ddib1.for has some variable declarations somewhere after line 35. The declarations need to be moved so that they are above any executable statements (such as your OPEN statements).

 

[SteamKing]

If you have the source code for the second program, you can either merge it into the first program and make one composite source file, or you can adapt the routines of the second program so that they can be compiled and collected into a code library which is callable by the first program.

 

[LudusRex]

Thank you for sharing your question with us. Joining two FORTRAN codes can be a complex task, but it is certainly possible to do so using the Intel Fortran compiler on Linux. There are a few different approaches you could take to solve this problem, depending on your specific needs and the structure of your codes.

One option is to create a new main program that calls both of your existing codes as subroutines. This would require some restructuring of your codes, but it would allow you to have one executable that runs both codes. You could also consider using modules to share common variables and subroutines between the two codes.

Another option is to use the "include" statement to combine the two codes into one file. This would essentially merge the two codes together, but it may not be the most elegant solution and could lead to difficulties in maintaining and updating your code in the future.

It is also possible to have one executable call the other, but this would require some additional programming to set up communication between the two codes.

Overall, the best approach will depend on the specific requirements and structure of your codes. I recommend consulting with a FORTRAN expert or seeking guidance from the Intel Fortran compiler documentation to determine the best course of action for your particular situation. Best of luck with your project!