1 files changed, 15 insertions, 0 deletions
diff --git a/443/CH1/EX1.3/1_3.sce b/443/CH1/EX1.3/1_3.sce
new file mode 100755
index 000000000..07a0e5a93
--- /dev/null
+++ b/443/CH1/EX1.3/1_3.sce
@@ -0,0 +1,15 @@
+pathname=get_absolute_file_path('1_3.sce')
+filename=pathname+filesep()+'1_3_data.sci'
+exec(filename)
+//indicated power(in kw):
+ip=bp/nm
+//frictional power(in kw):
+fp=ip-bp
+//brake power load(in kw):
+bpl=l*bp
+nml=bpl/(bpl+fp)
+printf("\n\nRESULTS\n\n")
+printf("\nindicated power:%f\n",ip)
+printf("\nfrictional power:%f\n",fp)
+printf("\nbrake power at load:%f\n",bpl)
+printf("\mechanical efficiency:%f\n",nml=nml*100)