view libcruft/lapack-xtra/xslamch.f @ 14459:a22a41ab6824

doc: Add Colin Macdonald and Mike Miller to contributors.in
author Jordi Gutiérrez Hermoso <jordigh@octave.org>
date Tue, 13 Mar 2012 01:30:26 -0400
parents 82be108cc558
children
line wrap: on
line source

      subroutine xslamch (cmach, retval)
      character cmach
      real retval, slamch
      retval = slamch (cmach)
      return
      end