> Date: Sun, 28 Mar 2004 21:58:36 -0500
> From: Jean Vezina <[log in to unmask]>
>
> Here is another case that cause problems with some compilers:
>
> character*5 a
> call test(a,'123')
> print *,a
> end
> subroutine test(a,b)
> ! the problem statement is the IMPLICIT
> implicit character(*) (a-z)
> a = b
> end
>
> The problematic statement is the IMPLICIT CHARACTER(*).
Why would you want to use this statement anyway?
It's more typing than
CHARACTER (*) :: a, b
> Thanks in advance,
>
> Jean Vezina
|