view liboctave/external/lapack-xtra/xdlange.f @ 23434:f4d4d83f15c5

maint: rename cruft/ directory to external/ * liboctave/external: Renamed from liboctave/cruft. * * configure.ac: Rename XTRA_CRUFT_SH_LDFLAGS to XTRA_EXTERNAL_SH_LDFLAGS. Rename CRUFT_DLL_DEFS to EXTERNAL_DLL_DEFS. * install.txi: Update documentation to refer to liboctave/external. * HACKING: Update explanation of directory tree. * liboctave/module.mk: Update build system to include liboctave/external * liboctave/numeric/module.mk: Update CPPFLAGS to find Faddeeva in external/ directory. * lo-blas-proto.h, lo-lapack-proto.h: Update comments which referred to cruft directory.
author Rik <rik@octave.org>
date Mon, 24 Apr 2017 21:03:38 -0700
parents liboctave/cruft/lapack-xtra/xdlange.f@648dabbb4c6b
children
line wrap: on
line source

      subroutine xdlange (norm, m, n, a, lda, work, retval)
      character norm
      integer lda, m, n
      double precision a (lda, *), work (*), dlange, retval
      retval = dlange (norm, m, n, a, lda, work)
      return
      end