TYPEMAP
__levmar_1D *			T_DOUBLE_1D
__levmar_2D *			T_DOUBLE_2D

INPUT
T_DOUBLE_1D
	$var = pack_1D($arg)
T_DOUBLE_2D
	$var = pack_2D($arg)

OUTPUT
T_DOUBLE_1D
	unpack_1D($arg, $var);
T_DOUBLE_2D
	unpack_2D($arg, $var);

