晋太元中,武陵人捕鱼为业。缘溪行,忘路之远近。忽逢桃花林,夹岸数百步,中无杂树,芳草鲜美,落英缤纷。渔人甚异之,复前行,欲穷其林。 林尽水源,便得一山,山有小口,仿佛若有光。便舍船,从口入。初极狭,才通人。复行数十步,豁然开朗。土地平旷,屋舍俨然,有良田、美池、桑竹之属。阡陌交通,鸡犬相闻。其中往来种作,男女衣着,悉如外人。黄发垂髫,并怡然自乐。 见渔人,乃大惊,问所从来。具答之。便要还家,设酒杀鸡作食。村中闻有此人,咸来问讯。自云先世避秦时乱,率妻子邑人来此绝境,不复出焉,遂与外人间隔。问今是何世,乃不知有汉,无论魏晋。此人一一为具言所闻,皆叹惋。余人各复延至其家,皆出酒食。停数日,辞去。此中人语云:“不足为外人道也。”(间隔 一作:隔绝) 既出,得其船,便扶向路,处处志之。及郡下,诣太守,说如此。太守即遣人随其往,寻向所志,遂迷,不复得路。 南阳刘子骥,高尚士也,闻之,欣然规往。未果,寻病终。后遂无问津者。
|
Server : Apache System : Linux srv.rainic.com 4.18.0-553.47.1.el8_10.x86_64 #1 SMP Wed Apr 2 05:45:37 EDT 2025 x86_64 User : rainic ( 1014) PHP Version : 7.4.33 Disable Function : exec,passthru,shell_exec,system Directory : /usr/share/groff/1.22.3/tmac/ |
Upload File : |
.\" -*- nroff -*-
.\"
.\" an-old.tmac
.\"
.\" Copyright (C) 1989-2014 Free Software Foundation, Inc.
.\" Written by James Clark (jjc@jclark.com)
.\"
.\" This file is part of groff.
.\"
.\" groff is free software; you can redistribute it and/or modify it under
.\" the terms of the GNU General Public License as published by the Free
.\" Software Foundation, either version 3 of the License, or
.\" (at your option) any later version.
.\"
.\" groff is distributed in the hope that it will be useful, but WITHOUT ANY
.\" WARRANTY; without even the implied warranty of MERCHANTABILITY or
.\" FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
.\" for more details.
.\"
.\" You should have received a copy of the GNU General Public License
.\" along with this program. If not, see <http://www.gnu.org/licenses/>.
.\"
.\" -rcR=1 => Create a single, very long page instead of multiple pages.
.\" Useful for online display. Default in nroff mode.
.\" Desactivate with -rcR=0.
.\" -rC1 => Number pages continuously, rather than start each at 1.
.\" -rD1 => Double-sided printing, ie different odd and even page footers.
.\" -rPnnn => Number first page nnn.
.\" -rSxx => Use size `xx'pt (either 10, 11, or 12) for document rather
.\" than the default size of 10pt.
.\" -rXnnn => Number pages after nnn as nnna, nnnb, nnnc, ...
.\"
.\" The file man.local is loaded at the end. Put local additions there.
.\" If you need to add things to TH, use `.am1 TH'.
.\"
.
.if !\n(.g .ab These man macros work only with groff.
.
.do if d RI .nx
.
.do mso devtag.tmac
.
.nr _C \n(.C
.cp 0
.
.if (\n[.x]\n[.y] < 118) \
. ab You need GNU troff version 1.18 or higher to run this version of man!
.
.if !r D .nr D 0
.if !r C .nr C 0
.if !r S .nr S 10
.\" we must use consecutive page numbers when using postscript to generate
.\" html images, and we must not reset the page number at the beginning
.\" (the `ps4html' register is automatically added to the command line by
.\" the pre-html preprocessor)
.if !r ps4html \
. if r P .pn 0\n[P]
.if !r cR \{\
. ie n .nr cR 1
. el .nr cR 0
.\}
.
.nr need_eo_h 0
.nr need_col2 0
.
.\" set up the line length...
.\" giving precedence to any prior assignment to the \n[LL] register.
.if !r LL \{\
.
. \" but if that isn't predefined...
. \" then try to respect any prior `.ll' request.
. nr LL \n[.l]
.
. \" For troff, this is sufficient to give us a default line length of
. \" 6.5i, but for nroff, we prefer a default of 78n to nroff's default
. \" 65n. This has the unfortunate side effect that we will override a
. \" user's `.ll 65n' request, with our preferred 78n default; we can't
. \" possibly know that the 65n came from a `.ll' request, and MUST
. \" assume that it was set by nroff, as its built-in default! If the
. \" user wants to force this setting, then he MUST use the `-rLL=65n'
. \" option, or an equivalent `.nr LL 65n' request.
. if n \
. if (\n[LL] = 65n) \
. nr LL 78n
.\}
.
.if !r LT \
. nr LT \n[LL]
.
.nr FT (-.5i)
.
.\" Default heading font
.ds HF B\"
.
.nr an-first 1
.
.nr an-html 0
.if '\*[.T]'html' .nr an-html 1
.if \n[an-html] .nr C 1
.if r ps4html .nr C 1
.
.\" we redefine .ne to avoid page breaks if cR is set; instead, the page
.\" length is increased to the necessary amount (this is needed for tables)
.\"
.\" similarly, we redefine .bp if cR is set, adjusting the page length to
.\" the current position so that no empty lines are inserted
.if \n[cR] \{\
. de1 ne
. ie \\n[.$] \
. nr an-ne (v;\\$*)
. el \
. nr an-ne 1v
. if (\\n[an-ne] >= \\n[.t]) \
. pl +(\\n[an-ne]u - \\n[.t]u + 1v)
. .
.
. rn bp an-bp
. de1 bp
. br
. pl \\n[nl]u
. an-bp \\$*
. .
.\}
.
.de set-an-margin
. nr an-level 1
. nr an-margin \\n[IN]
. nr an-saved-margin1 \\n[IN]
. nr an-prevailing-indent \\n[IN]
. nr an-saved-prevailing-indent1 \\n[IN]
..
.
.ds an-extra1
.ds an-extra2
.ds an-extra3
.
.\" .TH title section extra1 extra2 extra3
.de1 TH
. if \\n[an-html] \{\
. DEVTAG-TL
. nop \\$1
. DEVTAG-EO-TL
. \}
.
. de an-init \" We have to do it like this to get multiple man pages right.
. ds an-title "\\$1\"
. ds an-section "\\$2\"
. ds an-extra1 "\\$3\"
. ie (\\n[.$] > 3) .ds an-extra2 "\\$4\"
. el .ds an-extra2 \"Sun Release 4.0
.
. ie (\\n[.$] > 4) .ds an-extra3 "\\$5\"
. el \{ .ie '\\$2'1' .ds an-extra3 General Commands Manual
. el \{ .ie '\\$2'2' .ds an-extra3 System Calls Manual
. el \{ .ie '\\$2'3' .ds an-extra3 Library Functions Manual
. el \{ .ie '\\$2'3p' .ds an-extra3 Perl Programmers Reference Guide
. el \{ .ie '\\$2'4' .ds an-extra3 Kernel Interfaces Manual
. el \{ .ie '\\$2'5' .ds an-extra3 File Formats Manual
. el \{ .ie '\\$2'6' .ds an-extra3 Games Manual
. el \{ .ie '\\$2'7' .ds an-extra3 Miscellaneous Information Manual
. el \{ .ie '\\$2'8' .ds an-extra3 System Manager's Manual
. el \{ .ie '\\$2'9' .ds an-extra3 Kernel Developer's Manual
. el .ds an-extra3
. \}\}\}\}\}\}\}\}\}\}
. ds an-init
\\..
.
. DT
.
. nr PS 10z \" default point size
. nr PS-SS 10z
. nr PS-SH 10.95z
. nr VS 12p
.
. \" use sizes similar to LaTeX
. if t \{\
. ie (\\n[S] == 11) \{\
. nr PS 10.95z
. nr PS-SS 10.95z
. nr PS-SH 12z
. nr VS 13.6p
. \}
. el \{\
. if (\\n[S] == 12) \{\
. nr PS 12z
. nr PS-SS 12z
. nr PS-SH 14.4z
. nr VS 14.5p
. \}
. \}
. \}
.
. ps \\n[PS]u
. vs \\n[VS]u
. ll \\n[LL]u
.
.\" We must select an integer indentation value for nroff;
.\" see comment in an-do-tag.
. if !r IN \{\
. ie t .nr IN 7.2n
. el .nr IN 7n
. \}
. PD
. if !r SN \
. nr SN 3n \" the indentation of sub-sub-headings relative to sub-headings
. set-an-margin
. nr an-tag-sep 1n
.
. nr an-no-space-flag 0
. nr an-break-flag 0
. nr an-div? 0
.
. ie \\n[cR] \
. an-header
. el \{\
. wh 0 an-header
. wh -1i an-footer
. wh \\n[FT]u an-p-footer
.
. if \\n[nl] \{\
. ie \\n[C] .bp (\\n[%] + 1)
. el .bp 1
. \}
. \}
..
.
.\" BSD compatibility macros: .AT and .UC
.
.de1 AT
. ds an-extra2 "7th Edition\"
. if "\\$1"3" .ds an-extra2 "7th Edition\"
. if "\\$1"4" .ds an-extra2 "System III\"
. if "\\$1"5" \{\
. ie "\\$2"" .ds an-extra2 "System V\"
. el .ds an-extra2 "System V Release \\$2\"
. \}
..
.
.de1 UC
. ds an-extra2 "3rd Berkeley Distribution\"
. if "\\$1"3" .ds an-extra2 "3rd Berkeley Distribution\"
. if "\\$1"4" .ds an-extra2 "4th Berkeley Distribution\"
. if "\\$1"5" .ds an-extra2 "4.2 Berkeley Distribution\"
. if "\\$1"6" .ds an-extra2 "4.3 Berkeley Distribution\"
. if "\\$1"7" .ds an-extra2 "4.4 Berkeley Distribution\"
..
.
.de1 DT
. ta T .5i \" This sets tabs every .5 inches
..
.
.de1 PD
. ie \\n[.$] .nr PD (v;\\$1)
. el .nr PD (.4v >? \n[.V])
..
.
.\" Redefine these to customize the header & footer
.
.de1 PT
. tl '\\*[an-title](\\*[an-section])'\\*[an-extra3]'\\*[an-title](\\*[an-section])'
..
.
.de1 BT
. if r ps4html \
. return
. ie \\n[D] \{\
. if o .tl '\\*[an-extra2]'\\*[an-extra1]'\\*[an-page-string]'
. if e .tl '\\*[an-page-string]'\\*[an-extra1]'\\*[an-extra2]'
. \}
. el \
. tl '\\*[an-extra2]'\\*[an-extra1]'\\*[an-page-string]'
..
.
.de1 an-header
. an-init
. if \\n[cR] \{\
. ie \\n[an-first] \
. nr an-first 0
. el \
. sp .5i
. \}
. ev an-1
. ps \\n[PS]u
. vs \\n[VS]u
. lt \\n[LT]u
. ie \\n[an-html] \
. tl ''''
. el \{\
. if !\\n[cR] \
. sp .5i
. PT
. ie !\\n[cR] \
. sp |1i
. el \
. sp .5i
. \}
. ev
. ns
..
.
.de1 an-footer
' bp
..
.
.af an-page-letter a
.
.de1 an-p-footer
. ev an-1
. ps \\n[PS]u
. vs \\n[VS]u
. lt \\n[LT]u
. ie \\n[an-html] \{\
. ds an-page-string
. ds an-extra1
. ds an-extra2
. \}
. el \{\
. ie r X \{\
. if (\\n[%] > \\n[X]) \{\
. nr an-page-letter (\\n[%] - \\n[X])
. ds an-page-string \\n[X]\\n[an-page-letter]\"
. \}
. \}
. el \{\
. ie \\n[cR] \
. ds an-page-string "\\*[an-title](\\*[an-section])\"
. el \
. ds an-page-string \\n[%]\"
. \}
. \}
. BT
. ev
..
.
.de1 an-end
. nr % 1
. pl +4v
. fl
. sp 3
. an-p-footer
. pl \\n[nl]u
..
.
.if \n[cR] .em an-end
.
.de1 SH
. sp \\n[PD]u
. set-an-margin
. fi
. in \\n[an-margin]u
. ti 0
. nr need_eo_h 1
. DEVTAG-NH \\n[an-level]
. it 1 an-trap
. nr an-no-space-flag 1
. nr an-break-flag 1
. ps \\n[PS-SH]u
. ft \\*[HF]
. ne (2v + 1u)
. if \\n[.$] \&\\$*
..
.
.de1 SS
. sp \\n[PD]u
. set-an-margin
. fi
. in \\n[IN]u
. ti \\n[SN]u
. it 1 an-trap
. nr an-no-space-flag 1
. nr an-break-flag 1
. ps \\n[PS-SS]u
. ft \\*[HF]
. ne (2v + 1u)
. if \\n[.$] \&\\$*
..
.
.de1 B
. it 1 an-trap
. ft B
. if \\n[.$] \&\\$*
..
.
.de1 I
. it 1 an-trap
. ft I
. if \\n[.$] \,\\$*\/
..
.
.de1 SM
. it 1 an-trap
. ps -1
. if \\n[.$] \&\\$*
..
.
.de1 SB
. it 1 an-trap
. ps -1
. ft B
. if \\n[.$] \&\\$*
..
.
.de1 TP
. sp \\n[PD]u
. if \\n[.$] .nr an-prevailing-indent (n;\\$1)
. it 1 an-trap
. in 0
. if !\\n[an-div?] \{\
. ll -\\n[an-margin]u
. di an-div
. \}
. nr an-div? 1
..
.
.de1 an-trap
. if \\n[need_eo_h]>0 .DEVTAG-EO-H
. nr need_eo_h 0
. if \\n[need_col2]>0 .DEVTAG-COL 2
. nr need_col2 0
. ft R
. ps \\n[PS]u
. vs \\n[VS]u
. if \\n[an-break-flag] \{\
. br
. nr an-break-flag 0
. \}
. if \\n[an-no-space-flag] \{\
. ns
. nr an-no-space-flag 0
. \}
. if \\n[an-div?] .an-do-tag
..
.
.de an-do-tag
. br
. di
. nr an-div? 0
. ll
. \" We must emit the diversion in a separate environment to
. \" assure that a possible margin character is printed correctly.
. ev an-2
. evc 0
. mc
. nf
. in \\n[an-margin]u
. ie (\\n[dl] + \\n[an-tag-sep] > \\n[an-prevailing-indent]) \{\
. ne (2v + 1u)
. an-div
. ev
. in (\\n[an-margin]u + \\n[an-prevailing-indent]u)
. \}
. el \{\
. \" In nroff mode, the indentation value should be an integer multiple
. \" of the character cell, to avoid different results compared to the
. \" the .ie part above.
. ne (1v + 1u)
. DEVTAG-COL 1
. an-div
. sp -1
. ev
. in (\\n[an-margin]u + \\n[an-prevailing-indent]u)
. DEVTAG-COL-NEXT 2
. \}
..
.
.de1 LP
. sp \\n[PD]u
. ps \\n[PS]u
. vs \\n[VS]u
. ft R
. in \\n[an-margin]u
. nr an-prevailing-indent \\n[IN]
. ns
..
.
.als PP LP
.als P LP
.
.de1 IP
. ie !\\n[.$] \{\
. ps \\n[PS]u
. vs \\n[VS]u
. ft R
. sp \\n[PD]u
. ne (1v + 1u)
. in (\\n[an-margin]u + \\n[an-prevailing-indent]u)
. ns
. \}
. el \{\
. ie (\\n[.$] - 1) .TP "\\$2"
. el .TP
\&\\$1
. \}
..
.
.de1 HP
. ps \\n[PS]u
. vs \\n[VS]u
. ft R
. sp \\n[PD]u
. ne (1v + 1u)
. if \\n[.$] .nr an-prevailing-indent (n;\\$1)
. in (\\n[an-margin]u + \\n[an-prevailing-indent]u)
. ti \\n[an-margin]u
. DEVTAG-COL 1
. nr need_col2 1
. ns
..
.
.ds an-empty \" this is referenced to avoid looping on eg .RB ( \\ )
.
.de1 RI
. if \\n[.$] \{\
. ds an-result \&\f[R]\\$1\"
. shift
. while (\\n[.$] >= 2) \{\
. as an-result \,\f[I]\\$1\f[R]\/\\$2\\*[an-empty]\"
. shift 2
. \}
. if \\n[.$] .as an-result \,\f[I]\\$1\"
\\*[an-result]
. ft R
. \}
..
.
.de1 IR
. if \\n[.$] \{\
. ds an-result \&\f[I]\\$1\f[R]\"
. shift
. while (\\n[.$] >= 2) \{\
. as an-result \/\\$1\f[I]\,\\$2\f[R]\"
. shift 2
. \}
. if \\n[.$] .as an-result \/\\$1\"
\\*[an-result]
. ft R
. \}
..
.
.de1 IB
. if \\n[.$] \{\
. ds an-result \&\f[I]\\$1\"
. shift
. while (\\n[.$] >= 2) \{\
. as an-result \/\f[B]\\$1\f[I]\,\\$2\\*[an-empty]\"
. shift 2
. \}
. if \\n[.$] .as an-result \/\f[B]\\$1\"
\\*[an-result]
. ft R
. \}
..
.
.de1 BI
. if \\n[.$] \{\
. ds an-result \&\f[B]\\$1\"
. shift
. while (\\n[.$] >= 2) \{\
. as an-result \,\f[I]\\$1\f[B]\/\\$2\\*[an-empty]\"
. shift 2
. \}
. if \\n[.$] .as an-result \,\f[I]\\$1\"
\\*[an-result]
. ft R
. \}
..
.
.de1 RB
. ds an-result \&\"
. while (\\n[.$] >= 2) \{\
. as an-result \f[R]\\$1\f[B]\\$2\\*[an-empty]\"
. shift 2
. \}
. if \\n[.$] .as an-result \f[R]\\$1\"
\\*[an-result]
. ft R
..
.
.de1 BR
. ds an-result \&\"
. while (\\n[.$] >= 2) \{\
. as an-result \f[B]\\$1\f[R]\\$2\\*[an-empty]\"
. shift 2
. \}
. if \\n[.$] .as an-result \f[B]\\$1\"
\\*[an-result]
. ft R
..
.
.de1 RS
. nr an-saved-margin\\n[an-level] \\n[an-margin]
. nr an-saved-prevailing-indent\\n[an-level] \\n[an-prevailing-indent]
. ie \\n[.$] .nr an-margin +(n;\\$1)
. el .nr an-margin +\\n[an-prevailing-indent]
. in \\n[an-margin]u
. nr an-prevailing-indent \\n[IN]
. nr an-level +1
..
.
.de1 RE
. ie \\n[.$] .nr an-level ((;\\$1) <? \\n[an-level])
. el .nr an-level -1
. nr an-level (1 >? \\n[an-level])
. nr an-margin \\n[an-saved-margin\\n[an-level]]
. nr an-prevailing-indent \\n[an-saved-prevailing-indent\\n[an-level]]
. in \\n[an-margin]u
..
.
.\" table support
.
.de1 TS
. sp \\n[PD]u
. if \\n[an-html] \{\
. nr an-TS-ll \\n[.l]
. ll 1000n
. \}
. HTML-IMAGE
..
.
.de1 T&
..
.
.de1 TE
. HTML-IMAGE-END
. if \\n[an-html] \
. ll \\n[an-TS-ll]u
..
.
.\" dummy equation delimiters
.de1 EQ
. if \\n[an-html] \{\
. nr an-EQ-ll \\n[.l]
. ll 1000n
. \}
. HTML-IMAGE
..
.de1 EN
. HTML-IMAGE-END
. if \\n[an-html] \
. ll \\n[an-EQ-ll]u
..
.
.de1 R
\c
. ie \\n[.$] \{\
. tm `R' is a string (producing the registered sign), not a macro.
. nop \\$*
. \}
. el \{\
. ie c\[rg] \
. nop \[rg]\c
. el \
. nop (Reg.)\c
. \}
..
.
.\" these strings must work in compatibility mode also
.
.ds S \s'\\n(PSu'\"
.ie c\[tm] .ds Tm \(tm\"
.el .ds Tm (TM)\"
.ds lq \(lq\"
.ds rq \(rq\"
.
.if !\n[an-html] \{\
. if !rHY \{\
. ie \n[cR] \
. nr HY 12
. el \
. nr HY 14
. \}
. hy \n[HY]
.\}
.
.\" For UTF-8, map some characters conservatively for the sake
.\" of easy cut and paste.
.
.if '\*[.T]'utf8' \{\
. rchar \- - ' `
.
. char \- \N'45'
. char - \N'45'
. char ' \N'39'
. char ` \N'96'
.\}
.
.\" Load man macro extensions.
.mso an-ext.tmac
.
.\" Load local modifications.
.mso man.local
.
.cp \n[_C]
.
.\" end of an-old.tmac