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 |
Line | |
---|---|
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.