Linux server.edchosting.com 4.18.0-553.79.1.lve.el7h.x86_64 #1 SMP Wed Oct 15 16:34:46 UTC 2025 x86_64
LiteSpeed
Server IP : 75.98.162.185 & Your IP : 216.73.216.163
Domains :
Cant Read [ /etc/named.conf ]
User : goons4good
Terminal
Auto Root
Create File
Create Folder
Localroot Suggester
Backdoor Destroyer
Readme
/
usr /
share /
emacs /
24.3 /
lisp /
calc /
Delete
Unzip
Name
Size
Permission
Date
Action
README
8.41
KB
-rw-r--r--
2013-01-02 20:45
README.prev
30.98
KB
-rw-r--r--
2013-01-01 15:37
calc-aent.elc
26.25
KB
-rw-r--r--
2023-06-07 04:11
calc-alg.elc
47.46
KB
-rw-r--r--
2023-06-07 04:11
calc-arith.elc
80.63
KB
-rw-r--r--
2023-06-07 04:11
calc-bin.elc
21.67
KB
-rw-r--r--
2023-06-07 04:11
calc-comb.elc
28.98
KB
-rw-r--r--
2023-06-07 04:11
calc-cplx.elc
8.44
KB
-rw-r--r--
2023-06-07 04:11
calc-embed.elc
29.32
KB
-rw-r--r--
2023-06-07 04:11
calc-ext.elc
107.11
KB
-rw-r--r--
2023-06-07 04:11
calc-fin.elc
11.78
KB
-rw-r--r--
2023-06-07 04:11
calc-forms.elc
47.54
KB
-rw-r--r--
2023-06-07 04:11
calc-frac.elc
6.07
KB
-rw-r--r--
2023-06-07 04:11
calc-funcs.elc
25.39
KB
-rw-r--r--
2023-06-07 04:11
calc-graph.elc
35.03
KB
-rw-r--r--
2023-06-07 04:11
calc-help.elc
20.46
KB
-rw-r--r--
2023-06-07 04:11
calc-incom.elc
5.22
KB
-rw-r--r--
2023-06-07 04:11
calc-keypd.elc
15.92
KB
-rw-r--r--
2023-06-07 04:11
calc-lang.elc
58.46
KB
-rw-r--r--
2023-06-07 04:11
calc-loaddefs.el
10.05
KB
-rw-r--r--
2023-06-07 04:00
calc-macs.elc
6.03
KB
-rw-r--r--
2023-06-07 04:11
calc-map.elc
28.51
KB
-rw-r--r--
2023-06-07 04:11
calc-math.elc
59.89
KB
-rw-r--r--
2023-06-07 04:11
calc-menu.elc
38.83
KB
-rw-r--r--
2023-06-07 04:11
calc-misc.elc
21.87
KB
-rw-r--r--
2023-06-07 04:11
calc-mode.elc
19.64
KB
-rw-r--r--
2023-06-07 04:11
calc-mtx.elc
6.91
KB
-rw-r--r--
2023-06-07 04:11
calc-nlfit.elc
13.37
KB
-rw-r--r--
2023-06-07 04:12
calc-poly.elc
24.29
KB
-rw-r--r--
2023-06-07 04:12
calc-prog.elc
50.68
KB
-rw-r--r--
2023-06-07 04:12
calc-rewr.elc
39.51
KB
-rw-r--r--
2023-06-07 04:12
calc-rules.elc
17.54
KB
-rw-r--r--
2023-06-07 04:12
calc-sel.elc
19.82
KB
-rw-r--r--
2023-06-07 04:12
calc-stat.elc
13.92
KB
-rw-r--r--
2023-06-07 04:12
calc-store.elc
16.85
KB
-rw-r--r--
2023-06-07 04:12
calc-stuff.elc
7.78
KB
-rw-r--r--
2023-06-07 04:12
calc-trail.elc
4.76
KB
-rw-r--r--
2023-06-07 04:12
calc-undo.elc
3.29
KB
-rw-r--r--
2023-06-07 04:12
calc-units.elc
52.73
KB
-rw-r--r--
2023-06-07 04:12
calc-vec.elc
37.74
KB
-rw-r--r--
2023-06-07 04:12
calc-yank.elc
16.59
KB
-rw-r--r--
2023-06-07 04:12
calc.elc
102.9
KB
-rw-r--r--
2023-06-07 04:12
calcalg2.elc
78.94
KB
-rw-r--r--
2023-06-07 04:12
calcalg3.elc
41.76
KB
-rw-r--r--
2023-06-07 04:12
calccomp.elc
33.11
KB
-rw-r--r--
2023-06-07 04:12
calcsel2.elc
5.98
KB
-rw-r--r--
2023-06-07 04:12
Save
Rename
;ELC ;;; Compiled by mockbuild@buildfarm06.corp.cloudlinux.com on Wed Jun 7 08:12:07 2023 ;;; from file /builddir/build/BUILD/emacs-24.3/lisp/calc/calcsel2.el ;;; in Emacs version 24.3.1 ;;; with all optimizations. ;;; This file uses dynamic docstrings, first added in Emacs 19.29. ;;; This file does not contain utf-8 non-ASCII characters, ;;; and so can be loaded in Emacs versions earlier than 23. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (byte-code "\300\301!\210\300\302!\207" [require calc-ext calc-macs] 2) (defalias 'calc-commute-left #[(arg) "\301W\203 \302[!\207\303\304!\207" [arg 0 calc-commute-right calc-do #[nil "\306 \210\307\310`!] \311U\203 \312 \203 S\211\311Y\205\257\313\n\304\"\211 @ \314\f! !\312\211 \" #!\203D \315 !\"\211\":\204H \316\317!\210$\203@\"@%\236\203@\320\"!\" &!\321&8=\203\357 \322\"&\211@&A@\242%\236A@>\203\253 \321&A@8 '\323&A@@\323&@&A@A@!#'# #\321#A@8!#*\202\351 &@\324=\203\304 \323\325\326!!\211!&A@#\202\351 &@\327=\203\336 \323\330\331\307!\"\211!&A@#\202\351 \323&@!&A@###\202<\320\"&\"\211 (:\203&\321(8=\203(@&@=\204\312#\202;\323(@!\323(@(A@\321&8##\211#A@!\322\"(###))\202o\"A@!=\203P\312#\202o\332\"!\"S\333\"!\211#\233\211 )A)@\240\210)!\240\210)#\204\220 \203\316\334!\210\202\253 \204\213\335\307 C\n\336$\210\311\202\253\337\307\340\322 \"##C\n \311=\203\246 \205\250!C%\210-\202 *\207" [calc-keep-selection calc-sel-reselect num arg entry expr calc-preserve-point 1 calc-locate-cursor-element 0 nil calc-top calc-auto-selection calc-find-assoc-parent-formula error "No term is selected" calc-find-parent-formula 2 calc-replace-sub-formula calc-build-assoc-term - + math-neg / * calcFunc-div calc-find-sub-formula copy-sequence "Term is already leftmost" calc-pop-push-list (nil) calc-pop-push-record-list "left" sel parent new calc-assoc-selections calc-assoc-ops outer other next p] 10]] 2 nil "p"]) (defalias 'calc-commute-right #[(arg) "\301W\203 \302[!\207\303\304!\207" [arg 0 calc-commute-left calc-do #[nil "\306 \210\307\310`!] \311U\203 \312 \203 S\211\311Y\205\241\313\n\304\"\211 @ \314\f! !\312\211 \" #!\203D \315 !\"\211\":\204H \316\317!\210$\2030\"@%\236\2030\320\"!\" &!&A@=\203\350 \321\"&\211@\322\211&8\242%\2368>\203\237 \322&8A@ '\323&@'\323\322&8@!\322\211&88##)\202\342 &@\324=\203\265 \323\325\326\322&8!!#\202\327 &@\327=\203\314 \323\330\331\307\322&8\"!#\202\327 \323&@\322&8!# #\322#8!#)##\202,\320\"&\"\211 (:\203\377 &(A@=\204\312#\202+\323&@\323(@&A@\322(8#!##\322#8!\321\"(###))\202a\"GS\"8!=\203C\312#\202a\332\"!\"\333\"!\211#\233\211 )\211A@\240\210)A!\240\210)#\204\202 \203q\316\334!\210\202\235 \204}\335\307 C\n\336$\210\311\202\235\337\307\340\321 \"##C\n \311=\203\230 \205\232!C%\210-\202 *\207" [calc-keep-selection calc-sel-reselect num arg entry expr calc-preserve-point 1 calc-locate-cursor-element 0 nil calc-top calc-auto-selection calc-find-assoc-parent-formula error "No term is selected" calc-find-parent-formula calc-replace-sub-formula 2 calc-build-assoc-term - + math-neg / * calcFunc-div calc-find-sub-formula copy-sequence "Term is already rightmost" calc-pop-push-list (nil) calc-pop-push-record-list "rght" sel parent new calc-assoc-selections calc-assoc-ops outer other next p] 13]] 2 nil "p"]) (defalias 'calc-build-assoc-term #[(op lhs rhs) "\303=\203* \304 !\204# \242\305=\203* \306 A@!\203* \307 8\310=\203* \311\n\312 !E\207\311=\203T \304 !\204M \242\305=\203T \306 A@!\203T \307 8\310=\203T \303\n\312 !E\207\313=\203y \242\314=\203y \315 A@\316\"\204r A@\317\232\203y \314\n\307 8E\207\314=\203\236 \242\314=\203\236 \315 A@\316\"\204\227 A@\320\232\203\236 \314\n\307 8E\207\n E\207" [op rhs lhs + math-looks-negp cplx math-negp 2 0 - math-neg * / math-equal-int 1 (cplx 1 0) (cplx 1 0)] 4]) (defalias 'calc-sel-unpack #[nil "\300\301!\207" [calc-do #[nil "\306 \210\307\310`!] \311\303\"\211@ \312 !\206 \f \313 !\204( G\314U\204, \315\316!\210\317\307\320\321\f \211A@#C\n\205? A@C%-\207" [num calc-keep-selection calc-sel-reselect entry expr sel calc-preserve-point 1 calc-locate-cursor-element calc-top calc-auto-selection math-primp 2 error "Selection must be a function of one argument" calc-pop-push-record-list "unpk" calc-replace-sub-formula] 8]] 2 nil nil]) (defalias 'calc-sel-isolate #[nil "\300\301`\"\207" [calc-do #[nil "\306 \210\307\310`!] \311\303\"\211@ \312 !\206 \313\314!\211 \315 \316\f\"\211:\2045 \313\317!\203> @\236\203# \320 #\211\204O \313\321!\210\322\323\3248 \"?A@ ==\203g \202x @\236A@\3248A@E!\325\307\326\327\f#C\n\205\214 C%\210\330 .\207" [num calc-keep-selection calc-sel-reselect entry expr sel calc-preserve-point 1 calc-locate-cursor-element calc-top calc-auto-selection error "No selection" nil calc-find-parent-formula "Selection must be a member of an equation" math-solve-eqn "No solution found" calc-encase-atoms calc-find-sub-formula 2 calc-pop-push-record-list "isol" calc-replace-sub-formula calc-handle-whys eqn soln calc-tweak-eqn-table calc-hyperbolic-flag] 8]] 3 nil nil]) (defalias 'calc-sel-commute #[(many) "\302\303\304 \305#\210)\306 \207" [calc-assoc-selections many nil calc-rewrite-selection "CommuteRules" "cmut" calc-set-mode-line] 4 nil "P"]) (defalias 'calc-sel-jump-equals #[(many) "\301\302\303#\207" [many calc-rewrite-selection "JumpRules" "jump"] 4 nil "P"]) (defalias 'calc-sel-distribute #[(many) "\301\302\303#\207" [many calc-rewrite-selection "DistribRules" "dist"] 4 nil "P"]) (defalias 'calc-sel-merge #[(many) "\301\302\303#\207" [many calc-rewrite-selection "MergeRules" "merg"] 4 nil "P"]) (defalias 'calc-sel-negate #[(many) "\301\302\303#\207" [many calc-rewrite-selection "NegateRules" "jneg"] 4 nil "P"]) (defalias 'calc-sel-invert #[(many) "\301\302\303#\207" [many calc-rewrite-selection "InvertRules" "jinv"] 4 nil "P"]) (provide 'calcsel2)