2 Replies Latest reply on Jun 5, 2018 5:39 AM by David Pagan-Oracle

    Fortran move_alloc lower bound - must it be =1?

    3714558

       

      f90: Studio 12.5 Fortran 95 8.8 Linux_i386 2016/05/31

       

        real, allocatable :: a1(:),a2(:)
        allocate (a1(0:10))
        a1(0)=3
        call move_alloc(a1,a2)
        write(0,*)a2(0)
        write(0,*)lbound(a2)
        end

       

      gives

       

      0.0E+0

      1

       

      (same for 12.6).

       

      Portland compiler gives "correct" answer.

      I see on the web reference to gfortran,ifort assuming unity for lbound.

      Is this true for Studio?

      Is it buried in the Fortran 2003 standard?

       

      Regards,

      Nigel