(j3.2006) Should this work?
Fri May 9 09:29:56 EDT 2008
j3-bounces at j3-fortran.org wrote on 05/08/2008 10:13:49 PM:
> I tried this little program using three compilers on Linux:
> subroutine foo ( a )
> real :: a ( :, : )
> integer, parameter :: b = size(shape(a))
> end subroutine foo
> Two were happy, one wasn't.
> It seems the value given for B is not an initialization expression.
> So this shouldn't work, right?
Right, the expression size(shape(a)) contains a dummy argument. It is a
specification expression but not initialization expression even though we
know its declaration is rank 2 array.
RL Fortran Compiler Test
IBM Toronto Lab at 8200 Warden Ave, Markham, On, L6G 1C7
Phone (905) 413-3444 Tie-line 313-3444
email: jimxia at ca.ibm.com
-------------- next part --------------
An HTML attachment was scrubbed...
More information about the J3