Searched refs:nth (Results 1 - 25 of 542) sorted by relevance

1234567891011>>

/macosx-10.9.5/emacs-92/emacs/lisp/term/
H A Dlinux.el18 (set-input-mode (nth 0 value) (nth 1 value) 'iso-latin-1 (nth 3 value))))
/macosx-10.9.5/emacs-92/emacs/lisp/calc/
H A Dcalc-mtx.el70 (cols (length (nth 1 b)))
78 accum (math-mul (car ap) (nth col (car bp))))
80 (setq accum (math-add accum (math-mul (car ap) (nth col (car bp))))))
94 (math-matrix-trace-step 2 (1- (length mat)) mat (nth 1 (nth 1 mat)))
100 (math-add sum (nth n (nth n mat))))
115 (nth 2 (nth 2 m))
116 (math-neg (nth
[all...]
H A Dcalc-alg.el100 (let ((n (nth 2 expr)))
104 (a (nth 1 expr))
105 (prod (nth 1 expr)))
113 (a (math-pow (nth 1 expr) -1))
114 (prod (math-pow (nth 1 expr) -1)))
137 (error "Bad format in expression: %s" (nth 1 var)))
205 (error "Bad format in expression: %s" (nth 1 new)))
209 (error "Bad format in expression: %s" (nth 1 old)))
265 (if (or (math-beforep a (nth 2 b)) (Math-equal a (nth
[all...]
H A Dcalc-arith.el202 (math-add (math-abs (nth 1 a)) (math-abs (nth 2 a))))
204 (nth 1 a))
206 (math-abs-approx (nth 1 a)))
208 (math-max (math-abs (nth 2 a)) (math-abs (nth 3 a))))
256 (setq vec (nth 2 (car p)))
258 (let ((v (nth 1 (car p))))
265 (let ((st (assq (nth 1 (car vec))
268 ((eq (nth
[all...]
H A Dcalc-units.el319 (math-convert-units expr (nth pos units)))
322 (math-mul expr (nth pos units))))))))
343 (error "Bad format in units expression: %s" (nth 1 uold)))
355 (error "Bad format in units expression: %s" (nth 2 units)))
358 (assq (nth 1 units) math-standard-units-systems))))
362 (nth 1 std))))
398 (error "Bad format in units expression: %s" (nth 2 uold)))
409 (error "Bad format in units expression: %s" (nth 2 unew)))
452 (let ((name (or (nth 2 u) (symbol-name (car u)))))
462 (or (eq (nth
[all...]
H A Dcalc-frac.el102 (math-make-frac (math-add (math-mul (nth 1 a) (nth 2 b))
103 (math-mul (nth 2 a) (nth 1 b)))
104 (math-mul (nth 2 a) (nth 2 b)))
105 (math-make-frac (math-add (nth 1 a)
106 (math-mul (nth 2 a) b))
107 (nth 2 a)))
108 (math-make-frac (math-add (math-mul a (nth
[all...]
H A Dcalcsel2.el63 (if (eq sel (nth 2 outer))
68 (nth 1 (assq (car-safe (nth 1 outer))
70 (let* ((other (nth 2 (nth 1 outer)))
72 (car (nth 1 outer))
75 (nth 1 (nth 1 outer))
78 (setq sel (nth 2 (nth
[all...]
H A Dcalc-undo.el70 (calc-pop-stack 1 (nth 1 action) t))
72 (calc-push-list (nth 2 action) (nth 1 action)))
74 (calc-record-undo (list 'set (nth 1 action)
75 (symbol-value (nth 1 action))))
76 (set (nth 1 action) (nth 2 action)))
78 (let ((v (intern (nth 1 action))))
79 (calc-record-undo (list 'store (nth 1 action)
82 (calc-var-name (nth
[all...]
H A Dcalc-rewr.el62 (error "Bad format in expression: %s" (nth 1 rules)))
72 (error "Bad format in expression: %s" (nth 1 rhs)))
106 (setq calc-rewr-sel (if calc-rewr-sel t (nth 1 expr)))
107 (nth 1 expr))
124 (error "Bad format in expression: %s" (nth 1 rules)))
134 (error "Bad format in expression: %s" (nth 1 rhs)))
159 (error "Bad format in expression: %s" (nth 1 pat)))
207 (or math-mt-many (setq math-mt-many (or (nth 1 (car crules))
211 (math-rewrite-phase (nth 3 (car crules)))
256 (error (math-reject-arg rules (nth
[all...]
H A Dcalcalg2.el48 (error "Bad format in expression: %s" (nth 1 var)))
66 (error "Bad format in expression: %s" (nth 1 var)))
109 (error "Bad format in expression: %s" (nth 1 var)))
119 (error "Bad format in expression: %s" (nth 1 low)))
130 (error "Bad format in expression: %s" (nth 1 high)))
144 (nth 1 step)))))))))
169 (error "Bad format in expression: %s" (nth 1 var)))
186 (error "Bad format in expression: %s" (nth 1 var)))
196 (error "Bad format in expression: %s" (nth 1 var)))
221 (memq 'const (nth
[all...]
H A Dcalc-math.el316 (+ (* (nth 1 top) 1000) (car top)))))
318 (let* ((top (nth (1- len) a)))
385 (let* ((num-res (math-isqrt-bignum (cdr (Math-bignum-test (nth 1 a)))))
387 (den-res (math-isqrt-bignum (cdr (Math-bignum-test (nth 2 a)))))
394 num-sqrt (list 'calcFunc-sqrt (nth 1 a)))
396 den-sqrt (list 'calcFunc-sqrt (nth 2 a))))
402 (if (= (% (nth 2 a) 2) 0)
404 (cdr (Math-bignum-test (nth 1 a))))))
408 (/ (nth 2 a) 2))
415 (imag (math-sqrt (math-mul (math-sub d (nth
[all...]
H A Dcalc-poly.el43 (math-mul (calcFunc-pcont (nth 1 expr) var)
44 (calcFunc-pcont (nth 2 expr) var)))
46 (math-div (calcFunc-pcont (nth 1 expr) var)
47 (calcFunc-pcont (nth 2 expr) var)))
48 ((and (eq (car expr) '^) (Math-natnump (nth 2 expr)))
49 (math-pow (calcFunc-pcont (nth 1 expr) var) (nth 2 expr)))
51 (calcFunc-pcont (nth 1 expr) var))
55 (let ((lead (nth (1- (length p)) p))
62 (let ((cont (calcFunc-pcont (nth
[all...]
H A Dcalc-cplx.el98 (let ((r (math-normalize (nth 1 a)))
99 (th (math-normalize (nth 2 a))))
118 (if (math-zerop (nth 1 a))
119 (nth 1 a)
120 (let ((sc (calcFunc-sincos (nth 2 a))))
122 (math-mul (nth 1 a) (nth 1 sc))
123 (math-mul (nth 1 a) (nth 2 sc))))))
168 (cond ((and (Math-lessp 180 (nth
[all...]
H A Dcalc-incom.el50 (eq (nth 1 top) 'intv))
58 (memq (nth 1 top) '(cplx polar))))
62 (if (not (and (math-realp (nth 2 top))
63 (math-anglep (nth 3 top))))
80 (eq (nth 1 top) 'intv))
86 (setcar (cdr (cdr top)) (1+ (nth 2 top)))
89 (eq (nth 1 top) 'vec)))
105 (or (eq (nth 1 inc) 'vec)
112 (if (eq (nth 1 new) 'polar)
114 (if (eq (nth
[all...]
H A Dcalccomp.el101 (and (nth 1 calc-frac-format) (Math-integerp a)))
107 (math-float (nth 1 aa))
108 (nth 1 aa))
109 (nth 2 aa)) prec))
116 (if (math-negp (nth 1 aa))
120 (math-abs (nth 1 aa)))
122 (math-format-number (nth 2 aa))))))
132 (if (math-zerop (nth 2 a))
133 (math-compose-expr (nth 1 a) prec)
135 (math-compose-expr (nth
[all...]
H A Dcalc-sel.el51 (or (and keep (nth 2 entry))
89 (let ((sel (nth 2 entry)))
105 (if (nth 2 entry)
106 (let ((sel (nth 2 entry)))
121 (let ((sel (nth 2 entry))
128 (and (setq sel (and index (nth index old)))
131 (memq (car old) (nth index op))
140 (let ((sel (calc-find-nth-part (or (nth 2 calc-selection-cache-entry)
148 ;; calc-find-nth
[all...]
/macosx-10.9.5/emacs-92/emacs/leim/quail/
H A Dpy-punct.el54 (copy-sequence (nth 2 (assoc "chinese-py" quail-package-alist))))
56 (quail-defrule "v" (nth 2 (assoc "chinese-punct" quail-package-alist)))
76 (copy-sequence (nth 2 (assoc "chinese-tonepy" quail-package-alist))))
78 (quail-defrule "v" (nth 2 (assoc "chinese-punct" quail-package-alist)))
/macosx-10.9.5/emacs-92/emacs/lisp/url/
H A Durl-ns.el59 (= (logand (nth 0 netc) (nth 0 maskc))
60 (logand (nth 0 ipc) (nth 0 maskc)))
61 (= (logand (nth 1 netc) (nth 1 maskc))
62 (logand (nth 1 ipc) (nth 1 maskc)))
63 (= (logand (nth 2 netc) (nth
[all...]
/macosx-10.9.5/emacs-92/emacs/lisp/gnus/
H A Dnnultimate.el74 (sid (nth 2 entry))
75 (topics (nth 4 entry))
76 (mapping (nth 5 entry))
77 (old-total (or (nth 6 entry) 1))
98 (<= article (nth 1 mmap)))
100 (if (setq elem (assq (nth 2 mmap) fetchers))
103 (+ (nth 3 mmap) (incf farticle)))))
105 (push (list (nth 2 mmap)
107 (+ (nth 3 mmap) (incf farticle))))
126 (setq subject (nth
[all...]
H A Dnnwfm.el73 (sid (nth 2 entry))
74 (topics (nth 4 entry))
75 (mapping (nth 5 entry))
76 (old-total (or (nth 6 entry) 1))
93 (<= article (nth 1 mmap)))
95 (if (setq elem (assq (nth 2 mmap) fetchers))
98 (+ (nth 3 mmap) (incf farticle)))))
100 (push (list (nth 2 mmap)
102 (+ (nth 3 mmap) (incf farticle))))
117 (setq subject (nth
[all...]
/macosx-10.9.5/emacs-92/emacs/lisp/eshell/
H A Desh-opt.el68 (or (and (listp opt) (nth 3 opt))
118 (cond ((and (nth 0 opt)
119 (nth 1 opt))
123 (format "-%c, --%s" (nth 0 opt)
124 (nth 1 opt))
125 (nth 4 opt)))))
126 ((nth 0 opt)
130 (format "-%c" (nth 0 opt))
131 (nth 4 opt)))))
132 ((nth
[all...]
/macosx-10.9.5/emacs-92/emacs/lisp/
H A Dtalk.el53 (if (not (and elt (frame-live-p (setq frame (nth 1 elt)))))
55 (if (not (and elt (buffer-name (get-buffer (setq buffer (nth 2 elt))))))
65 (delete-frame (nth 1 elt))
66 (kill-buffer (nth 2 elt))
74 (let ((frame (nth 1 (car tail)))
75 (this-buffer (nth 2 (car tail)))
77 (mapcar (function (lambda (elt) (nth 2 elt)))
H A Dwindmove.el326 (x-min (nth 0 top-left))
327 (y-min (nth 1 top-left))
355 (let ((min-x (nth 0 frame-edges))
356 (min-y (nth 1 frame-edges))
357 (max-x (nth 2 frame-edges))
358 (max-y (nth 3 frame-edges)))
393 (let ((min-x (nth 0 frame-edges))
394 (min-y (nth 1 frame-edges))
395 (max-x (nth 2 frame-edges))
397 (- (nth
[all...]
H A Dtime.el240 (or (> (nth 0 next-time) (nth 0 current))
241 (and (= (nth 0 next-time) (nth 0 current))
242 (> (nth 1 next-time) (nth 1 current)))
243 (and (= (nth 0 next-time) (nth 0 current))
244 (= (nth 1 next-time) (nth
[all...]
/macosx-10.9.5/emacs-92/emacs/lisp/mail/
H A Dblessmail.el54 (setq modes (nth 8 attr))
59 (insert "chgrp " (number-to-string (nth 3 attr))
62 (insert "chown " (number-to-string (nth 2 attr))

Completed in 217 milliseconds

1234567891011>>