(Resolvido) Fortran

[Valdilei]

Oi, Bom dia pessoal! Faço alguns programinhas em fortran,sei pouca coisa e preciso de ajuda.

Supondo que na variável que contenha "nome.dat" como faço para passar para uma outra variável

somente o que vem antes do ponto ( b = "nome"). Tem alguma função pra isso?

Um abraço e obrigado.

[Graymalkin]

É só usar substring: string(início:fim). No caso, você primeiro tem que achar onde está o ponto e depois usar esta posição como base. Segue um exemplo:

program Teste

    integer i, posponto
    character *(12) arquivo

    arquivo = "arquivo.txt"

    do i=1, len(arquivo)
        if (arquivo(i:i) .eq. ".") then
            posponto = i
        endif
    enddo

    print *, "Arquivo.: ", arquivo
    print *, "Nome....: ", arquivo(1:posponto-1)
    print *, "Extensao: ", arquivo(posponto+1:len(arquivo))

end program Teste

Certo? ;)

Graymalkin

[Valdilei]

Valeu mesmo! Funcionou direitinho era isso mesmo que eu precisava.

Muito obrigado!

Abraço.

[Guest arturferreira]

Boas.

Sou novo em Fortran e estou com uma dúvida que não consigo resolver...

Se fizer "write (*,*) A(3,3)" obtenho sempre 1, em todas as iterações do programa.

Mas se fizer "write (*,*) DACos(A(3,3))" obtenho 0 nas primeiras 3 iterações e NaN nas restantes...

alguém faz ideia porquê?

Abraço e obrigado!