23 #define SFHALF r5  macro
88 		SFRAD = or(SFHALF,PRODLO)
95 		SFHALF = and(SFHALF,#-16)  define
111 		SF_H += sfmpy(SF_E,SFHALF):lib		// h0: 0.5*y0. Could also decrement exponent...
112 		SF_D = SFHALF
125 		SF_D = SFHALF
157 #undef SFHALF	// r5
349 #define SFHALF r5  macro
386 		SFHALF = ##0x3f000004						// form half constant  define
389 		SFRAD = or(SFHALF,TMPLO)			// form sf value
390 		SFHALF = and(SFHALF,#-16)  define