elisp で計算

(- 1.0 (/ (* 84000 3.0) (* (/ (* 90 4) 60) 126000)))
0.6666666666666667
(/ (* 84000 3.0) (* (/ (* 90 4) 60) 126000))
0.3333333333333333

(- 1.0 (/ (* 84000 5.0) (* (/ (* 90 7) 60) 126000)))
0.6666666666666667
(/ (* 84000 5.0) (* (/ (* 90 7) 60) 126000))
0.3333333333333333