Duvida Fortran

[IC_Rodrigo]

Olá Pessoal!

Tenho a seguinte situação:

preciso fazer uma rotina para ler dados em um arquivo já existente, por exemplo:

arquivo: seq.txt conteudo do arquivo:

1

2

3

4

5

6

fiz a referencia ao arquivo dentro do codigo do fortran assim:

open(20,file='seq.txt',status='old')

agora não sei como agir, não sei como fazer a rotina para ler linha por linha deste arquivo...

alguém tem alguma idéia?

Atenciosamente,

Rodrigo

[Jhonas]

fiz a referencia ao arquivo dentro do codigo do fortran assim:

open(20,file='seq.txt',status='old')

agora não sei como agir, não sei como fazer a rotina para ler linha por linha deste arquivo...

Apostila de Fortran

http://ufpel.tche.br/~rudi/grad/ModComp/Ap...a/ContFluxo.pdf

http://ufpel.tche.br/~rudi/grad/ModComp/Ap...a/Apostila.html

abraço

[Valdilei]

Rodrigo,

para ler arquivos primeiro você deve saber que dados quer manipular e depois a forma como eles estão gravados, pois dependendo da forma você tera que usar o comando format

No fortran uma forma bem comum é criar um loop (go to mesmo) para o comando read assim:

********************

integer a

open(unit=5,file='name.txt')

1 continue

read(5,*,end=2) a

go to 1

2 continue

close(5)

*************

O comando end indica para onde o codigo deve continuar quando terminar de ler o arquivo.

Para dados separados por no minimo 1 espaço não é necessário especificar um format, no lugar coloque o *.

Por ex. para ler uma linha ou mais, com multiplas colunas de dados é melhor utilizar matriz do que definir mt variaveis para cada coluna - read(....) a,b,c,d........-.

O melhor é assim:

linha 122 45 56 6

read(.......) (A(1,j),j=1,4)

resultado:

A(1,1)=122

A(1,2)=45

A(1,3)=56

A(1,4)=6

Note que não importa se tem 1,2,3..n espaços entre as colunas.

OBS: comando write tem quase a mesma sintaxe do read, mas nele quase sempre precisamos usar o format.

Sugiro estudar o comando read, write, format e a seção de matrizes.