github.com/gopherd/gonum@v0.0.4/mathext/internal/amos/amoslib/mysqrt.f (about) 1 DOUBLE PRECISION FUNCTION MYSQRT(A) 2 DOUBLE PRECISION A 3 MYSQRT = SQRT(A) 4 RETURN 5 END