
(defvar paragraph-ignore-fill-prefix nil "\
Non-nil means the paragraph commands are not affected by fill-prefix.
This is desirable in modes where blank lines are the paragraph delimiters.")

(defun forward-paragraph (&optional arg) "\
Move forward to end of paragraph.  With arg, do it arg times.
A line which  paragraph-start  matches either separates paragraphs
(if  paragraph-separate  matches it also) or is the first line of a paragraph.
A paragraph end is the beginning of a line which is not part of the paragraph
to which the end of the previous line belongs, or the end of the buffer." (interactive "p") (byte-code "Æˆ†	 È‰ˆ
… É
Ê\"?… ?… Ë
!	ƒ+ Ì	ÍR‚, ÎW…½ Ï!?…B ÐÑ`Se]Å#ƒI Æ‚´ ÒÓ!ˆÔ ˆo?…X Ï!…b ÕÓ!ˆ‚P ˆÖ ˆ	ƒŒ Ô ˆo?…| Ï!?…| Ï	!…† ÕÓ!ˆ‚j ˆo?‚’ ÐÆÅ#ƒ² Ï!…¢ ÕÈ!ˆ‚• ˆ`×ZfØ=…¯ ÕÓ!‚´ ebˆT‰ˆ‚- ˆÎV…Ô ˆm?…Ï Ï!ÕÈ!ˆ…Û Æˆ‚Ç ˆ	ƒü m?…ï Ï!?…ï Ï	!…ù ÕÈ!ˆ‚à ‚ÙÆÅ#ƒÚÎ!b‚dbˆS‰ˆ‚¾ *‡" [arg fill-prefix-regexp fill-prefix paragraph-ignore-fill-prefix paragraph-separate t nil paragraph-start 1 equal "" regexp-quote "\\|^" "[ 	]*$" 0 looking-at re-search-backward "^
" forward-char -1 beginning-of-line forward-line end-of-line 2 10 re-search-forward match-beginning] 28))

(defun backward-paragraph (&optional arg) "\
Move backward to start of paragraph.  With arg, do it arg times.
A paragraph start is the beginning of a line which is a first-line-of-paragraph
or which is ordinary text and follows a paragraph-separating line; except:
if the first real line of a paragraph is preceded by a blank line,
the paragraph starts at that blank line.
See forward-paragraph for more information." (interactive "p") (byte-code "Áˆ†	 Â‰ˆÃ[!‡" [arg nil 1 forward-paragraph] 2))

(defun mark-paragraph nil "\
Put point at beginning of this paragraph, mark at end." (interactive) (byte-code "ÀˆÂÃ!ˆÄÀÁ\"ˆÅÃ!‡" [nil t forward-paragraph 1 push-mark backward-paragraph] 4))

(defun kill-paragraph (arg) "\
Kill to end of paragraph." (interactive "*p") (byte-code "ÁˆÂ`Ã!ˆ`\"‡" [arg nil kill-region forward-paragraph] 4))

(defun backward-kill-paragraph (arg) "\
Kill back to start of paragraph." (interactive "*p") (byte-code "ÁˆÂ`Ã!ˆ`\"‡" [arg nil kill-region backward-paragraph] 4))

(defun transpose-paragraphs (arg) "\
Interchange this (or next) paragraph with previous one." (interactive "*p") (byte-code "ÁˆÂÃ\"‡" [arg nil transpose-subr forward-paragraph] 3))

(defun start-of-paragraph-text nil (byte-code "`ÂÃÄ!ˆ`‰ˆÅÆ!ˆ`Y…! 	bˆ	eV…! Ç *‡" [opoint npoint nil forward-paragraph -1 skip-chars-forward " 	
" start-of-paragraph-text] 4))

(defun end-of-paragraph-text nil (byte-code "`ÁÂ!ˆhÃ=… ÄÅ!ˆ`X…\" ÄÂ!ˆ`dW…\" Æ )‡" [opoint forward-paragraph 1 10 forward-char -1 end-of-paragraph-text] 5))

(defun forward-sentence (&optional arg) "\
Move forward to next sentence-end.  With argument, repeat.
With negative argument, move backward repeatedly to sentence-beginning.
Sentence ends are identified by the value of sentence-end
treated as a regular expression.  Also, every paragraph boundary
terminates sentences as well." (interactive "p") (byte-code "Åˆ†	 Æ‰ˆÇW…5 ŠÈ ˆ`)É
ÊP	Ã#ƒ) ËÇ!Sb‚+ 	b)ˆT‰ˆ‚
 ˆÇV…] ŠÌ ˆ`)Í
Ã#ƒQ ÎÏ!‚S b)ˆS‰ˆ‚6 ‡" [arg par-beg sentence-end t par-end nil 1 0 start-of-paragraph-text re-search-backward "[^ 	
]" match-end end-of-paragraph-text re-search-forward skip-chars-backward " 	
"] 9))

(defun backward-sentence (&optional arg) "\
Move backward to start of sentence.  With arg, do it arg times.
See forward-sentence for more information." (interactive "p") (byte-code "Áˆ†	 Â‰ˆÃ[!‡" [arg nil 1 forward-sentence] 2))

(defun kill-sentence (&optional arg) "\
Kill from point to end of sentence.
With arg, repeat, or backward if negative arg." (interactive "*p") (byte-code "Âˆ`Ã	!ˆÄ`\")‡" [beg arg nil forward-sentence kill-region] 4))

(defun backward-kill-sentence (&optional arg) "\
Kill back from point to start of sentence.
With arg, repeat, or forward if negative arg." (interactive "*p") (byte-code "Âˆ`Ã	!ˆÄ`\")‡" [beg arg nil backward-sentence kill-region] 4))

(defun mark-end-of-sentence (arg) "\
Put mark at end of sentence.  Arg works as in forward-sentence." (interactive "p") (byte-code "ÁˆÂŠÃ!ˆ`)!‡" [arg nil push-mark forward-sentence] 3))

(defun transpose-sentences (arg) "\
Interchange this (next) and previous sentence." (interactive "*p") (byte-code "ÁˆÂÃ\"‡" [arg nil transpose-subr forward-sentence] 3))