Mouse transducer

alias -l ABSN return $CALC(($1 * $1) ^ (2  ^ -1))
alias -l ATANN return $CALC($1 / $ABSN($1))

alias CLAMP return $CALC(($INT($CALC($1 / $2)) % 2) * -1 * $2 + ($1 % $2))

alias TRANSDUCE return $CALC($ATANN($1) * 2 * $ASIN($CALC($ABS($CLAMP($CALC($1 * $IIF($2,$v1,1)),2)) / 2)))
alias TRANSDUCE1 return $CALC($ATANN($1) * $ACOS($CALC((2 - ($CLAMP($CALC($1 * $IIF($2,$v1,1)),2) ^ 2)) / 2)))
alias TRANSDUCE2 var %a $calc($2 * $2 * 2), %b $CLAMP($1, $CALC(2 * $2)) | return $CALC($ATANN($1) * $ACOS($CALC((%a - (%b * %b)) / %a)))

alias RESOLUTION_AND_FOV_TO_RADIUS return $CALC($1 / $SIN($CALC($PI / (360 / $2))) / 2)