1 files changed, 14 insertions, 0 deletions
diff --git a/257/CH7/EX7.38/example_7_38.sce b/257/CH7/EX7.38/example_7_38.sce
new file mode 100644
index 000000000..152db1bf6
--- /dev/null
+++ b/257/CH7/EX7.38/example_7_38.sce
@@ -0,0 +1,14 @@
+Mp=0.5/2 *100;
+zeta=0.4036;
+
+for(n=0:3)
+    T=n*%pi/omegaD
+    if(n==2)
+        T=0.2
+        omegaN=2*%pi/(T*(sqrt(1-zeta^2)))
+        disp(omegaN," omegaN = ")
+    end
+end
+
+
+        
+\ No newline at end of file