function p = gen(varargin)
% GEN gen class constructor.
%   p = gen('name',bits) creates a gen object from the input, were
%   'name' is a string and bits is the number of bits to be used for
%   coding the gene.  This constructor is used in the derived
%   classes "cdv" and "ddv" to create objects of respective
%   classes.  
if nargin == 0
  p=struct('value',[],'bits',0,'name','','dna',[]);
  p = class(p,'gen');
elseif nargin==1
  if isa(varargin{1},'gen')
    p=varargin{1};
  end
elseif nargin==2
  p=struct('value',[],'bits',varargin{2},'name',varargin{1} ...
	   ,'dna',[]);
  p=class(p,'gen');
end