Mercurial > hg > ishara
annotate sinks/@sinkbase/sinkbase.m @ 61:eff6bddf82e3 tip
Finally implemented perceptual brightness thing.
author | samer |
---|---|
date | Sun, 11 Oct 2015 10:20:42 +0100 |
parents | f7fb679637ff |
children |
rev | line source |
---|---|
samer@10 | 1 % sinkbase - A useful base class for sinks |
samer@10 | 2 % |
samer@10 | 3 % sinkbase :: C:natural -> sink(C,_). |
samer@10 | 4 % sinkbase :: C:natural, R:nonneg -> sink(C,R). |
samer@10 | 5 classdef sinkbase < sink |
samer@10 | 6 properties (GetAccess=private,SetAccess=immutable) |
samer@10 | 7 chans |
samer@10 | 8 fs |
samer@10 | 9 end |
samer@10 | 10 methods |
samer@10 | 11 function s=sinkbase(channels,rate) |
samer@10 | 12 if nargin<2, rate=nan; end |
samer@10 | 13 if nargin<1, channels=nan; end |
samer@10 | 14 s.chans=channels; |
samer@10 | 15 s.fs=rate; |
samer@10 | 16 end |
samer@10 | 17 function c=rate(s), c=s.fs; end |
samer@10 | 18 function c=channels(s), c=s.chans; end |
samer@10 | 19 end |
samer@10 | 20 end |