SCDclass_mdsparfixdimvector.m

classdef SCDclass_mdsparfixdimvector < SCDclass_mdspar
    % A constant 1D vector real (single) MDS+ parameter
    % If the number of elements is different w.r.t. the
    % property dimension, the size is adjusted by zero
    % filling or clipping
    
    properties(Access=private)
        dimension
    end
    
    methods      
        function obj=SCDclass_mdsparfixdimvector(srctdimodel, destparam, destdimension, varargin)
            obj@SCDclass_mdspar();          
            % Constructor parser customization definitions here
            obj=obj.parseconstructorcommon(srctdimodel, destparam, varargin);
            % Constructor parser customization results here
            obj.dimension=destdimension;
            obj.classname=mfilename;
            obj.marteclassname='MDSParFixDimVector';
        end
        
        function actualizedata(obj, shot)            
            obj=obj.preactualizecommon(shot);
            if ~obj.actualizable, return; end
            
            numelements=numel(obj.value);
            if(numelements<obj.dimension)
                localgetcommand=sprintf('[%s; zeros(%d,1)]',obj.getcommand, obj.dimension-numelements);
            elseif(numelements>obj.dimension)
                localgetcommand=sprintf('%s(1:%d)', obj.getcommand, obj.dimension);
            else
                localgetcommand=obj.getcommand;
            end
            
            obj.assignstring=sprintf('%s=%s;',obj.assignvar,localgetcommand);
            obj.caststring=sprintf('%s=single(%s);',obj.assignvar,obj.assignvar);
                   
            obj.postactualizecommon(shot);   
            
        end
        
        function [obj, value] = getdata(obj,shot)
            [obj,value]=obj.getdatacommon(shot);
            value=single(value);
        end
        
        function printinfo(obj)
            obj.printinfocommon;
            fprintf('  Parameter fixed dimension is: %d\n',obj.dimension);
        end
        
        function entrystring = genMARTe2entry(obj, shot)
            entrystring=obj.genMARTe2entrycommon(shot);
            entrystring=[entrystring ' Dim=' num2str(obj.dimension)];
            entrystring=[entrystring ' }'];           
        end
        
        function out = casttomds(obj, in)
            out = single(in);
        end
    end
end