view test/@Sneetch/Sneetch.m @ 11542:695141f1c05c ss-3-3-55

snapshot 3.3.55
author John W. Eaton <jwe@octave.org>
date Sat, 15 Jan 2011 04:53:04 -0500
parents f9ab19428cd8
children
line wrap: on
line source

function [ s ] = Sneetch( mcbean )
% Test class: should produce error.

  if (nargin==1) && isa(mcbean, 'Sneetch')
    s = mcbean;
  else
    if nargin==0
      s.mcbean = 1;
    else
      s.mcbean = mcbean;
    end
    s = class(s, 'Sneetch');
    s.sylvester = 1;
  end
        
end