view libcruft/slatec-fn/xdgami.f @ 8779:949708f930d0

NEWS update
author Jaroslav Hajek <highegg@gmail.com>
date Tue, 17 Feb 2009 12:52:13 +0100
parents c0532bbaefd7
children
line wrap: on
line source

      subroutine xdgami (a, x, result)
      external dgami
      double precision a, x, result, dgami
      result = dgami (a, x)
      return
      end