
--> //initializations

--> H=4 //m (total height)
 H  = 

   4.


--> x=30 // (angle of shearing resistance)
 x  = 

   30.


--> y=15 // (angle with hirizontal)
 y  = 

   15.


--> Y=19 //KN/m^3 (unit weight)
 Y  = 

   19.


--> //calculations

--> Ka=(cosd(y)*(cosd(y)-sqrt(cosd(y)^2-cosd(x)^2)))/(cosd(y)+sqrt(cosd(y)^2-cosd(x)^2)) //(coefficient of active earth pressure)
 Ka  = 

   0.3729499


--> Pa=(Ka*Y*H^2)/2 //(active earth pressure)
 Pa  = 

   56.688378


--> //results

--> printf('active earth pressure acts at a height of 4/3 m and inclined at 15(degree) to normal is =%f',Pa) //KN
active earth pressure acts at a height of 4/3 m and inclined at 15(degree) to normal is =56.688378