Re: compare two dynamic string



David Frank wrote:

<snip>

> if ( transfer(Parola,string1) < transfer(P,string2) ) then
> write (*,*) 'Parola < P'
> else
> write (*,*) 'Parola <= P' ! is the output
> end if
> end program

I think the second write statement should have a ">=" instead of a
"<=".

.