Re: Allow * as a format string?



Beliavsky wrote:

write (some_unit,"*")

(snip)

write (*,format_str_) some_data

if(format_str.eq.'*') then
write(*,*) some_data
else
write(*,format_str) some_data
endif

-- glen

.