TYPEMAP double T_DIFFERENT INPUT T_DIFFERENT $var = ($type)SvNV($arg);