function y = isscaleddouble(x)
% MATLAB Code Generation Library function.

%ISSCALEDDOUBLE  True for FI object with "scaleddouble" as the datatype input.
%   ISSCALEDDOUBLE(X) returns 1 if X is a FI object with datatype == scaleddouble;
%              and 0 if X is a FI object with datatype != scaleddouble.
%
%   Examples:
%     x = fi(pi, 'DataType','scaleddouble');
%     isscaleddouble(x)
%
%   Copyright 2007-2014 The MathWorks, Inc.
%#codegen

coder.extrinsic('strcmpi');

eml_invariant(nargin == 1, 'fixed:coder:incorrectNumberOfInputs');

T = eml_typeof(x);
y = coder.const(strcmpi(get(T, 'DataType'), 'ScaledDouble')); 

%----------------------------------------------------
