Lines Matching defs:SA
87 REAL SA
105 DATA SA, CA/0.3E0, (0.4E0,-0.7E0)/
223 CALL CSSCAL(N,SA,CX,INCX)
251 SA = 0.0E0
256 CALL CSSCAL(5,SA,CX,INCX)
259 SA = 1.0E0
264 CALL CSSCAL(5,SA,CX,INCX)
267 SA = -1.0E0
272 CALL CSSCAL(5,SA,CX,INCX)
601 REAL FUNCTION SDIFF(SA,SB)
606 REAL SA, SB
608 SDIFF = SA - SB
