summaryrefslogtreecommitdiff
path: root/3751/CH17/EX17.19/Ex17_19.sce
blob: 123d0f32041ba068d1e65e455a5d04a28b0fed37 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
//Fluid Systems - By Shiv Kumar
//Chapter 17- Dimensional and Model Analysis
//Example 17.19
//To Find the Speed of Air in Wind Tunnel and Determine the The Ratio of Drag(Resistance) between the Model and its Prototype.

     clc
     clear

//Given:-
         Lr=30;       //Scale Ratio (Lp/Lm)
     //For Model ( Working Fluid is Air),
             nu_m=0.016;       //Kinematic Viscosity of Air, Stoke
             rho_m=1.24;     //Density of Air, Kg/m^3

     //For Prototype ( Working Fluid is Sea Water),
           Vp=10;       //Speed of Sub-marine (Prototype), m/s
           nu_p=0.012;      //Kinematic Viscosity of Sea Water, Stoke
           rho_p=1030;      //Density of Sea Water, Kg/m^3

//Computations:-
        //From Reynold's Law of Similarity,
               Vm=Vp*(nu_m/nu_p)*Lr;      //Velocity of Air, m/s

               Fp_by_Fm=(rho_p/rho_m)*Lr^2*(Vp/Vm)^2;        //Ratio of Drag Force (Resistance)


//Results:-
         printf("The Speed of Air in Wind Tunnel,  Vm=%.f m/s\n",Vm)
         printf("The Ratio of Drag Force (Resistance), Fp/Fm=%.3f  \n",Fp_by_Fm)