blob: 4a1bb7fab1b803707005ce632a310523b8075205 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
//Obtain path of solution file
path = get_absolute_file_path('solution14_2.sce')
//Obtain path of data file
datapath = path + filesep() + 'data14_2.sci'
//Clear all
clc
//Execute the data file
exec(datapath)
//Calculate the kW rating for the chain
kW = kWd * (eta/100) * Ks/(K1 * K2)
printf("\nChoose appropriate chain from table 14.2 on page 550 from obtained kw value at a given rpm\n")
printf("\nHere, for %f kW rating at %f rpm, chain-16A (11.63 kW rating) is chosen\n",kW,n1)
|