annotate paper/ipsjunsrt.bst @ 23:8a3b1147329e

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