derf() obsoleted by erf() in fortran 2008

This commit is contained in:
edoapra 2023-10-13 15:40:40 -07:00
parent 741ef14e81
commit 45ab1cb48e
No known key found for this signature in database
GPG key ID: 48E12DA1EDE9E1B0

View file

@ -42,8 +42,7 @@ c
util_erf = f
#else
double precision x
double precision derf
util_erf=derf(x)
util_erf=erf(x)
#endif
return
end