view test/@Gork/Gork.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 ] = Gork( g )
  if (nargin==1) && isa(g,'Gork')
    s = sprk;
    return;
  end

  drk  = Dork();
  prk  = Pork();
  blrk = Blork();
  s.Cork = Cork(17);  % Aggregation.
  s.gark = -2;
  s.gyrk = -3;
  s = class(s,'Gork',drk,prk,blrk);
   
end