 
--> exec('E:\My program EM\5. Friction\5.3.sce', -1)

theta=30 degree
mu=0.115