summaryrefslogtreecommitdiff
path: root/1172/CH4/EX4.7/Example4_7.sce
blob: f617077ff1730d3bc7bdf56fa96c021f21dc4430 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
clc
//Given that
g_pole = 9.8 // gravitational acceleration at pole
m = 1 // mass of substance in kg
R_e = 6.4e6 // radius of earth in m
// sample Problem 7  Page No. 179
printf("\n  # Problem 7 # \n")
printf("Standard formula used is \n coriolis force = -2*m*f x v\n \n")
 g_equator = 0.75 *g_pole // gravitational acceleration at equator in m/s^2
  f = sqrt ((g_pole - g_equator)/ R_e)
 printf ("Angular velocity of Earth will be %e rad/s .\n ",f)