Mercurial > hg > octave-avbm
view libcruft/slatec-fn/xdgamit.f @ 3278:9c9f0c035309
[project @ 1999-10-12 06:03:49 by jwe]
author | jwe |
---|---|
date | Tue, 12 Oct 1999 06:07:01 +0000 |
parents | |
children | c0532bbaefd7 |
line wrap: on
line source
subroutine xdgamit (a, x, result) double precision a, x, result, dgamit result = dgamit (a, x) return end