Papers/2021/ikki-sigos: Paper/ipsjunsrt.bst annotate

annotate Paper/ipsjunsrt.bst @ 13:265e4e52d19f

...

author	Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date	Mon, 03 May 2021 17:22:57 +0900
parents	844341bbe032
children

rev	line source
2 844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1 % ipsjunsrt.bst 28-Oct-10 by Hiroshi Nakashima (ver 3.00)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	2 % ipsjunsrt.bst 15-Jun-07 by Hiroshi Nakashima (ver 2.12)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	3 % ipsjunsrt.bst 30-Jan-02 by Hiroshi Nakashima (ver 2.00)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	4 % ipsjunsrt.bst 28-Dec-93 by Hiroshi Nakashima (ver 1.00)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	5 % jssst.bst tomura@etl.go.jp (Satoru Tomura)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	6 % BibTeX standard bibliography style `jplain'
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	7 % version 0.10 for JBibTeX versions 0.10 or later, JLaTeX version 2.09.
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	8 % by Shouichi Matsui, matsui@denken.junet
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	9
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	10 ENTRY
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	11 { address
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	12 author
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	13 booktitle
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	14 chapter
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	15 doi % 3.00(1)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	16 edition
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	17 editor
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	18 howpublished
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	19 institution
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	20 journal
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	21 key
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	22 month
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	23 note
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	24 number
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	25 organization
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	26 pages
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	27 publisher
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	28 refdate % 3.00(1)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	29 school
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	30 series
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	31 title
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	32 type
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	33 url % 3.00(1)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	34 volume
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	35 year
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	36 yomi
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	37 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	38 {}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	39 { label }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	40
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	41 INTEGERS { output.state before.all mid.sentence after.sentence after.block }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	42
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	43 INTEGERS { before.year }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	44
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	45 FUNCTION {init.state.consts}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	46 { #0 'before.all :=
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	47 #1 'mid.sentence :=
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	48 #2 'after.sentence :=
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	49 #3 'after.block :=
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	50 #4 'before.year := % 1.00(1)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	51 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	52
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	53 STRINGS { s t }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	54
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	55 FUNCTION {is.kanji}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	56 { is.kanji.str$ } % 1.00(2), 2.00(1)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	57
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	58 FUNCTION {is.kanji.title} % 3.00(1)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	59 { title is.kanji.str$ }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	60
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	61 FUNCTION {output.nonnull}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	62 { 's :=
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	63 output.state mid.sentence =
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	64 { duplicate$ is.kanji % 2.00(2)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	65 { "，" * write$ }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	66 { ", " * write$ }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	67 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	68 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	69 { output.state after.block =
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	70 { add.period$ write$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	71 newline$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	72 "\newblock " write$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	73 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	74 { output.state before.all =
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	75 'write$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	76 { output.state before.year = % 1.00(1)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	77 { " " * write$ }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	78 { add.period$ " " * write$ }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	79 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	80 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	81 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	82 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	83 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	84 mid.sentence 'output.state :=
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	85 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	86 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	87 s
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	88 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	89
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	90 FUNCTION {output}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	91 { duplicate$ empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	92 'pop$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	93 'output.nonnull
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	94 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	95 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	96
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	97 FUNCTION {required.argument}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	98 { 't :=
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	99 empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	100 {"Missing required argument " t * " in " * cite$ * warning$}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	101 'skip$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	102 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	103 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	104
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	105 FUNCTION {required.exclusive.or.argument}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	106 { 't :=
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	107 empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	108 { 's :=
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	109 empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	110 { t " or " * s * " is missing in " * cite$ * warning$}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	111 'skip$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	112 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	113 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	114 { 's :=
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	115 empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	116 'skip$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	117 { "You can use only one of " t * " and " * s * " in " * cite$ * warning$}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	118 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	119 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	120 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	121 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	122
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	123 FUNCTION {required.and.or.argument}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	124 { 't := empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	125 { 's := empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	126 { "there's no " t * " and/or " * s * cite$ * warning$ }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	127 'skip$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	128 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	129 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	130 { pop$ pop$ }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	131 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	132 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	133
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	134 FUNCTION {optional.series.volume.number.argument}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	135 { series empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	136 { volume empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	137 { number empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	138 'skip$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	139 { "there's a number but no series in " cite$ * warning$ }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	140 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	141 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	142 { number empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	143 { "there's a volume but no series in " cite$ * warning$ }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	144 { "you can use only one of volume and number in " cite$ * warning$}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	145 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	146 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	147 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	148 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	149 { volume empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	150 { number empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	151 { "there's a series but neither volume nor number in " cite$ * warning$ }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	152 'skip$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	153 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	154 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	155 { number empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	156 'skip$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	157 { "you can use only one of volume and number in " cite$ * warning$ }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	158 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	159 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	160 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	161 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	162 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	163 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	164
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	165 FUNCTION {output.bibitem}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	166 { newline$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	167 "\bibitem{" write$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	168 cite$ write$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	169 "}" write$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	170 newline$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	171 before.all 'output.state :=
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	172 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	173
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	174 FUNCTION {fin.entry}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	175 { add.period$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	176 write$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	177 newline$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	178 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	179
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	180 FUNCTION {new.block}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	181 { output.state before.all =
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	182 'skip$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	183 { after.block 'output.state := }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	184 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	185 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	186
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	187 FUNCTION {new.sentence}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	188 { output.state after.block =
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	189 'skip$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	190 { output.state before.all =
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	191 'skip$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	192 { after.sentence 'output.state := }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	193 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	194 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	195 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	196 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	197
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	198 FUNCTION {not}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	199 { { #0 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	200 { #1 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	201 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	202 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	203
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	204 FUNCTION {and}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	205 { 'skip$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	206 { pop$ #0 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	207 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	208 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	209
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	210 FUNCTION {or}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	211 { { pop$ #1 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	212 'skip$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	213 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	214 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	215
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	216 FUNCTION {new.block.checka}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	217 { empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	218 'skip$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	219 'new.block
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	220 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	221 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	222
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	223 FUNCTION {new.block.checkb}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	224 { empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	225 swap$ empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	226 and
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	227 'skip$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	228 'new.block
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	229 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	230 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	231
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	232 FUNCTION {new.sentence.checka}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	233 { empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	234 'skip$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	235 'new.sentence
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	236 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	237 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	238
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	239 FUNCTION {new.sentence.checkb}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	240 { empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	241 swap$ empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	242 and
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	243 'skip$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	244 'new.sentence
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	245 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	246 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	247
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	248 FUNCTION {field.or.null}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	249 { duplicate$ empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	250 { pop$ "" }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	251 'skip$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	252 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	253 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	254
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	255 FUNCTION {emphasize}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	256 { duplicate$ empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	257 { pop$ "" }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	258 { duplicate$ is.kanji
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	259 'skip$ % 1.00(3)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	260 { "{\em " swap$ * "}" * } % 2.00(3)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	261 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	262 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	263 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	264 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	265
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	266 INTEGERS { nameptr namesleft numnames }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	267
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	268 FUNCTION {format.names} % 1.00(4), 2.00(4)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	269 { 's :=
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	270 #1 'nameptr :=
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	271 s num.names$ 'numnames :=
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	272 numnames 'namesleft :=
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	273 { namesleft #0 > }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	274 { s nameptr "{ff}{ll}" format.name$ duplicate$ is.kanji
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	275 { duplicate$ text.length$ #6 >
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	276 { 't := }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	277 { pop$ s nameptr "{ff}　{ll}" format.name$ 't := }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	278 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	279 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	280 { pop$ s nameptr "{vv }{ll}{, jj}{, f.}" format.name$ 't := }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	281 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	282 nameptr #1 >
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	283 { namesleft #1 >
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	284 { s is.kanji
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	285 { "，" }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	286 { ", " }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	287 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	288 * t * }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	289 { t "others" =
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	290 { s is.kanji
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	291 {"ほか" * }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	292 {" et al." * }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	293 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	294 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	295 { s is.kanji
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	296 {"，" * t * } % put "," here for Kanji (H.N.)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	297 {" and " * t * }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	298 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	299 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	300 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	301 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	302 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	303 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	304 't
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	305 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	306 nameptr #1 + 'nameptr :=
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	307 namesleft #1 - 'namesleft :=
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	308 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	309 while$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	310 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	311
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	312 FUNCTION {format.authors}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	313 { author empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	314 { "" }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	315 { author format.names }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	316 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	317 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	318
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	319 FUNCTION {add.colon} % 2.00(5)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	320 { duplicate$ is.kanji
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	321 { "\：" * } % 2.12(1)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	322 { ": " * }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	323 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	324 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	325
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	326 FUNCTION {format.editors.inparen} % 2.00(6)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	327 { editor empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	328 { "" }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	329 { editor format.names
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	330 editor num.names$ #1 >
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	331 { editor is.kanji
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	332 {"，編" * } {", eds." *} if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	333 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	334 { editor is.kanji
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	335 {"，編" } {", ed." } if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	336 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	337 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	338 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	339 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	340 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	341
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	342 FUNCTION {format.editors}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	343 { editor empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	344 { "" }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	345 { editor format.names
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	346 editor num.names$ #1 >
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	347 { editor is.kanji
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	348 {"（編）" * } {"(eds.)" *} if$ % 2.00(7)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	349 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	350 { editor is.kanji
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	351 {"（編）" } {"(ed.)" } if$ % 2.00(7)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	352 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	353 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	354 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	355 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	356 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	357
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	358 FUNCTION {n.dashify}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	359 { 't :=
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	360 ""
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	361 { t empty$ not }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	362 { t #1 #1 substring$ "-" =
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	363 { t #1 #2 substring$ "--" = not
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	364 { "--" *
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	365 t #2 global.max$ substring$ 't :=
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	366 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	367 { { t #1 #1 substring$ "-" = }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	368 { "-" *
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	369 t #2 global.max$ substring$ 't :=
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	370 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	371 while$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	372 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	373 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	374 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	375 { t #1 #1 substring$ *
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	376 t #2 global.max$ substring$ 't :=
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	377 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	378 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	379 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	380 while$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	381 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	382
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	383 FUNCTION {format.date}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	384 { before.year 'output.state := % 1.00(1)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	385 year empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	386 { month empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	387 { "" }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	388 { "there's a month but no year in " cite$ * warning$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	389 "" % 1.00(5)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	390 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	391 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	392 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	393 { "(" year ")" * * } % 1.00(5)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	394 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	395 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	396
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	397 FUNCTION {format.ref.date} % 3.00(1)>>
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	398 { before.year 'output.state :=
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	399 is.kanji.title
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	400 { "\refdatej{" refdate "}" * *}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	401 { "\refdatee{" refdate "}" * *}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	402 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	403 } % 3.00(1)<<
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	404
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	405 FUNCTION {tie.or.space.connect}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	406 { duplicate$ text.length$ #3 <
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	407 { "~" }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	408 { "\ " } % 1.00(6)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	409 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	410 swap$ * *
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	411 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	412
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	413 FUNCTION {output.volume}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	414 {
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	415 volume empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	416 'skip$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	417 { "Vol.~" volume * output}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	418 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	419
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	420 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	421
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	422 FUNCTION {output.number}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	423 {
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	424 number empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	425 'skip$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	426 { "No.~" number * output}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	427 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	428 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	429
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	430 FUNCTION {output.series.volume.number}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	431 { series empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	432 { output.volume
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	433 output.number }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	434 { series is.kanji
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	435 volume empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	436 number empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	437 or
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	438 and
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	439 { series " " * volume * number * output}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	440 { series output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	441 output.volume
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	442 output.number}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	443 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	444 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	445 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	446 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	447
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	448 FUNCTION {format.edition}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	449 { edition empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	450 { "" }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	451 { output.state mid.sentence =
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	452 { edition "l" change.case$ " edition" * }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	453 { edition "t" change.case$ " edition" * }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	454 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	455 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	456 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	457 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	458
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	459 INTEGERS { multiresult }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	460
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	461 FUNCTION {multi.page.check}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	462 { 't :=
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	463 #0 'multiresult :=
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	464 { multiresult not
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	465 t empty$ not
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	466 and
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	467 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	468 { t #1 #1 substring$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	469 duplicate$ "-" =
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	470 swap$ duplicate$ "," =
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	471 swap$ "+" =
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	472 or or
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	473 { #1 'multiresult := }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	474 { t #2 global.max$ substring$ 't := }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	475 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	476 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	477 while$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	478 multiresult
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	479 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	480
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	481 FUNCTION {format.online} % 3.00(1)>>
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	482 { is.kanji.title
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	483 { "（オンライン）" * }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	484 { duplicate$ empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	485 { "(online)" * }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	486 { " (online)" * }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	487 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	488 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	489 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	490 } % 3.00(1)<<
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	491
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	492 FUNCTION {format.url} % 3.00(1)>>
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	493 { is.kanji.title
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	494 { "\urlj{" url "}" * * }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	495 { "\urle{" url "}" * * }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	496 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	497 } % 3.00(1)<<
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	498
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	499 FUNCTION {format.pages} % 1.00(7)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	500 { pages empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	501 { "" }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	502 { pages multi.page.check
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	503 { "pp." pages n.dashify tie.or.space.connect }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	504 { "p." pages tie.or.space.connect }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	505 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	506 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	507 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	508 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	509
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	510 FUNCTION {format.doi.url} % 3.00(1)>>
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	511 { doi empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	512 { url empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	513 'skip$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	514 { format.online output.nonnull
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	515 format.url
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	516 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	517 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	518 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	519 { format.online output.nonnull
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	520 "\doi{" doi "}" * *
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	521 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	522 if$ % 3.00(1)<<
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	523 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	524
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	525 FUNCTION {format.pages.output} % 3.00(1)>>
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	526 { format.pages
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	527 format.doi.url output % 3.00(1)<<
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	528 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	529
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	530 FUNCTION {format.vol.num.pages} % 1.00(8)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	531 { volume empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	532 { ""}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	533 { " Vol.~" volume * }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	534 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	535 number empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	536 'skip$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	537 { volume empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	538 { "there's a number but no volume in " cite$ * warning$ }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	539 { "," *}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	540 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	541 " No.~" number * *
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	542 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	543 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	544 pages empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	545 'skip$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	546 { duplicate$ empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	547 { pop$ format.pages }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	548 { ", " * format.pages * }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	549 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	550 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	551 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	552 format.doi.url % 3.00(1)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	553 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	554
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	555 FUNCTION {format.chapter.pages}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	556 { chapter empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	557 'format.pages
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	558 { type empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	559 { "chapter" chapter tie.or.space.connect }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	560 { type is.kanji
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	561 { chapter type tie.or.space.connect }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	562 { type "l" change.case$ chapter tie.or.space.connect }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	563 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	564 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	565 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	566 pages empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	567 'skip$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	568 { ", " * format.pages * }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	569 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	570 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	571 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	572 format.doi.url % 3.00(1)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	573 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	574
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	575 FUNCTION {format.in.ed.booktitle}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	576 { booktitle empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	577 { "" }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	578 { booktitle emphasize
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	579 editor empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	580 'skip$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	581 { booktitle is.kanji
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	582 { "（" * format.editors.inparen * "）" *} % 2.00(6,7)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	583 { " (" * format.editors.inparen * ")" *} % 1.00(9), 2.00(6)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	584 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	585 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	586 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	587 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	588 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	589 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	590
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	591 FUNCTION {empty.misc.check}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	592 { author empty$ title empty$ howpublished empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	593 month empty$ year empty$ note empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	594 and and and and and
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	595 key empty$ not and
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	596 { "all relevant fields are empty in " cite$ * warning$ }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	597 'skip$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	598 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	599 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	600
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	601 FUNCTION {format.thesis.type}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	602 { type empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	603 'skip$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	604 { pop$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	605 type "t" change.case$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	606 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	607 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	608 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	609
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	610 FUNCTION {format.tr.number}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	611 { type empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	612 { title empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	613 { "Technical Report" }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	614 { title is.kanji
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	615 { "技術報告" }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	616 { "Technical Report" }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	617 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	618 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	619 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	620 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	621 {type}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	622 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	623 number empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	624 { "t" change.case$ }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	625 { " " number * * }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	626 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	627 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	628
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	629 FUNCTION {format.article.crossref} % 2.00(8)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	630 { key empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	631 { journal empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	632 { "need key or journal for " cite$ * " to crossref " * crossref *
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	633 warning$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	634 ""
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	635 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	636 { journal emphasize } % 1.00(10)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	637 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	638 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	639 { "In " key * }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	640 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	641 " \cite{" * crossref * "}" *
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	642 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	643
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	644 FUNCTION {format.crossref.editor} % 1.00(11)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	645 { editor #1
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	646 editor is.kanji { "{ff}" } { "{vv }{ll}" } if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	647 format.name$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	648 editor num.names$ duplicate$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	649 #2 >
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	650 { editor is.kanji
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	651 {pop$ "ほか" } {pop$ " et al." } if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	652 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	653 { #2 <
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	654 'skip$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	655 { editor #2 "{ff }{vv }{ll}{ jj}" format.name$ "others" =
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	656 { editor is.kanji
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	657 {"ほか" } {" et al." } if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	658 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	659 { editor is.kanji
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	660 {"・" * editor #2 "{ff}" format.name$ * }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	661 {" and " * editor #2 "{vv }{ll}" format.name$ * }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	662 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	663 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	664 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	665 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	666 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	667 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	668 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	669 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	670
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	671 FUNCTION {format.book.crossref} % 2.00(8)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	672 { editor empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	673 editor field.or.null author field.or.null =
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	674 or
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	675 { key empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	676 { series empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	677 { "need editor, key, or series for " cite$ * " to crossref " *
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	678 crossref * warning$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	679 ""
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	680 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	681 { series emphasize } % 1.00(10)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	682 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	683 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	684 { "In " key * }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	685 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	686 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	687 { format.crossref.editor }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	688 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	689 " \cite{" * crossref * "}" *
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	690 volume empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	691 { "empty volume in " cite$ * "'s crossref of " * crossref * warning$ }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	692 { duplicate$ is.kanji { "，" } { ", "} if$ *
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	693 "Vol." * volume tie.or.space.connect
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	694 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	695 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	696 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	697
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	698 FUNCTION {format.incoll.inproc.crossref} % 2.00(8)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	699 { editor empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	700 editor field.or.null author field.or.null =
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	701 or
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	702 { key empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	703 { booktitle empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	704 { "need editor, key, or booktitle for " cite$ * " to crossref " *
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	705 crossref * warning$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	706 ""
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	707 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	708 { booktitle emphasize } % 1.00(10)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	709 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	710 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	711 { "In " key * }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	712 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	713 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	714 { format.crossref.editor }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	715 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	716 " \cite{" * crossref * "}" *
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	717 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	718
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	719 FUNCTION {article}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	720 {
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	721 %%%%
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	722 author "author" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	723 title "title" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	724 journal "journal" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	725 year "year" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	726 %%%% jssst
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	727 volume "volume"
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	728 number "number"
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	729 required.and.or.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	730 pages "pages" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	731 %%%%
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	732 output.bibitem
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	733 format.authors add.colon % 2.00(5)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	734 title output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	735 crossref missing$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	736 { journal emphasize output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	737 format.vol.num.pages output % 1.00(12)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	738 format.date output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	739 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	740 { format.article.crossref output.nonnull
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	741 format.pages.output % 3.00(1)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	742 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	743 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	744 new.block
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	745 note output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	746 fin.entry
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	747 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	748
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	749 FUNCTION {book}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	750 {
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	751 %%%%
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	752 author "author"
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	753 editor "editor"
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	754 required.exclusive.or.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	755 title "title" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	756 publisher "publisher" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	757 year "year" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	758 optional.series.volume.number.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	759 %%%%
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	760 output.bibitem
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	761 author empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	762 { format.editors}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	763 { format.authors}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	764 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	765 add.colon % 2.00(5)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	766 title emphasize output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	767 crossref missing$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	768 { output.series.volume.number
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	769 publisher output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	770 address output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	771 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	772 { new.block
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	773 format.book.crossref output.nonnull
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	774 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	775 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	776 format.edition output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	777 format.date output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	778 new.block
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	779 note output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	780 fin.entry
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	781 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	782
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	783 FUNCTION {booklet}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	784 {
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	785 %%%%
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	786 title "title" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	787 %%%% jssst
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	788 author "author" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	789 %%%%
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	790 output.bibitem
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	791 format.authors add.colon % 2.00(5)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	792 title output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	793 howpublished output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	794 address output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	795 format.date output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	796 new.block
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	797 note output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	798 fin.entry
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	799 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	800
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	801 FUNCTION {inbook}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	802 {
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	803 %%%%
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	804 author "author"
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	805 editor "editor"
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	806 required.exclusive.or.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	807 title "title" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	808 chapter "chapter"
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	809 pages "pages"
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	810 required.and.or.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	811 publisher "publisher" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	812 year "year" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	813
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	814 optional.series.volume.number.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	815 %%%%
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	816 output.bibitem
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	817 author empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	818 { format.editors}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	819 { format.authors}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	820 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	821 add.colon % 2.00(5)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	822 title emphasize output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	823 crossref missing$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	824 { output.series.volume.number
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	825 format.chapter.pages output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	826 publisher output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	827 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	828 { format.chapter.pages output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	829 new.block
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	830 format.book.crossref output.nonnull
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	831 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	832 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	833 format.edition output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	834 format.date output % 1.00(13)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	835 new.block
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	836 note output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	837 fin.entry
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	838 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	839
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	840 FUNCTION {incollection}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	841 {
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	842 %%%%
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	843 author "author" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	844 title "title" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	845 booktitle "booktitle" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	846 publisher "publisher" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	847 year "year" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	848
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	849 optional.series.volume.number.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	850 %%%%
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	851 output.bibitem
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	852 format.authors add.colon % 2.00(5)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	853 title output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	854 crossref missing$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	855 { format.in.ed.booktitle output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	856 output.series.volume.number
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	857 publisher output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	858 address output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	859 format.edition output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	860 format.chapter.pages output % 1.00(13)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	861 format.date output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	862 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	863 { format.incoll.inproc.crossref output.nonnull
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	864 format.chapter.pages output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	865 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	866 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	867 new.block
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	868 note output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	869 fin.entry
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	870 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	871
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	872 FUNCTION {inproceedings}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	873 {
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	874 %%%%
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	875 author "author" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	876 title "title" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	877 year "year" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	878
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	879 optional.series.volume.number.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	880 %%%%
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	881 output.bibitem
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	882 format.authors add.colon % 2.00(5)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	883 title output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	884 crossref missing$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	885 { format.in.ed.booktitle output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	886 booktitle "booktitle" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	887 output.series.volume.number
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	888 address output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	889 organization output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	890 publisher output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	891 format.pages.output % 3.00(1)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	892 format.date output % 1.00(13)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	893 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	894 { format.incoll.inproc.crossref output.nonnull
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	895 format.pages.output % 3.00(1)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	896 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	897 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	898 new.block
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	899 note output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	900 fin.entry
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	901 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	902
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	903 FUNCTION {conference} { inproceedings }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	904
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	905 FUNCTION {manual}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	906 {
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	907 %%%%
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	908 title "title" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	909 %%%% jssst
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	910 author "author"
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	911 organization "organazaion"
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	912 required.exclusive.or.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	913 %%%%
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	914 output.bibitem
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	915 author empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	916 { organization}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	917 { format.authors}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	918 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	919 add.colon % 2.00(5)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	920 title emphasize output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	921 author empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	922 'skip$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	923 { organization output }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	924 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	925 address output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	926 format.edition output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	927 format.date output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	928 new.block
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	929 note output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	930 fin.entry
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	931 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	932
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	933 FUNCTION {mastersthesis}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	934 {
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	935 %%%%
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	936 author "author" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	937 title "title" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	938 school "school" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	939 year "year" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	940 %%%%
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	941 output.bibitem
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	942 format.authors add.colon % 2.00(5)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	943 title output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	944 author empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	945 { "Master's thesis" }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	946 { author is.kanji
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	947 { "修士論文" }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	948 { "Master's thesis" }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	949 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	950 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	951 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	952 format.thesis.type output.nonnull
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	953 school output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	954 address output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	955 format.date output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	956 new.block
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	957 note output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	958 fin.entry
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	959 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	960
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	961 FUNCTION {misc}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	962 {
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	963 %%%%
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	964 %%%% jssst
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	965 author "author" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	966 title "title" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	967 %%%%
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	968 output.bibitem
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	969 format.authors add.colon % 2.00(5)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	970 title output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	971 howpublished output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	972 format.date output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	973 new.block
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	974 note output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	975 fin.entry
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	976 empty.misc.check
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	977 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	978
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	979 FUNCTION {phdthesis}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	980 {
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	981 %%%%
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	982 author "author" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	983 title "title" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	984 school "school" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	985 year "year" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	986 %%%%
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	987 output.bibitem
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	988 format.authors add.colon % 2.00(5)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	989 title output % 2.00(9)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	990 author empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	991 { "PhD Thesis" }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	992 { author is.kanji
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	993 { "博士論文" }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	994 { "PhD Thesis" }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	995 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	996 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	997 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	998 format.thesis.type output.nonnull
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	999 school output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1000 address output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1001 format.date output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1002 new.block
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1003 note output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1004 fin.entry
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1005 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1006
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1007 FUNCTION {proceedings}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1008 {
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1009 %%%%
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1010 title "title" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1011 year "year" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1012
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1013 optional.series.volume.number.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1014 %%%% jssst
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1015 editor "editor"
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1016 organization "organization"
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1017 required.exclusive.or.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1018 %%%%
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1019 output.bibitem
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1020 editor empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1021 { organization }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1022 { format.editors }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1023 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1024 add.colon % 2.00(5)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1025 title emphasize output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1026 output.series.volume.number
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1027 address output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1028 editor empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1029 'skip$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1030 { organization output }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1031 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1032 publisher output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1033 format.date output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1034 new.block
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1035 note output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1036 fin.entry
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1037 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1038
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1039 FUNCTION {techreport}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1040 {
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1041 %%%%
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1042 author "author" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1043 title "title" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1044 institution "institution" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1045 year "year" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1046 %%%%
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1047 output.bibitem
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1048 format.authors add.colon % 2.00(5)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1049 title output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1050 format.tr.number output.nonnull
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1051 institution output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1052 address output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1053 format.date output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1054 new.block
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1055 note output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1056 fin.entry
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1057 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1058
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1059 FUNCTION {unpublished}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1060 {
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1061 %%%%
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1062 author "author" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1063 title "title" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1064 note "note" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1065 %%%%
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1066 output.bibitem
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1067 format.authors add.colon % 2.00(5)
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1068 title output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1069 format.date output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1070 new.block
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1071 note output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1072 fin.entry
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1073 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1074
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1075 FUNCTION {webpage} % 3.00(1)>>
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1076 {
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1077 %%%%
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1078 author "author" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1079 title "title" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1080 url "url" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1081 refdate "refdate" required.argument
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1082 %%%%
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1083 output.bibitem
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1084 format.authors add.colon
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1085 title output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1086 organization format.doi.url output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1087 format.ref.date output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1088 new.block
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1089 note output
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1090 fin.entry
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1091 } % 3.00(1)<<
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1092
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1093 FUNCTION {default.type} { misc }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1094
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1095 MACRO {jan} {"January"}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1096
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1097 MACRO {feb} {"February"}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1098
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1099 MACRO {mar} {"March"}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1100
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1101 MACRO {apr} {"April"}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1102
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1103 MACRO {may} {"May"}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1104
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1105 MACRO {jun} {"June"}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1106
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1107 MACRO {jul} {"July"}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1108
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1109 MACRO {aug} {"August"}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1110
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1111 MACRO {sep} {"September"}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1112
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1113 MACRO {oct} {"October"}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1114
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1115 MACRO {nov} {"November"}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1116
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1117 MACRO {dec} {"December"}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1118
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1119 MACRO {acmcs} {"ACM Computing Surveys"}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1120
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1121 MACRO {acta} {"Acta Informatica"}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1122
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1123 MACRO {cacm} {"Communications of the ACM"}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1124
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1125 MACRO {ibmjrd} {"IBM Journal of Research and Development"}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1126
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1127 MACRO {ibmsj} {"IBM Systems Journal"}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1128
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1129 MACRO {ieeese} {"IEEE Transactions on Software Engineering"}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1130
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1131 MACRO {ieeetc} {"IEEE Transactions on Computers"}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1132
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1133 MACRO {ieeetcad}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1134 {"IEEE Transactions on Computer-Aided Design of Integrated Circuits"}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1135
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1136 MACRO {ipl} {"Information Processing Letters"}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1137
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1138 MACRO {jacm} {"Journal of the ACM"}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1139
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1140 MACRO {jcss} {"Journal of Computer and System Sciences"}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1141
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1142 MACRO {scp} {"Science of Computer Programming"}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1143
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1144 MACRO {sicomp} {"SIAM Journal on Computing"}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1145
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1146 MACRO {tocs} {"ACM Transactions on Computer Systems"}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1147
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1148 MACRO {tods} {"ACM Transactions on Database Systems"}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1149
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1150 MACRO {tog} {"ACM Transactions on Graphics"}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1151
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1152 MACRO {toms} {"ACM Transactions on Mathematical Software"}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1153
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1154 MACRO {toois} {"ACM Transactions on Office Information Systems"}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1155
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1156 MACRO {toplas} {"ACM Transactions on Programming Languages and Systems"}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1157
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1158 MACRO {tcs} {"Theoretical Computer Science"}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1159
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1160 READ
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1161
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1162 STRINGS { longest.label }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1163
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1164 INTEGERS { number.label longest.label.width }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1165
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1166 FUNCTION {initialize.longest.label}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1167 { "" 'longest.label :=
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1168 #1 'number.label :=
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1169 #0 'longest.label.width :=
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1170 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1171
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1172 FUNCTION {longest.label.pass}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1173 { number.label int.to.str$ 'label :=
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1174 number.label #1 + 'number.label :=
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1175 label width$ longest.label.width >
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1176 { label 'longest.label :=
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1177 label width$ 'longest.label.width :=
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1178 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1179 'skip$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1180 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1181 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1182
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1183 EXECUTE {initialize.longest.label}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1184
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1185 ITERATE {longest.label.pass}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1186
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1187 FUNCTION {begin.bib}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1188 { preamble$ empty$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1189 'skip$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1190 { preamble$ write$ newline$ }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1191 if$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1192 "\begin{thebibliography}{" longest.label * "}" * write$ newline$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1193 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1194
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1195 EXECUTE {begin.bib}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1196
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1197 EXECUTE {init.state.consts}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1198
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1199 ITERATE {call.type$}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1200
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1201 FUNCTION {end.bib}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1202 { newline$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1203 "\end{thebibliography}" write$ newline$
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1204 }
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1205
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1206 EXECUTE {end.bib}
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1207
844341bbe032 add Paper ichikitakahiro <e165713@ie.u-ryukyu.ac.jp> parents: diff changeset	1208

Mercurial > hg > Papers > 2021 > ikki-sigos

annotate Paper/ipsjunsrt.bst @ 13:265e4e52d19f