Mercurial > hg > octave-lyh
view libcruft/slatec-fn/xderf.f @ 7635:ba7a3e20ee3d
add -struct modifier to save
author | Jaroslav Hajek <highegg@gmail.com> |
---|---|
date | Tue, 25 Mar 2008 15:29:26 -0400 |
parents | c0532bbaefd7 |
children |
line wrap: on
line source
subroutine xderf (x, result) external derf double precision x, result, derf result = derf (x) return end