Mercurial > hg > octave-nkf

view libcruft/slatec-fn/xdatanh.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 xdatanh (x, result)
      external datanh
      double precision x, result, datanh
      result = datanh (x)
      return
      end