Re: add a0 format to language to print trimmed character variables

From: michael@xxxxxxxxxxxxxxxx
Date: 27 Apr 2007 23:26:14 -0700

On Apr 27, 5:25 pm, Beliavsky <beliav...@xxxxxxx> wrote:

I wish there were an "a0" format for character variables, analogous to
i0 for integers, which would not print trailing spaces in character
variables. For example,

character (len=5) :: words(4) = (/"one ","two ","three","four "/)
write (*,"(100(1x,a0))") words

would print

one two three four

The TRIM function is not elemental, so one cannot write

write (*,"(100(1x,a))") trim(words)

Currently I write

write (*,"(100(1x,a))") (trim(words(i)),i=1,size(words))

which is slightly awkward IMO.

I am with you. Did you send your suggestion to Andy? Perhaps he can
implement it in g95

Michael

.

Follow-Ups:
- Re: add a0 format to language to print trimmed character variables
  - From: Richard Maine

References:
- add a0 format to language to print trimmed character variables
  - From: Beliavsky

Prev by Date: Re: repeated namelist behavior
Next by Date: Re: add a0 format to language to print trimmed character variables
Previous by thread: add a0 format to language to print trimmed character variables
Next by thread: Re: add a0 format to language to print trimmed character variables
Index(es):
- Date
- Thread

Relevant Pages

Re: add a0 format to language to print trimmed character variables
... which would not print trailing spaces in character ... For the character case, ... Fortran character variables have a fixed length, ... the implied do loop an irregular feature of the language and try to ...
(comp.lang.fortran)
Re: add a0 format to language to print trimmed character variables
... Beliavsky wrote: ... which would not print trailing spaces in character ... a plain F.d would look odd? ...
(comp.lang.fortran)