Jean Vezina said:
> elemental function f(arg)
> integer,intent(in)::arg
> type test
> integer::x(3)=(/2,4,2/)
> end type
> type (test) f
> f%x = f%x + arg
> end function
> end
>
> The problematic statement is the default initialization
> in the derived type definition inside the elemental function. Is
> this allowed ?
Yes. It's only explicit initialisation (or indeed, SAVEd variables)
that's not allowed.
Cheers,
--
...........................Malcolm Cohen, NAG Ltd., Oxford, U.K.
([log in to unmask])
________________________________________________________________________
This e-mail has been scanned for all viruses by Star Internet. The
service is powered by MessageLabs. For more information on a proactive
anti-virus service working around the clock, around the globe, visit:
http://www.star.net.uk
________________________________________________________________________
|