reorganized file structure

2010-04-17 12:00:00 -05:00
parent ecb6c5bb6b
commit 71f81ab34e
469 changed files with 0 additions and 37 deletions
--- a/strut/Func1.m
+++ b/strut/Func1.m
@@ -0,0 +1,10 @@
+ function F = Func1(theta,P,yrqd);
+ 
+ % Derivative of function 1
+ 
+ F=ppval(P,theta)*sin(theta)-yrqd;
+ if theta < 0
+    F=-theta^2+pi*theta-yrqd;
+ elseif theta > pi
+    F=-theta^2+pi*theta-yrqd;
+ end;