function varout = sltpda_getvar(block, var)
% SLTPDA_GETVAR gets a mask value from a block. If the value can be
% numeric, it is returned as numeric, otherwise, it is left as a string.
% 
% usage: varout = sltpda_getvar(block, 'var');
% 
% M Hewitson 04-05-07
% 
% $Id: sltpda_getvar.m,v 1.1 2007/05/06 12:17:38 hewitson Exp $

varout = get(block, var);
if ~isempty(str2num(varout))
  varout = str2num(varout);
end