divert(-1)
define(SCALAR,`ifelse($1,,`scalar0' ,$2,,vecabs ,$3,,vecscl ,$4,,vec3sc ,$5,,vec4sc ,err) ifelse($1,,(),$2,,($1),$3,,($1,$2),$4,,($1,$2,$3),$5,,($1,$2,$3,$4),err)')
define(scalar,`ifelse($1,,`scalar0' ,$2,,vecabs ,$3,,vecscl ,$4,,vec3sc ,$5,,vec4sc ,err) ifelse($1,,(),$2,,($1),$3,,($1,$2),$4,,($1,$2,$3),$5,,($1,$2,$3,$4),err)')

define(VECTOR,`ifelse($1,,`vector0' ,$2,,vecnor ,$3,,veccpy ,$4,,veccrs ,$5,,vec3cr,$6,,vec4cr,err) ifelse($1,,(),$2,,($1),$3,,($1,$2),$4,,($1,$2,$3),$5,,($1,$2,$3,$4),$6,,($1,$2,$3,$4,$5),err)')
define(vector,`ifelse($1,,`vector0' ,$2,,vecnor ,$3,,veccpy ,$4,,veccrs ,$5,,vec3cr,$6,,vec4cr,err) ifelse($1,,(),$2,,($1),$3,,($1,$2),$4,,($1,$2,$3),$5,,($1,$2,$3,$4),$6,,($1,$2,$3,$4,$5),err)')

define(VTRANS, `VTRNS($1,$2,$3,$4)')
define(vtrans, `vtrns($1,$2,$3,$4)')
divert