blob: 668dd839cab10497963d7df55a917cfa04a24ccc (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
clc
clear
printf("example 2.15 page number 75\n\n")
//to find u_in, M_v, k'
u_in = 0.575 //from the graph
u_s = 0.295 //in mPa-s
M_v = (u_in/(5.80*10^-5))^(1/0.72);
u_red = 0.628; //in dl/g
c = 0.40 //in g/dl
k = (u_red-u_in)/((u_in^2)*c);
printf("k = %f \nMv = %f\nu_in = %f dl/gm",k,M_v,u_in)
|
