What you have done is exactly what I would have done. It may not be
elegant, but it sure works.
At 08:17 PM 8/15/01 +0100, you wrote:
>Hello,
>
>could somebody tell me a way how to substitute the number of repetitions in a
>format description like
>
>DO i=1,n
> WRITE(10,'(10F8.3)') X2(i,:)
>END DO
>
>by a variable to get something I would try to write like
>
>DO i=1,n
> WRITE(10,'(nF8.3)') X2(i,:)
>END DO
>
>I found a way putting a character format='(nF8.3)'
>which is build during runtime in the format spezification
>like
>
>WRITE(10,format) X2(i,:)
>
>but this is not very elegant. Is there a better method?
>
>Greetings
>Jens
Bob Cohen
(703) 534-7618
[log in to unmask]
|