summaryrefslogtreecommitdiff
path: root/3594/CH2/EX2.12/ex2_12.sce
blob: a8e755ed33eb95ea71ff7c075cdd0adf7ef54fb8 (plain)
1
2
3
4
5
6
7
8
9
10
11

clc
printf("\n")
//given
I=40//lb ft2
n=500//rpm
w=%pi*n/30//angular velocity
wp=2*%pi/5//angular velocity of precession
I1=I/32.2
T=I1*w*wp//gyroscopic couple
printf("the couple supplied to the shaft= %.2f lb ft\n",T)