Mercurial > hg > octave-nkf

view test/classes/@Snork/power.m @ 16033:23a7661e529a ss-3-7-2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
snapshot version 3.7.2 * configure.ac (AC_INIT): Set version to 3.7.2. (OCTAVE_RELEASE_DATE): Set to 2013-02-09. (OCTAVE_COPYRIGHT): Update year.
author John W. Eaton <jwe@octave.org>
date Sun, 10 Feb 2013 00:59:19 -0500
parents f75ffcc82acb
children b1283d4c06c2
line wrap: on
line source

function s = power(s1, x)

  if ~isa(s1, 'Snork') || isa(x, 'Snork')
    error('power Snork!!!');
  end

  s = s1;
  s.gick = s.gick .^ x;

end