Mercurial > octave-nkf
view libcruft/slatec-fn/xdgamma.f @ 11273:bd2643f0ce57 ss-3-3-54
snapshot 3.3.54
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Fri, 19 Nov 2010 16:05:58 -0500 |
parents | c0532bbaefd7 |
children |
line wrap: on
line source
subroutine xdgamma (x, result) external dgamma double precision x, result, dgamma result = dgamma (x) return end