Mercurial > octave-nkf

view test/@Gork/Gork.m @ 12409:2848dd7c4dd7 release-3-4-x release-3-4-0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
version 3.4.0 released
author John W. Eaton <jwe@octave.org>
date Tue, 08 Feb 2011 05:00:08 -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