summaryrefslogtreecommitdiff
path: root/texmf-dist/scripts/ketpic/ketlib/ketpicscifiles6/Addcounter.sci
blob: c940a5432f2a1b431ab62ba9af0ea3bf1479a0bf (plain)
1
2
3
4
5
6
7
8
9
10
11
12
// 09.09.10

function Addcounter(varargin)
  global GCOUNTER;
  if Nargs==0
    N=1;
  else
    N=varargin(1);
    GCOUNTER=GCOUNTER+N;
  end;
endfunction;