-
David Gaskell authoredDavid Gaskell authored
dy.f 109 B
real function dy(x)
DOUBLE PRECISION V,HQUADF
v = dble(x)
dy = float(HQUADF(v))
end
real function dy(x)
DOUBLE PRECISION V,HQUADF
v = dble(x)
dy = float(HQUADF(v))
end