- added

git-svn-id: http://moon:8086/svn/matlab/trunk@153 801c6759-fa7c-4059-a304-17956f83a07c
2021-03-22 20:28:22 +00:00
parent 1b5742e13e
commit b31f3e7435
140 changed files with 6054 additions and 0 deletions
@@ -0,0 +1,15 @@
+% [nl,nlf] = phnl(e,es,el,xs,xl,al,pl,nli)
+function [nl,nlf] = phnl(e,es,el,xs,xl,al,pl,nli)
+
+N = lge(e);
+e = abs(e);
+nl(1) = nli;
+
+for n = 2:N,
+  if((xs(n) <= pl*xl(n-1)) & (es(n) <= pl*el(n)))
+    nl(n) = al*e(n) + (1-al)*nl(n-1);
+  else
+    nl(n) = nl(n-1);
+  end;
+end;
+nlf = nl(N);