slassq.p

DTMK软件开发包,此为开源软件,是一款很好的医学图像开发资源.

extern int slassq_(integer *n, real *x, integer *incx, real *scale, real *sumsq);