{((d/dt)(((∂T)/(∂x)))-((∂T)/(∂x))=(Subscript[f, 1])-D (OverDot[x])(d/dt)(((∂T)/(∂l)))-((∂T)/(∂l))=(Subscript[f, 2])+mg cos θ(d/dt)(((∂T)/(∂(OverDot[θ]))))-((∂T)/(∂θ))=-mg sin θ);