%DOUBLEM Datafile mapping for conversion to double
%
%	B = DOUBLEM(A)
%	B = A*DOUBLEM
%
% For datasets B = A, in all other cases A is converted to double.

function a = doublem(a)

	prtrace(mfilename);
	
	if nargin < 1 | isempty(a)
		a = mapping(mfilename,'fixed');
		a = setname(a,'double');
	elseif isdataset(a)
		;
	elseif isdatafile(a)
		a = a*filtm([],'double');
	else
		a = double(a);
	end
	
return