source:
Roms_tools/Preprocessing_tools/hanning.m
@
1
Last change on this file since 1 was 1, checked in by cholod, 13 years ago | |
---|---|
File size: 287 bytes |
Rev | Line | |
---|---|---|
[1] | 1 | function h=hanning(h); |
2 | [M,L]=size(h); | |
3 | Mm=M-1; | |
4 | Mmm=M-2; | |
5 | Lm=L-1; | |
6 | Lmm=L-2; | |
7 | ||
8 | h(2:Mm,2:Lm)=0.125*(h(1:Mmm,2:Lm)+h(3:M,2:Lm)+... | |
9 | h(2:Mm,1:Lmm)+h(2:Mm,3:L)+... | |
10 | 4*h(2:Mm,2:Lm)); | |
11 | h(1,:)=h(2,:); | |
12 | h(M,:)=h(Mm,:); | |
13 | h(:,1)=h(:,2); | |
14 | h(:,L)=h(:,Lm); | |
15 | return | |
16 | ||
17 |
Note: See TracBrowser
for help on using the repository browser.