1 files changed, 17 insertions, 0 deletions
diff --git a/2975/CH25/EX25.4w/Ex25_4w.sce b/2975/CH25/EX25.4w/Ex25_4w.sce
new file mode 100644
index 000000000..36e6f815e
--- /dev/null
+++ b/2975/CH25/EX25.4w/Ex25_4w.sce
@@ -0,0 +1,17 @@
+//developed in windows 8 operating system 64bit
+//platform Scilab 5.4.1
+//example 25_4w
+
+clc;clear;
+//Given Data
+
+mass_water=100;     //Mass of water (Unit:g)
+latent_heat_water=21*10^5;      //Latent heat of vaporization of water at 0 degree centigrade (Unit: J/kg)
+latent_heat_ice=3.36*10^5;      //Latent heat of fusion of ice (Unit : J/kg)
+
+//Formula mL2=(M-m)L1
+
+//Calculation
+mass_ice=mass_water*latent_heat_water/(latent_heat_water+latent_heat_ice);      //Calculation of the mass of the ice formed if no water is left in the vessel (Unit : g)
+
+disp(mass_ice,"Mass of the ice formed if no water is left in the vessel (Unit: gram)");