JEAN-JACQUES WASBAUER asked:
> ctmp = "'(""test"")'"
> write(*,ctmp(1:LEN_TRIM(ctmp))) ! Error message
[...]
> Error 1000: format error
> Location: the WRITE statement at line 94 of "test_messages.F90"
[...]
>It seems impossible to define a format in a character variable and use
>it in a write command whereas this piece of code was compiled and
>executed without problem in FORTRAN90 4.2 (SUN Workshop).
How about you take out the extraneous quote marks?
e.g.
> ctmp = '("test")'
> write(*,TRIM(ctmp))
Seems to make everything work properly.
Cheers,
--
...........................Malcolm Cohen, NAG Ltd., Oxford, U.K.
([log in to unmask])
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|