Message:
[
First
|
Previous
Next
Last
]
By Topic:
By Author:
Font:
Proportional Font
LISTSERV Archives
COMP-FORTRAN-90 Home
COMP-FORTRAN-90 2001
Subscribe or Unsubscribe
Log In
Get Password
Subject:
Re: De-blanking Strings (was: Strings)
From:
robin <[log in to unmask]>
Reply-To:
Fortran 90 List <[log in to unmask]>
Date:
Mon, 8 Oct 2001 10:05:21 +1000
Content-Type:
text/plain
Parts/Attachments:
text/plain (14 lines)
The string can be formed in place: S = ' for tran ' J = 0 DO I = 1, LEN_TRIM(S) IF (S(I:I) /= ' ') THEN J = J + 1 IF (J < I) THEN S(J:J) = S(I:I) S(I:I) = ' ' END IF END IF END DO
Top of Message | Previous Page | Permalink
Advanced Options
For help and support help@jisc.ac.uk