view test/@Sneetch/Sneetch.m @ 10454:79a56d0a6a0d ss-3-3-51

version is now 3.3.51
author John W. Eaton <jwe@octave.org>
date Wed, 24 Mar 2010 16:27:05 -0400
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