;ELC
;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:11:49 2024
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/textmodes/reftex-parse.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.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


(require 'reftex)
(defalias 'reftex-with-special-syntax '(macro . #[(&rest body) "\301\302\303\304\305\301\306BBE\307BBE\207" [body let ((saved-syntax (syntax-table))) unwind-protect progn (set-syntax-table reftex-syntax-table) ((case-fold-search nil)) ((set-syntax-table saved-syntax))] 8]))
#@21 Re-parse this file.
(defalias 'reftex-parse-one #[nil "\301\302\303!)\207" [reftex-enable-partial-scans t reftex-access-scan-info (4)] 2 (#$ . 859) nil])
#@27 Re-parse entire document.
(defalias 'reftex-parse-all #[nil "\300\301!\207" [reftex-access-scan-info (16)] 2 (#$ . 1020) nil])
#@72 Do a document rescan.  When allowed, do only a partial scan from FILE.
(defalias 'reftex-do-parse #[(rescan &optional file) "\306=\203\n\306\202)\307=\203\307\202)\310\232\203\306\202)\311\232\203(\307\202)\307	\2040\307\nJ\312 \313\f!\314\315\f!!':\206H\316 :\313:!;\317\236\320\236A\321\211<\321\211=>\306=\203\201\322:D\235\203\323:D\235\204\201\307;
\230\203\212\307\306=\203\231:\206\246\f\202\246\307=\203\243\f\202\246\324\325!<\307\232\203\261\321\326\327\322<D#?\326\330\322<D#\331?\"\210\307=\203\331\332\333!\210\202\337\332\334<\"\210\335 @\336\216\337A!\210\321B\340 C\341\216\212\342\216\343<='#=.\332\344!\210=\237=\345=\307=#=\346=\236\204$
\346\321B=B=\347=\236\2044
\347'B=B=\317=\236\204E
\317AB=B=\322=\236=>D\322DA\236ED\205\\
E??(\350=\236\206r
\350(D=B\211=@\211F(\321B\241\210,\203\210
\351\352\"\320=\236\211G\203\233
G\241\210\202\244
\320B=B=)\353=\236\204\352
\354\355=\"H\356\357H\"I\360\321I\"I\360\321\356\361I\"\"\211J\203\333
\362\363\364J\365#\366Q\202\334
\367K\353IKE=B=-\n=L\210\370\n\371\306#.\f\207" [rescan reftex-enable-partial-scans reftex-docstruct-symbol old-list master true-master t 1 (4) (16) reftex-TeX-master-file file-truename file-name-as-directory file-name-directory buffer-file-name bibview-cache index-tags nil bof eof error "This should not happen (reftex-do-parse)" reftex-last-assoc-before-elt toc appendix reftex-init-section-numbers message "Scanning entire document..." "Scanning document from %s..." syntax-table ((set-syntax-table saved-syntax)) set-syntax-table current-window-configuration ((set-window-configuration #1=#:wconfig)) ((reftex-kill-temporary-buffers)) reftex-parse-from-file "Scanning document... done" reftex-replace-label-list-segment label-numbers master-dir is-multi sort string< xr reftex-all-assq xr-doc mapcar #[(x) "\303\3048\305	#\211\203A@\nB\207\306\307\3048\"\210\310\207" [x master-dir tmp reftex-locate-file 2 "tex" message "Can't find external document %s" nil] 4] delq car "\\`\\(" mapconcat identity "\\|" "\\)" "\\\\\\\\\\\\" put modified file true-file from-file docstruct tmp reftex-active-toc saved-syntax reftex-syntax-table case-fold-search #1# bof1 bof2 entry index-tag-cell allxr alist allprefix regexp] 6 (#$ . 1153)])
(defalias 'reftex-everything-regexp #[nil "\203	\207\n\207" [reftex-support-index reftex-everything-regexp reftex-everything-regexp-no-index] 1])
#@143 Return a list of all files belonging to the current document.
When RELATIVE is non-nil, give file names relative to directory
of master file.
(defalias 'reftex-all-document-files #[(&optional relative) "J\306\307 !\310\311\n!P\312\211\312\313\314	\"\211\203E
A@
	>A\203=\315\"\203=\316\225\312O\fB\202\f\237.\207" [reftex-docstruct-symbol all master-dir re file-list tmp file-name-directory reftex-TeX-master-file "\\`" regexp-quote nil assoc bof string-match 0 file relative] 4 (#$ . 3688)])
(defalias 'reftex-parse-from-file #[(file docstruct master-dir) "\306 \307\310\211\211\311\312\310\211\211\211
\313\314\215\210.\207" [buf next-buf index-entry toc-entry highest-level level reftex-everything-regexp 0 nil 1 100 exit (byte-code "\306\307	#\211\204\310!\211\203\311!\n\204%\312D\fB\313\314\315\"\210\212\316\317\"\210\320\n
\321=?\"\211@q\210\311 \322D\fB\323 A\324\216\325B!\210\315C\212\214~\210\326b\210\327D\315\321#\203g
\326\225\203q\330\331\326!E#\fB\202U\332\225\203\276\333\224E`Sf\334=\203\205\335u\210\336!\211F\203U\337F8GHG^HGHU\203\262\316\340\341GI\"@\342F8#\210F\fBFJ\202U\343\225\203\335\331\343!K\344\315\345\346L\"\"\204U\347K\f	#\202U\350\225\203\360\351\315\321\"\210\352\321B\fB\202U\353\225\203
M\203U\354!\211N\203U\355\356NA@\"\210N\fB\202U\357\225\203`
\212\331\357!O\357\225b\210\360 P\361\216\362\363O!!*Q\364OR\"A@\211S\203F
\333\225b\210\202M
\357\225b\210\365 \210\330QE\315\211%\211T\fB-\202U\366\367!\210\202U\370	!\211U\203w
\371UB\fB\326b\210\327\372\315\321#\203\210
\373B\fB\326b\210\327\374\315\321#\203\241
\375\331\376!\331\332!E\fB\202\213
\377D\fB.\201V@!\207" [file master-dir file-found buf docstruct reftex-keep-temporary-buffers reftex-locate-file "tex" reftex-get-buffer-visiting buffer-file-name file-error throw exit nil message "Scanning file %s" reftex-get-file-buffer-force t bof syntax-table ((set-syntax-table saved-syntax)) set-syntax-table 1 re-search-forward reftex-label-info reftex-match-string 3 0 92 -1 reftex-section-info 5 "Scanning %s %s ..." rassoc 6 7 delq mapcar #[(x) "\302	\"\207" [x include-file string-match] 3] reftex-parse-from-file 9 reftex-init-section-numbers appendix 10 reftex-index-info add-to-list index-tags 11 match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) reftex-no-props reftex-nth-arg-wrapper assoc reftex-move-over-touching-args error "This should not happen (reftex-parse-from-file)" reftex-locate-bibliography-files bib "\\(\\`\\|[\n
]\\)[ 	]*\\\\begin{thebibliography}" thebib "[\n
][ 	]*\\\\externaldocument\\(\\[\\([^]]*\\)\\]\\)?{\\([^}]+\\)}" xr-doc 2 eof next-buf saved-syntax reftex-syntax-table case-fold-search regexp bound toc-entry level highest-level reftex-section-levels-all reftex-active-toc include-file reftex-no-include-regexps reftex-support-index index-entry mac save-match-data-internal label reftex-env-or-mac-alist typekey entry tmp reftex-kill-temporary-buffers] 7) include-file tmp file-found bound regexp docstruct] 11])
(defalias 'reftex-locate-bibliography-files #[(master-dir &optional files) "\204\212eb\210\302\303\304\305	\306#\307Q\310\311#\203\312\313\314!\315\")\205,\316\317\"\320\310\"\207" [files reftex-bibliography-commands re-search-forward "\\(^\\)[^%\n
]*\\\\\\(" mapconcat identity "\\|" "\\){[ 	]*\\([^}]+\\)" nil t split-string reftex-match-string 3 "[ 	\n
]*,[ 	\n
]*" mapcar #[(x) "	\235\206
\304\305\306\307\n\"\"?\205\310\311#\207" [x reftex-bibfile-ignore-list reftex-bibfile-ignore-regexps master-dir delq nil mapcar #[(re) "\302	\"\207" [re x string-match] 3] reftex-locate-file "bib"] 5] delq] 6])
(defalias 'reftex-replace-label-list-segment #[(old insert &optional entirely) "\203\f\306	\211G\"\210\n\207	\n@A@\307\fD	\235\310\fD	\235\f\311
\f\203,
\2043\312\313!\210\202U\306\f\211G
GZ\"\210	G\fGZ\211
\233\nA\241\210GS\233
A\241\210-\207" [entirely old insert new file eof-list reftex-silence-toc-markers eof bof nil error "Cannot splice" bof-list n] 5])
(defalias 'reftex-section-info #[(file) "\306 \307\224S\310\223\311\307!\312 \313\216\314\315	\"\205\316\317	\"*\320	\f\"A\2119\2034\312 \321\216
 *\2025
$\307\225f\322U\211%\206F$\323W&\324$!$\325$&\"'\312 \326\216\212\327!+(\330\307\224Sd\331\323\225(G\317#^\")\332(!*\333+$_\334\",A@\205\214'\335P\203\230\336!\337P\202\231\340*R*\341\342*-$')\343!\257	.\f\207" [marker macro save-match-data-internal prefix reftex-section-levels-all level-exp make-marker 3 nil reftex-match-string match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) string-match "begin{\\([^}]+\\)}" match-string 1 assoc ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) 42 0 abs reftex-section-number ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) reftex-context-substring buffer-substring-no-properties + reftex-nicify-text make-string 32 " " capitalize ": " "" toc "toc" marker-position level star unnumbered section-number text1 literal text reftex-level-indent reftex-label-menu-flags file] 11])
(defalias 'reftex-ensure-index-support #[(&optional abort) "\203\303\207\304\305!\203\306\307\211\207\n\203\310\311!\207\312\311!\210\313 \210\314\315!\207" [reftex-support-index current-prefix-arg abort t y-or-n-p "Turn on index support and rescan entire document? " demanded (16) error "No index support" message ding sit-for 1] 2])
(defalias 'reftex-index-info-safe #[(file) "\304 \305\216\306	!\210\307\310!+\207" [saved-syntax reftex-syntax-table case-fold-search file syntax-table ((set-syntax-table saved-syntax)) set-syntax-table nil reftex-index-info] 2])
(defalias 'reftex-index-info #[(file) "\300\301\215\207" [exit (byte-code "\306\307!\307\224\307\225\310\"\206\311\312\313\"\314\f8\315
!\205)
 \205)\311\312\313\"\fA@ \316\f8! ;\203@ \202X \250\203W\nb\210\317 \320\f8\"\206X\321\202X\321\"\nb\210\317\322\f8\320\f8\"\206i\323#\nb\210\324 \210`$\325\313w\210`%	b\210\326\313x\210`&\327&%\"'\330(#\"\205\231\331\224T)#\331)O*!\203\260!*P\202\262*\211+\227,\332\333\334+-\"\335#.$b\210\336\"'/	#+.,)\257\n.\207" [macro bom boa reftex-index-macro-alist entry exclude reftex-match-string 10 assoc throw exit nil 3 fboundp 2 reftex-nth-arg 6 "idx" 5 "" reftex-move-over-touching-args "^ 	\n
" "^ 	
\n" buffer-substring-no-properties string-match 0 mapconcat identity split-string " ! " index test-dummy itag prefix index-tag arg end-of-args end-of-context begin-of-context context reftex-index-key-end-re key-end rawkey key sortkey reftex-index-level-re showkey file] 11)] 2])
(defalias 'reftex-short-context #[(env parse &optional bound derive) ":\203	\203A\202@\306\204\212\307 )\202\266\310=\203n\n\311\230\203Y\212\312e\310#\203@\313\225\203@\314\225b\210\307 \202U\f\203T\315\316\317\f8\"\210\320\321\317\f8\"\202U\322)\202\266\212
b\210\323\n!\324=\204h\325 \210\307 )\202\266;\203\213\212\312 \310#\203\206\314\225b\210\307 \202\207\326)\202\266\250\203\246\212
b\210\327\330\331\n!\"8\")\206\266\332\202\266\333!\203\265\212\334\335\336\217)\202\266\337!\207" [parse derive env reftex-section-or-include-regexp reftex-active-toc reftex-default-context-position reftex-nicify-text reftex-context-substring t "section" re-search-backward 2 0 string-match "{\\([^}]*\\)" 7 match-string 1 "SECTION HEADING NOT FOUND" string-to-char 92 reftex-move-over-touching-args "NO MATCH FOR CONTEXT REGEXP" reftex-nth-arg 6 assoc "" fboundp error-var (funcall parse env) ((error (byte-code "\301\302A\"\207" [error-var format "HOOK ERROR: %s"] 3))) "INVALID VALUE OF PARSE" bound reftex-env-or-mac-alist] 7])
(defalias 'reftex-where-am-I #[nil "J\306\307\211\211\212\204\300
\fT\310\311 \307\312#\211\2049\313\314 D
\235@\206\273
\315\211?\206\273
\313
\236\206\273
\316\202\273
\317\225\203H\320\321\317!J\"\202\273
\322\225\203\323\322\224Sb\210\313\314 D
\235*\323\314 D*\235@+\307,*\203\315+*@=\204\315*@@\324=\203\302\314 \322*@8\230\203\302`\325\326*@8!\203\236\327\326*@8!\206\243\330*@8\232\203\262*@,\307*\202\302\331\332\333*@8!!\203\302*@*\211A*@\210\202g,+\202\273
\333\225\203\352\323\334\321\333!\335\336
\236A#D
\235@\202\273
\337\225\203\366\340J\236\202\273
\341\225\203\237
-\205\273
\212\342\307!).\313\314 D
\235*\323\314 D*\235@+\307\211/0\3071\3062*\203x
+*@=\204x
*@@\343=\203o
\315.8\315*@8\230\203o
2T2\344`\326*@8Z!/0\203f
/0W\203o
/0*@1*A\211*\204*
2\317U\204\206
/\306\232\203\213
1\202\232
2\317V\203\231
\3151\202\232
\307.\202\273
\345\225\203\270
\212\345\225b\210\320\346\347\321\345!!!J\")\202\273
\350\351!\211\203)\204\315
\n\203\315
\n\315\f-\317=B\207" [reftex-docstruct-symbol found rtn-if-no-other rtn cnt docstruct 0 nil re-search-backward reftex-everything-regexp t bof buffer-file-name 2 corrupted 1 assoc reftex-match-string 3 eof toc markerp 4 marker-position 8 looking-at reftex-make-regexp-allow-for-ctrl-m 7 reftex-locate-file "tex" master-dir 9 appendix 10 reftex-index-info-safe index abs 11 reftex-no-props reftex-nth-arg-wrapper error "This should not happen (reftex-where-am-I)" list endelt rtn1 reftex-support-index index-info dist last-dist last n] 7])
#@70 Hook to handshake with RefTeX after something new has been inserted.
(defalias 'reftex-notice-new #[(&optional n force) "\300\301\302\217\207" [nil (byte-code "\300\301\215\207" [exit (byte-code "\204	\306\307\310\"\210\311 \210	J\310\211\310\211%\310\211&'\310\211()\212\312\313 \310\314*\2060\315$\205g
\316 \211\204@\306\307\310\"\210+\204OA\204O\306\307\310\"\210@\n>\211\204]\306\307\310\"\210\317\320@\n#,\317\304@\n#@@\304=\203|\321\310\314\"\210\202\202\321,\f\"\210\322\313 \310\314#\205g
\315\225\203\250\323\324\315!\"-
\211.-.AB\241*\202g
\325\225\203G
\325\225f\326U&\327\330 !%\331%8'
\211/%/AB\241\210)0A@\204\331\306\307\310\"\210
A\320
A\236
>\211\205g

@\211%\205g
\331%8'Y\205g
\332\333\334%8\"&\335%8)\336\331%8&\"(\332\337)\"\203\334\f\204-
\340\341\335!!\342Y\203-
\306\307\310\"\210%AA\2111\341\315)\"(\341\325)\"Q\240\210)\202\334\343\225\205g
2\205g
\344!\211%\205g

\2113%3AB\241).\n\207" [reftex-mode reftex-docstruct-symbol docstruct here-I-am appendix tail throw exit nil reftex-access-scan-info re-search-backward reftex-everything-regexp t 1 reftex-where-am-I reftex-last-assoc-before-elt toc reftex-init-section-numbers re-search-forward reftex-label-info reftex-match-string 3 42 reftex-section-info buffer-file-name 5 string-match "\\*" 6 2 reftex-section-number "\\`\\([ 	]*\\)\\([.0-9A-Z]+\\)\\(.*\\)" string-to-char match-string 65 10 reftex-index-info-safe entry star level section-number context n force reftex-active-toc #1=#:v #2=#:v #3=#:v reftex-label-menu-flags #4=#:c reftex-support-index #5=#:v] 7)] 2) ((error))] 3 (#$ . 13186)])
(defalias 'reftex-move-to-previous-arg #[(&optional bound) "h\302>\206\203\303\304	\305#\203\306\224Tb\210\305\207\307\207" [reftex-allow-detached-macro-args bound (93 125) re-search-backward "[]}][ 	]*[\n
]?\\([ 	]*%[^\n
]*[\n
]\\)*[ 	]*\\=" t 0 nil] 4])
(put 'reftex-move-to-previous-arg 'byte-optimizer 'byte-compile-inline-expand)
(defalias 'reftex-what-macro-safe #[(which &optional bound) "\305 \306\216\307	!\210\310\311\f\"+\207" [saved-syntax reftex-syntax-table case-fold-search which bound syntax-table ((set-syntax-table saved-syntax)) set-syntax-table nil reftex-what-macro] 3])
(defalias 'reftex-what-macro #[(which &optional bound) "\204\301 \210\302\303\215\207" [reftex-section-regexp reftex-compile-variables exit (byte-code "\204	\306\307\310\"\210	\206\212\311\n\310\312#\210`)\310\211\211\211\211\211\214\212e	]d}\210\310\313\314\217\203\351\312\315	h\316>\206X\203W\311\317	\320#\203W\315\224Tb\210\320\202X\310)\203r\310\321\322\217\203rg\323=\203l\fT
T\2029`g\323U\204\201g\324U\203\342\311\325\310\320#\203\342\326\315!\327\330!\203\234\326\315!
S\331 \"\211\203\266
\3328\206\257\333V\203\266\310\203\342\320=\203\315`BB\202\342\312=\204\332\235\203\342\306\307`B\"\210b\210\202.)\237.\207" [which bound reftex-section-regexp entry cnt-opt cnt throw exit nil re-search-backward 1 (byte-code "\301\302\303!\210)\304\207" [forward-sexp-function nil up-list -1 t] 2) ((error)) 0 (93 125) "[]}][ 	]*[\n
]?\\([ 	]*%[^\n
]*[\n
]\\)*[ 	]*\\=" t (byte-code "\301\302 \210)\303\207" [forward-sexp-function nil backward-sexp t] 1) ((error)) 91 123 "\\\\[*a-zA-Z]+\\=" reftex-match-string looking-at "\\\\begin{[^}]*}" assoc 4 100 cmd cmd-list pos reftex-allow-detached-macro-args reftex-env-or-mac-alist] 7)] 2])
(defalias 'reftex-what-environment #[(which &optional bound) "\204\301 \210\302\303\215\207" [reftex-section-regexp reftex-compile-variables exit (byte-code "\212\204\n\306\307\310\"\210	\206\212\311\n\310\312#\210`)\310\211\211\311\313	\314#\203n\315\316\224\316\225\"\317\312!\320\230\203<\fB\202\f@\232\203I\fA\202\314=\203X`B
B\202\312=\204d\235\203\306\307`B\"\210\202
\237-\207" [which bound reftex-section-regexp env end-list env-list throw exit nil re-search-backward 1 "\\\\\\(begin\\|end\\){\\([^}]+\\)}" t buffer-substring-no-properties 2 match-string "end"] 4)] 2])
(defalias 'reftex-what-special-env #[(which &optional bound) "\204\301 \210\302\303\215\207" [reftex-section-regexp reftex-compile-variables exit (byte-code "\212\204\n\306\307\310\"\210	\204\306\307\310\"\210\n\206 \212\311\310\312#\210`)	<\203,\313\314\"\202-\310\211\313\315\"\316\310
\"\317
\320\"	\321=\203N
\202P
@-\207" [reftex-special-env-parsers which bound reftex-section-regexp rtn specials throw exit nil re-search-backward 1 mapcar #[(x) "	>\205\207" [x which] 2] #[(fun) "\212\205	!\211\205\303!\nB)\207" [fun bound rtn symbol-name] 3] delq sort #[(a b) "A	AV\207" [a b] 2] t fun-list] 4)] 2])
(defalias 'reftex-move-to-next-arg #[(&optional ignore) "g\301>\206\203\302\303!\203\304\225Sb\210\305\207\306\207" [reftex-allow-detached-macro-args (91 123) looking-at "[ 	]*[\n
]?\\([ 	]*%[^\n
]*[\n
]\\)*[ 	]*[[{]" 0 t nil] 2])
(put 'reftex-move-to-next-arg 'byte-optimizer 'byte-compile-inline-expand)
(defalias 'reftex-nth-arg-wrapper #[(key) "\303	\"\304\305\n8\306\n8\")\207" [key reftex-env-or-mac-alist entry assoc reftex-nth-arg 5 6] 4])
(defalias 'reftex-nth-arg #[(n &optional opt-args) "g\305=\203\n\306\307w\210\310U\203\311 \210\312 \207\313\307g\314>\2064\2033\315\316!\2033\317\225Sb\210\320\2024\307)\203\236	W\203\213	\f\235\203Qg\321=\203Q	T\211\202?	W\2038\307\322\323\217\203\205\307g\314>\206z\203y\315\316!\203y\317\225Sb\210\320\202z\307)\203\205	T\211\2048\310\211\2029	\f>\203\236g\321=\203\236	T\211\202\214	U\205\256\324\307w\317V\205\256\312 )\207" [n cnt ignore reftex-allow-detached-macro-args opt-args 92 "a-zA-Z*\\\\" nil 1000 reftex-move-over-touching-args reftex-context-substring 1 (91 123) looking-at "[ 	]*[\n
]?\\([ 	]*%[^\n
]*[\n
]\\)*[ 	]*[[{]" 0 t 123 (byte-code "\300\301!\206\302\207" [forward-list 1 t] 2) ((error)) "{\\["] 4])
(defalias 'reftex-move-over-touching-args #[nil "\300\301\302\217\207" [nil (byte-code "g\300>\205
\301\302!\210\202\207" [(91 123) forward-list 1] 2) ((error))] 3])
(defalias 'reftex-context-substring #[(&optional to-end) "\203 \302``\303\\\304 \305\216\306\307\310\311#\203\312\224\202d*^\"\207h\313>\2034\302``\303\\d^\310\314\315\217^\"\207\302``\303\\d^\"\207" [to-end save-match-data-internal buffer-substring-no-properties 150 match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) re-search-forward "\\\\end{" nil t 0 (123 91) (byte-code "\301\302\303!\210`S)\207" [forward-sexp-function nil up-list 1] 2) ((error (point-max)))] 7])
(defvar reftex-section-numbers (make-vector reftex-max-section-depth 0))
(defalias 'reftex-init-section-numbers #[(&optional toc-entry appendix) "\3068\206\307\310\3118\206\312\313\"\237GS\211\314
\315Y\203e
	V\2031
\315I\210\202^\n@\2067\316\317\320\"\203P
\321\322!\323\307#I\210\202X
\324!I\210\n\211A@\210
S\211\202-\325\303\326#\207" [toc-entry level numbers reftex-section-numbers depth i 5 -1 split-string 6 "" "\\." nil 0 "0" string-match "\\`[A-Z]\\'" - string-to-char 65 string-to-number put appendix number-string] 7])
(defalias 'reftex-section-number #[(&optional level star) "GS\306\211\307\300\305N?\205\310\232\203[\311V\2035 \2045HTI\210T \204[\n	X\203[\203O\n\312U\204T\n\310I\210\nT\211\202?\203l\313\314\310H!P\211\202\365\203u\310\202v\312\211	X\203\244\nH\203\214\f\307\232\203\235\f\211\307\230\204\227\315\202\230\307\316!Q\nT\211\202x\317 !\320\216\321\322\f\"\203\270\323\307\306\211\f$\321\324\f\"\203\306\323\307\306\211\f$
\203\343\321\325\f\"\203\343\326\327\330\331\310\f\"!\\S!\f\310\225\306OP* \203\364\332\fGS\333\"\334P\202\365\f.\207" [reftex-section-numbers depth idx n string appendix nil "" 0 -1 1 "Part " reftex-roman-number "." int-to-string match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) string-match "\\`\\([@0]\\.\\)+" replace-match "\\(\\.0\\)+\\'" "\\`[0-9]+" char-to-string 65 string-to-number match-string make-string 32 "*" reftex-part-resets-chapter level partspecial star save-match-data-internal] 7])
(defalias 'reftex-roman-number #[(n) "\306\307\310\211\211\n\n\311Y\2035\f\211A@\211@A\n\nY\203

	P\n\nZ\211\n\202\"
.\207" [n s i listel list string "" ((1000 . "M") (900 . "CM") (500 . "D") (400 . "CD") (100 . "C") (90 . "XC") (50 . "L") (40 . "XL") (10 . "X") (9 . "IX") (5 . "V") (4 . "IV") (1 . "I")) nil 1 nrest] 7])
(provide 'reftex-parse)