;ELC   
;;; Compiled
;;; in Emacs version 28.0.50
;;; with all optimizations.


(byte-code "\301\302!\210\301\303!\210\301\304!\210\301\305!\210\306\307\"\301\207" [auto-mode-alist require ess-bugs-l ess-utils ess-inf ess-mode append (("\\.[jJ][aA][gG]\\'" . ess-jags-mode))] 3)
#@31 Default JAGS program in PATH.
(defvar ess-jags-command "jags" (#$ . 288))
(make-local-variable 'ess-jags-command)
#@39 Default list of variables to monitor.
(defvar ess-jags-monitor '("") (#$ . 408))
(make-local-variable 'ess-jags-monitor)
#@29 Default thinning parameter.
(defvar ess-jags-thin 1 (#$ . 535))
(make-local-variable 'ess-jags-thin)
#@27 Default number of chains.
(defvar ess-jags-chains 1 (#$ . 642))
(make-local-variable 'ess-jags-chains)
#@18 Default burn-in.
(defvar ess-jags-burnin 10000 (#$ . 751))
(make-local-variable 'ess-jags-burnin)
#@41 Default number of updates after burnin.
(defvar ess-jags-update 10000 (#$ . 855))
(make-local-variable 'ess-jags-update)
#@53 Default whether JAGS recognizes the system command.
(defvar ess-jags-system t (#$ . 982))
#@32 ESS[JAGS]: Font lock keywords.
(defvar ess-jags-font-lock-keywords (byte-code "\304B\305	B\306\nB\307B\310	B\311	B\312B\257\207" [font-lock-comment-face font-lock-keyword-face font-lock-constant-face font-lock-function-name-face "#.*\n" "^[ 	]*\\(model\\|var\\)\\>" "\\<d\\(bern\\|beta\\|bin\\|cat\\|chisq\\|dexp\\|dirch\\|exp\\|\\(gen[.]\\)?gamma\\|hyper\\|interval\\|lnorm\\|logis\\|mnorm\\|mt\\|multi\\|negbin\\|norm\\(mix\\)?\\|par\\|pois\\|sum\\|t\\|unif\\|weib\\|wish\\)[ 	\n]*(" "\\<\\(abs\\|cos\\|dim\\|\\(i\\)?cloglog\\|equals\\|exp\\|for\\|inprod\\|interp[.]line\\|inverse\\|length\\|\\(i\\)?logit\\|logdet\\|logfact\\|loggam\\|max\\|mean\\|mexp\\|min\\|phi\\|pow\\|probit\\|prod\\|rank\\|round\\|sd\\|sin\\|sort\\|sqrt\\|step\\|sum\\|t\\|trunc\\|T\\)[ 	\n]*(" "\\<\\(adapt\\|cd\\|clear\\|coda\\|data\\|dir\\|exit\\|in\\(itialize\\)?\\|load\\|model\\|monitors\\|parameters\\|pwd\\|run\\|s\\(amplers\\|ystem\\)\\|to\\|update\\)[ 	\n]" "\\<\\(compile\\|monitor\\)[, 	\n]" "[, 	\n]\\(by\\|chain\\|nchains\\|stem\\|thin\\|type\\)[ 	\n]*("] 8) (#$ . 1078))
#@40 ESS[JAGS]: Switch to file with suffix.
(defalias 'ess-jags-switch-to-suffix #[(suffix &optional jags-chains jags-monitor jags-thin jags-burnin jags-update) "\306	\nQ!\210\307 \310=\205V\n\311\232\203: \312c\210\313c\210\314c\210\315c\210\316c\210\317\320\261\210\321c\210\322c\210\323c\210\324c\210\325c\210\326c\210\n\327\232\205V\330\211\211>\203O >?@\203X @AB\203a BC\331\332\333?\"\334Q?>\310>W\203\220 \335	\336\332\333>\"\337\332\333>\"\334\260>S>\202n \330A<\203\276 A:\203\276 A@\330\230\204\265 \f\340A@\341\332\333C\"\334\260AA\211A\202\224 \342	\343\261\210\344	\345\261\210\346\347\350#c\210\351c\210\352\332\333D\"\353\261\210\fc\210\352\332\333BE_\"\353\261\210\346\211\354\355#\347\356#c\210\357\360	\361\261\210F\203>\362	\363\261\210\364	\365	\363\261\210?>\310>W\203>\332\333>\"\362	\366\261\210\364	\367\370	\366\261\210>S>\202\371c\210\372\320\261\210\373\332\333?\"\353\261\210\374c\210\375c+\207" [ess-bugs-file-dir ess-bugs-file-root suffix ess-jags-temp-chain ess-jags-temp-monitor ess-jags-temp-chains find-file buffer-size 0 ".jag" "var ;\n" "model {\n" "    for (i in 1:N) {\n    \n" "    }\n" "}\n" "#Local Variables" ":\n" "#ess-jags-chains:1\n" "#ess-jags-monitor:(\"\")\n" "#ess-jags-thin:1\n" "#ess-jags-burnin:10000\n" "#ess-jags-update:10000\n" "#End:\n" ".jmd" "" "compile, nchains(" format "%d" ")\n" "parameters ## \"" ".##" "\", chain(" "monitor " ", thin(" "model in \"" ".jag\"\n" "data in \"" ".jdt\"\n" ess-replace-in-string "##" "in" "initialize\n" "update " "\n" "compile, nchains([0-9]+)" "#" "to" "coda " "*, stem(\"" "\")\n" "system rm -f " ".ind\n" "system ln -s " "index.txt " ".out\n" "chain" ".txt " "exit\n" "Local Variables" "ess-jags-chains:" "ess-jags-command:\"jags\"\n" "End:\n" jags-chains ess-jags-chains jags-monitor ess-jags-monitor jags-thin ess-jags-thin jags-burnin jags-update ess-jags-system] 10 (#$ . 2150)])
#@46 ESS[JAGS]: Perform the Next-Action for .jmd.
(defalias 'ess-jags-na-jmd #[(jags-command jags-chains) "\306 \307=\203 \310\311!\207\312 \210\313 \210\314\315!\203. \315 \203. \316\317O\320\230\203. \307\317Oc\210\321 \210\322	\323\261\210\321 \210\n\324\324\f\325\326\232\204U \327\232\204U \330\232\204U \331\232\203\\ \332\f\333Q\202_ \f\210\334\261\210\321 \207" [ess-bugs-file ess-bugs-file-dir ess-bugs-batch-pre-command jags-command ess-bugs-file-root shell-file-name buffer-size 0 ess-jags-switch-to-suffix ".jmd" shell ess-sleep fboundp w32-shell-dos-semantics 1 2 ":" comint-send-input "cd \"" "\"" " " ".jmd " "/bin/csh" "/bin/tcsh" "/bin/zsh" "/bin/bash" ">& " ".jog " ".jog 2>&1 " ess-bugs-batch-post-command] 9 (#$ . 4102)])
#@41 ESS[JAGS]: Perform Next-Action for .jag
(defalias 'ess-jags-na-bug #[nil "\305 \306=\203 \307\310!\207\311 \210\307\312	\n\f&\207" [ess-jags-chains ess-jags-monitor ess-jags-thin ess-jags-burnin ess-jags-update buffer-size 0 ess-jags-switch-to-suffix ".jag" ess-save-and-set-local-variables ".jmd"] 7 (#$ . 4857)])
#@33 ESS[JAGS]: Major mode for JAGS.
(defalias 'ess-jags-mode #[nil "\305 \210\306\307!\210\310\311\312\n!\210\313\303!\210\314\315\316\317!\210\320\321!\205# \321 ?\205+ \322\323\324\"\207" [major-mode mode-name ess-bugs-mode-map font-lock-defaults ess-language kill-all-local-variables ess-setq-vars-local ((comment-start . "#")) ess-jags-mode "ESS[JAGS]" use-local-map make-local-variable (ess-jags-font-lock-keywords nil t) "S" run-mode-hooks ess-bugs-mode-hook fboundp w32-shell-dos-semantics add-hook comint-output-filter-functions ess-bugs-exit-notify-sh] 3 (#$ . 5182) nil])
(byte-code "\301\302\303\"\210\304\305\306\"\210\304\307\310\"\210\311\312\"\313\314!\207" [features add-to-list auto-mode-alist ("\\.[Jj][Aa][Gg]\\'" . ess-jags-mode) defvaralias ess-jags-mode-hook ess-bugs-mode-hook ess-jags-mode-map ess-bugs-mode-map delete ess-bugs-d provide ess-jags-d] 3)