Mercurial > hg > octave-nkf

view libcruft/slatec-fn/xdasinh.f @ 12329:5f203b5bbf98

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Use testif to only run some sparse tests when necessary libraries are installed.
author Rik <octave@nomad.inbox5.com>
date Wed, 02 Feb 2011 21:31:33 -0800
parents c0532bbaefd7
children
line wrap: on
line source

      subroutine xdasinh (x, result)
      external dasinh
      double precision x, result, dasinh
      result = dasinh (x)
      return
      end