"Jack N. Hatfield" wrote:
>
> At 6/27/00 10:20 AM, Malcolm Cohen wrote:
> >
> FUNCTION Breakpoint_dKdW_tri( bp, Xm, Xp, mF, ScaleFactors) RESULT ( dKdW )
>
> DOUBLE PRECISION, POINTER :: dKdW(:,:)
> TYPE (Breakpoint_T), INTENT(IN) :: bp
> DOUBLE PRECISION, INTENT(IN) :: xm(7), xp(7), mF
> DOUBLE PRECISION, INTENT(IN), OPTIONAL :: ScaleFactors(3)
>
> which matches the INTERFACE specification.
>
Just a thought... have you tried making all arrays assumed-shape?
(e.g. xm(:),xp(:), etc.). I wonder if that could make a difference
in how the compiler views the arrays.
Alvaro Fernandez
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|