Lines Matching refs:lo
1314 (defun calcFunc-ninteg (expr var lo hi)
1315 (setq lo (math-evaluate-expr lo)
1317 (or (math-numberp lo) (math-infinitep lo) (math-reject-arg lo 'numberp))
1319 (if (math-lessp hi lo)
1320 (math-neg (calcFunc-ninteg expr var hi lo))
1327 (if (equal lo '(neg (var inf var-inf)))
1332 (math-float lo) (math-float thi) 'inf)
1333 lo thi)))
1335 (let ((tlo (if (math-lessp '(float 2 0) lo)
1336 lo '(float 2 0))))
1342 (or (math-equal lo hi)
1346 (math-float lo) (math-float hi) nil))))
1357 (defun math-ninteg-romberg (func expr lo hi mode)
1368 (setq s (nconc s (list (funcall func expr lo hi mode)))
1396 (defun math-ninteg-midpoint (expr lo hi mode) ; uses "math-ninteg-temp"
1399 (setq temp (math-div 1 lo)
1400 lo (math-div 1 hi)
1406 (range (math-sub hi lo))
1410 (x (math-add lo (math-mul '(float 5 -1) del)))
1426 (math-sub hi lo)
1429 (math-mul (math-add lo hi) '(float 5 -1))