summaryrefslogtreecommitdiff
path: root/2252/CH6/EX6.10/Ex6_10.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /2252/CH6/EX6.10/Ex6_10.sce
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '2252/CH6/EX6.10/Ex6_10.sce')
-rwxr-xr-x2252/CH6/EX6.10/Ex6_10.sce13
1 files changed, 13 insertions, 0 deletions
diff --git a/2252/CH6/EX6.10/Ex6_10.sce b/2252/CH6/EX6.10/Ex6_10.sce
new file mode 100755
index 000000000..f0f56bd39
--- /dev/null
+++ b/2252/CH6/EX6.10/Ex6_10.sce
@@ -0,0 +1,13 @@
+
+//the graph is drawn considering R=%pi
+R=%pi
+theta=linspace(-%pi,%pi,100)
+V=sqrt(R^2-theta^2)
+plot2d(theta,V)
+xtitle("Wave shape for example 6.10","theta","Voltage")
+theta=linspace(%pi,3*%pi,100)
+V=-sqrt(R^2-(theta-2*%pi)^2)
+plot2d(theta,V)
+
+Vrms=sqrt(integrate('(R^2-x^2)/(2*R)','x',-R,R))
+mprintf("RMS value of such a wave shape will be %f of its maximum voltage",Vrms/R)