(= (Quantity.Dimension Pascal) (* Force-Dimension (Expt Length-Dimension -2)))
(= Megapascal (* Pascal 1000000))