      USE LAPACK95
      parameter nrhs=5,m=5,n=10
      real*8 a(m,n),b(m,nrhs) ! consistent with documentation
      call gels(a,b)  ! doesn't link
      end
