Fortran - Como compilar 2 archivos de Fortran y crear un ejecutable

   
Vista:
Imágen de perfil de Isaias

Como compilar 2 archivos de Fortran y crear un ejecutable

Publicado por Isaias (1 intervención) el 25/06/2013 01:48:58
Hola a todos, quiero hacer un ejercicio en donde tengo dos archivos de fortran, y quiero que el principal llame al segundo y así generar un solo Ejecutable.

El primer Archivo (prin.for) se ve así:
PROGRAM EJEMPLO
REAL A, B

A = 0; B = 5;

Include "subrut.for"
PRINT *,'El nuevo valor de B es: ', B

READ (*,*) A ! Para esperar un poco
END



El segundo Archivo (subrut.for) así:

Real X1
X1 = X1 + 1
PRINT *,'El valor de X1 es: ', X1


Primero compilo el segundo archivo: g77 -c subrut.for
Sin problemas.

Despues el primero: g77 prin.for
Aquí me dice el siguiente error: Statement at (2) invalid in context established by statement at (1)

Si comento la linea: Include "subrut.for", el programa compila bien.

Utilizo Windows 7, el compilador es el g77, pero tambien tengo instalado el Force 2.0
Por su atención, gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
información
Otras secciones de LWP con contenido de Fortran
- Código fuente de Fortran
- Cursos de Fortran
- Temas de Fortran
información
Códigos de Fortran
- Ecuaciones lineales
Imágen de perfil de RICARDO JOSÉ

Como compilar 2 archivos de Fortran y crear un ejecutable

Publicado por RICARDO JOSÉ (3 intervenciones) el 03/07/2013 07:31:40
Hola Isaias

Debes poner el programa principal y la subrutina en un mismo archivo.

Despues compilas, haces el Link y listo

Espero te sea de utilidad

Ricardo
Caracas. Venezuela
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Como compilar 2 archivos de Fortran y crear un ejecutable

Publicado por Johsoa (1 intervención) el 13/07/2013 21:34:55
Hay que tener en cuenta que las subrutinas no tienen ningún tipo y por lo tanto no debe ser declarada en el programa que la llama. Pero veo que tu codigo no es una subrutina ...
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar
Imágen de perfil de Dave

Como compilar 2 archivos de Fortran y crear un ejecutable

Publicado por Dave correa.dave30@gmail.com (4 intervenciones) el 02/09/2013 17:43:04
Hola Isaias;

Te dejo un ejemplo de un programa fortran con subrutina, "ejemplo_01.f90".

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
PROGRAM ejemplo_01
        IMPLICIT NONE
        REAL :: resul
        REAL, DIMENSION(5)::vector
        INTEGER :: i
 
        WRITE(*,*) 'INGRESE UN VECTOR DE 5 ELEMENTOS'
        READ(*,*) (vector(i),i=1,5)
        CALL media(vector,resul,5)
        WRITE(*,*) 'LA MEDIA ES:',resul
        END PROGRAM ejemplo_01
 
        SUBROUTINE media(num,solu,d1)
        IMPLICIT NONE
        INTEGER, INTENT(IN):: d1
        REAL, DIMENSION(d1),INTENT(IN) :: num
        REAL, INTENT(OUT) :: solu
        REAL :: suma
        INTEGER :: i
        suma=0
        DO i=1,d1
          suma=suma+num(i)
        END DO
        solu=suma/d1
        END SUBROUTINE media

Espero que sea de alguna ayuda.

Saludos
Dave Correa
correa.dave30@gmail.com
Servicios de Programación Matlab
http://fismatlab.blogspot.com/
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar