diff options
Diffstat (limited to '2459/CH19/EX19.11/Ex19_11.sce')
| -rw-r--r-- | 2459/CH19/EX19.11/Ex19_11.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/2459/CH19/EX19.11/Ex19_11.sce b/2459/CH19/EX19.11/Ex19_11.sce new file mode 100644 index 000000000..c26d64a3b --- /dev/null +++ b/2459/CH19/EX19.11/Ex19_11.sce @@ -0,0 +1,13 @@ +//chapter19
+//example19.11
+//page423
+
+m=0.4
+Ic=8 // A
+// Pt=Pc+Ps and Ps=0.5*m^2*Pc so Pt=Pc*(1+m^2/2)
+// so Pt/Pc=1+m^2/2 but P is proportional to I^2 so
+// (It/Ic)^2=1+m^2/2 and thus we get
+
+It=Ic*(1+m^2/2)^0.5
+
+printf("antenna current for m=0.4 is = %.3f A \n",It)
|