1 |
%% |
2 |
%% This is file `apsrmp.bst', |
3 |
%% generated with the docstrip utility. |
4 |
%% |
5 |
%% The original source files were: |
6 |
%% |
7 |
%% merlin.mbs (with options: `head,ay,nat,vonx,nm-rev1,jnrlst,nmlm,x10,x2,m10,m2,nmft,nmft-def,fnm-def,nmfted,nmand-rm,lab,lab-def,keyxyr,dt-beg,xmth,yr-com,note-yr,jtit-x,jttl-rm,trtit-b,vol-bf,volp-com,jpg-1,pp-last,num-xser,jnm-x,pub-par,pre-pub,isbn,issn,edpar,edby,blk-com,pp,ed,xedn,jabr,and-com,etal-it,revdata,eprint,url,url-blk,pub-over-eprint,bibinfo,nfss,{}') |
8 |
%% physjour.mbs (with options: `ay,nat,vonx,nm-rev1,jnrlst,nmlm,x10,x2,m10,m2,nmft,nmft-def,fnm-def,nmfted,nmand-rm,lab,lab-def,keyxyr,dt-beg,xmth,yr-com,note-yr,jtit-x,jttl-rm,trtit-b,vol-bf,volp-com,jpg-1,pp-last,num-xser,jnm-x,pub-par,pre-pub,isbn,issn,edpar,edby,blk-com,pp,ed,xedn,jabr,and-com,etal-it,revdata,eprint,url,url-blk,pub-over-eprint,bibinfo,nfss,{}') |
9 |
%% geojour.mbs (with options: `ay,nat,vonx,nm-rev1,jnrlst,nmlm,x10,x2,m10,m2,nmft,nmft-def,fnm-def,nmfted,nmand-rm,lab,lab-def,keyxyr,dt-beg,xmth,yr-com,note-yr,jtit-x,jttl-rm,trtit-b,vol-bf,volp-com,jpg-1,pp-last,num-xser,jnm-x,pub-par,pre-pub,isbn,issn,edpar,edby,blk-com,pp,ed,xedn,jabr,and-com,etal-it,revdata,eprint,url,url-blk,pub-over-eprint,bibinfo,nfss,{}') |
10 |
%% photjour.mbs (with options: `ay,nat,vonx,nm-rev1,jnrlst,nmlm,x10,x2,m10,m2,nmft,nmft-def,fnm-def,nmfted,nmand-rm,lab,lab-def,keyxyr,dt-beg,xmth,yr-com,note-yr,jtit-x,jttl-rm,trtit-b,vol-bf,volp-com,jpg-1,pp-last,num-xser,jnm-x,pub-par,pre-pub,isbn,issn,edpar,edby,blk-com,pp,ed,xedn,jabr,and-com,etal-it,revdata,eprint,url,url-blk,pub-over-eprint,bibinfo,nfss,{}') |
11 |
%% merlin.mbs (with options: `tail,ay,nat,vonx,nm-rev1,jnrlst,nmlm,x10,x2,m10,m2,nmft,nmft-def,fnm-def,nmfted,nmand-rm,lab,lab-def,keyxyr,dt-beg,xmth,yr-com,note-yr,jtit-x,jttl-rm,trtit-b,vol-bf,volp-com,jpg-1,pp-last,num-xser,jnm-x,pub-par,pre-pub,isbn,issn,edpar,edby,blk-com,pp,ed,xedn,jabr,and-com,etal-it,revdata,eprint,url,url-blk,pub-over-eprint,bibinfo,nfss,{}') |
12 |
%% ---------------------------------------- |
13 |
%% *** REVTeX-compatible apsrmp.bst 1702 *** |
14 |
%% |
15 |
%% Copyright 1994-2000 Patrick W Daly |
16 |
% =============================================================== |
17 |
% IMPORTANT NOTICE: |
18 |
% This bibliographic style (bst) file has been generated from one or |
19 |
% more master bibliographic style (mbs) files, listed above. |
20 |
% |
21 |
% This generated file can be redistributed and/or modified under the terms |
22 |
% of the LaTeX Project Public License Distributed from CTAN |
23 |
% archives in directory macros/latex/base/lppl.txt; either |
24 |
% version 1 of the License, or any later version. |
25 |
% =============================================================== |
26 |
% Name and version information of the main mbs file: |
27 |
% \ProvidesFile{merlin.mbs}[2000/05/04 4.01 (PWD, AO, DPC)] |
28 |
% For use with BibTeX version 0.99a or later |
29 |
%------------------------------------------------------------------- |
30 |
% This bibliography style file is intended for texts in ENGLISH |
31 |
% This is an author-year citation style bibliography. As such, it is |
32 |
% non-standard LaTeX, and requires a special package file to function properly. |
33 |
% Such a package is natbib.sty by Patrick W. Daly |
34 |
% The form of the \bibitem entries is |
35 |
% \bibitem[Jones et al.(1990)]{key}... |
36 |
% \bibitem[Jones et al.(1990)Jones, Baker, and Smith]{key}... |
37 |
% The essential feature is that the label (the part in brackets) consists |
38 |
% of the author names, as they should appear in the citation, with the year |
39 |
% in parentheses following. There must be no space before the opening |
40 |
% parenthesis! |
41 |
% With natbib v5.3, a full list of authors may also follow the year. |
42 |
% In natbib.sty, it is possible to define the type of enclosures that is |
43 |
% really wanted (brackets or parentheses), but in either case, there must |
44 |
% be parentheses in the label. |
45 |
% The \cite command functions as follows: |
46 |
% \citet{key} ==>> Jones et al. (1990) |
47 |
% \citet*{key} ==>> Jones, Baker, and Smith (1990) |
48 |
% \citep{key} ==>> (Jones et al., 1990) |
49 |
% \citep*{key} ==>> (Jones, Baker, and Smith, 1990) |
50 |
% \citep[chap. 2]{key} ==>> (Jones et al., 1990, chap. 2) |
51 |
% \citep[e.g.][]{key} ==>> (e.g. Jones et al., 1990) |
52 |
% \citep[e.g.][p. 32]{key} ==>> (e.g. Jones et al., p. 32) |
53 |
% \citeauthor{key} ==>> Jones et al. |
54 |
% \citeauthor*{key} ==>> Jones, Baker, and Smith |
55 |
% \citeyear{key} ==>> 1990 |
56 |
%--------------------------------------------------------------------- |
57 |
|
58 |
ENTRY |
59 |
{ address |
60 |
archive |
61 |
author |
62 |
booktitle |
63 |
chapter |
64 |
collaboration |
65 |
edition |
66 |
editor |
67 |
eid |
68 |
eprint |
69 |
howpublished |
70 |
institution |
71 |
isbn |
72 |
issn |
73 |
journal |
74 |
key |
75 |
month |
76 |
note |
77 |
number |
78 |
numpages |
79 |
organization |
80 |
pages |
81 |
publisher |
82 |
school |
83 |
series |
84 |
title |
85 |
type |
86 |
url |
87 |
volume |
88 |
year |
89 |
} |
90 |
{} |
91 |
{ label extra.label sort.label short.list } |
92 |
INTEGERS { output.state before.all mid.sentence after.sentence after.block } |
93 |
FUNCTION {init.state.consts} |
94 |
{ #0 'before.all := |
95 |
#1 'mid.sentence := |
96 |
#2 'after.sentence := |
97 |
#3 'after.block := |
98 |
} |
99 |
STRINGS { s t} |
100 |
FUNCTION {output.nonnull} |
101 |
{ 's := |
102 |
output.state mid.sentence = |
103 |
{ ", " * write$ } |
104 |
{ output.state after.block = |
105 |
{ add.period$ write$ |
106 |
newline$ |
107 |
"\newblock " write$ |
108 |
} |
109 |
{ output.state before.all = |
110 |
'write$ |
111 |
{ add.period$ " " * write$ } |
112 |
if$ |
113 |
} |
114 |
if$ |
115 |
mid.sentence 'output.state := |
116 |
} |
117 |
if$ |
118 |
s |
119 |
} |
120 |
FUNCTION {output} |
121 |
{ duplicate$ empty$ |
122 |
'pop$ |
123 |
'output.nonnull |
124 |
if$ |
125 |
} |
126 |
FUNCTION {output.check} |
127 |
{ 't := |
128 |
duplicate$ empty$ |
129 |
{ pop$ "empty " t * " in " * cite$ * warning$ } |
130 |
'output.nonnull |
131 |
if$ |
132 |
} |
133 |
FUNCTION {fin.entry} |
134 |
{ add.period$ |
135 |
write$ |
136 |
newline$ |
137 |
} |
138 |
|
139 |
FUNCTION {new.block} |
140 |
{ output.state before.all = |
141 |
'skip$ |
142 |
{ after.block 'output.state := } |
143 |
if$ |
144 |
} |
145 |
FUNCTION {new.sentence} |
146 |
{ output.state after.block = |
147 |
'skip$ |
148 |
{ output.state before.all = |
149 |
'skip$ |
150 |
{ after.sentence 'output.state := } |
151 |
if$ |
152 |
} |
153 |
if$ |
154 |
} |
155 |
FUNCTION {add.blank} |
156 |
{ " " * before.all 'output.state := |
157 |
} |
158 |
|
159 |
FUNCTION {date.block} |
160 |
{ |
161 |
skip$ |
162 |
} |
163 |
|
164 |
FUNCTION {not} |
165 |
{ { #0 } |
166 |
{ #1 } |
167 |
if$ |
168 |
} |
169 |
FUNCTION {and} |
170 |
{ 'skip$ |
171 |
{ pop$ #0 } |
172 |
if$ |
173 |
} |
174 |
FUNCTION {or} |
175 |
{ { pop$ #1 } |
176 |
'skip$ |
177 |
if$ |
178 |
} |
179 |
FUNCTION {new.block.checkb} |
180 |
{ empty$ |
181 |
swap$ empty$ |
182 |
and |
183 |
'skip$ |
184 |
'new.block |
185 |
if$ |
186 |
} |
187 |
FUNCTION {field.or.null} |
188 |
{ duplicate$ empty$ |
189 |
{ pop$ "" } |
190 |
'skip$ |
191 |
if$ |
192 |
} |
193 |
FUNCTION {emphasize} |
194 |
{ duplicate$ empty$ |
195 |
{ pop$ "" } |
196 |
{ "\emph{" swap$ * "}" * } |
197 |
if$ |
198 |
} |
199 |
FUNCTION {bolden} |
200 |
{ duplicate$ empty$ |
201 |
{ pop$ "" } |
202 |
{ "\textbf{" swap$ * "}" * } |
203 |
if$ |
204 |
} |
205 |
FUNCTION {bib.name.font} |
206 |
{ duplicate$ empty$ |
207 |
{ pop$ "" } |
208 |
{ "\bibnamefont{" swap$ * "}" * } |
209 |
if$ |
210 |
} |
211 |
FUNCTION {bib.fname.font} |
212 |
{ duplicate$ empty$ |
213 |
{ pop$ "" } |
214 |
{ "\bibfnamefont{" swap$ * "}" * } |
215 |
if$ |
216 |
} |
217 |
FUNCTION {cite.name.font} |
218 |
{ duplicate$ empty$ |
219 |
{ pop$ "" } |
220 |
{ "\citenamefont{" swap$ * "}" * } |
221 |
if$ |
222 |
} |
223 |
FUNCTION {tie.or.space.prefix} |
224 |
{ duplicate$ text.length$ #3 < |
225 |
{ "~" } |
226 |
{ " " } |
227 |
if$ |
228 |
swap$ |
229 |
} |
230 |
|
231 |
FUNCTION {capitalize} |
232 |
{ "u" change.case$ "t" change.case$ } |
233 |
|
234 |
FUNCTION {space.word} |
235 |
{ " " swap$ * " " * } |
236 |
% Here are the language-specific definitions for explicit words. |
237 |
% Each function has a name bbl.xxx where xxx is the English word. |
238 |
% The language selected here is ENGLISH |
239 |
FUNCTION {bbl.and} |
240 |
{ "and"} |
241 |
|
242 |
FUNCTION {bbl.etal} |
243 |
{ "et~al." } |
244 |
|
245 |
FUNCTION {bbl.editors} |
246 |
{ "eds." } |
247 |
|
248 |
FUNCTION {bbl.editor} |
249 |
{ "ed." } |
250 |
|
251 |
FUNCTION {bbl.edby} |
252 |
{ "edited by" } |
253 |
|
254 |
FUNCTION {bbl.edition} |
255 |
{ "edition" } |
256 |
|
257 |
FUNCTION {bbl.volume} |
258 |
{ "volume" } |
259 |
|
260 |
FUNCTION {bbl.of} |
261 |
{ "of" } |
262 |
|
263 |
FUNCTION {bbl.number} |
264 |
{ "number" } |
265 |
|
266 |
FUNCTION {bbl.nr} |
267 |
{ "no." } |
268 |
|
269 |
FUNCTION {bbl.in} |
270 |
{ "in" } |
271 |
|
272 |
FUNCTION {bbl.pages} |
273 |
{ "pp." } |
274 |
|
275 |
FUNCTION {bbl.page} |
276 |
{ "p." } |
277 |
|
278 |
FUNCTION {bbl.eidpp} |
279 |
{ "pages" } |
280 |
|
281 |
FUNCTION {bbl.chapter} |
282 |
{ "chapter" } |
283 |
|
284 |
FUNCTION {bbl.techrep} |
285 |
{ "Technical Report" } |
286 |
|
287 |
FUNCTION {bbl.mthesis} |
288 |
{ "Master's thesis" } |
289 |
|
290 |
FUNCTION {bbl.phdthesis} |
291 |
{ "Ph.D. thesis" } |
292 |
|
293 |
MACRO {jan} {"January"} |
294 |
|
295 |
MACRO {feb} {"February"} |
296 |
|
297 |
MACRO {mar} {"March"} |
298 |
|
299 |
MACRO {apr} {"April"} |
300 |
|
301 |
MACRO {may} {"May"} |
302 |
|
303 |
MACRO {jun} {"June"} |
304 |
|
305 |
MACRO {jul} {"July"} |
306 |
|
307 |
MACRO {aug} {"August"} |
308 |
|
309 |
MACRO {sep} {"September"} |
310 |
|
311 |
MACRO {oct} {"October"} |
312 |
|
313 |
MACRO {nov} {"November"} |
314 |
|
315 |
MACRO {dec} {"December"} |
316 |
|
317 |
|
318 |
|
319 |
|
320 |
|
321 |
|
322 |
|
323 |
|
324 |
|
325 |
|
326 |
|
327 |
|
328 |
|
329 |
|
330 |
|
331 |
|
332 |
|
333 |
|
334 |
|
335 |
|
336 |
|
337 |
|
338 |
|
339 |
|
340 |
|
341 |
|
342 |
%------------------------------------------------------------------- |
343 |
|
344 |
% Begin module: |
345 |
|
346 |
|
347 |
% \ProvidesFile{physjour.mbs}[1999/10/05 2.1 (PWD)] |
348 |
|
349 |
|
350 |
|
351 |
|
352 |
|
353 |
|
354 |
|
355 |
|
356 |
|
357 |
|
358 |
|
359 |
|
360 |
|
361 |
|
362 |
|
363 |
|
364 |
|
365 |
|
366 |
|
367 |
|
368 |
|
369 |
|
370 |
|
371 |
|
372 |
|
373 |
|
374 |
|
375 |
|
376 |
|
377 |
|
378 |
|
379 |
|
380 |
|
381 |
|
382 |
|
383 |
|
384 |
|
385 |
|
386 |
|
387 |
|
388 |
|
389 |
|
390 |
|
391 |
|
392 |
|
393 |
|
394 |
|
395 |
|
396 |
|
397 |
|
398 |
|
399 |
|
400 |
|
401 |
|
402 |
|
403 |
|
404 |
|
405 |
|
406 |
|
407 |
|
408 |
|
409 |
|
410 |
|
411 |
|
412 |
|
413 |
|
414 |
|
415 |
|
416 |
|
417 |
|
418 |
|
419 |
|
420 |
|
421 |
|
422 |
|
423 |
|
424 |
|
425 |
|
426 |
|
427 |
|
428 |
|
429 |
|
430 |
|
431 |
|
432 |
|
433 |
|
434 |
|
435 |
|
436 |
|
437 |
|
438 |
|
439 |
|
440 |
|
441 |
|
442 |
|
443 |
|
444 |
|
445 |
|
446 |
|
447 |
|
448 |
|
449 |
|
450 |
|
451 |
|
452 |
|
453 |
|
454 |
|
455 |
|
456 |
|
457 |
|
458 |
|
459 |
|
460 |
|
461 |
|
462 |
|
463 |
|
464 |
|
465 |
|
466 |
|
467 |
|
468 |
|
469 |
|
470 |
|
471 |
|
472 |
|
473 |
|
474 |
|
475 |
|
476 |
|
477 |
|
478 |
|
479 |
|
480 |
|
481 |
|
482 |
|
483 |
MACRO {aa}{"Astron. \& Astrophys."} |
484 |
|
485 |
|
486 |
MACRO {aasup}{"Astron. \& Astrophys. Suppl. Ser."} |
487 |
|
488 |
|
489 |
MACRO {aj} {"Astron. J."} |
490 |
|
491 |
|
492 |
MACRO {aph} {"Acta Phys."} |
493 |
|
494 |
MACRO {advp} {"Adv. Phys."} |
495 |
|
496 |
MACRO {ajp} {"Amer. J. Phys."} |
497 |
|
498 |
MACRO {ajm} {"Amer. J. Math."} |
499 |
|
500 |
MACRO {amsci} {"Amer. Sci."} |
501 |
|
502 |
MACRO {anofd} {"Ann. Fluid Dyn."} |
503 |
|
504 |
MACRO {am} {"Ann. Math."} |
505 |
|
506 |
MACRO {ap} {"Ann. Phys. (NY)"} |
507 |
|
508 |
MACRO {adp} {"Ann. Phys. (Leipzig)"} |
509 |
|
510 |
MACRO {ao} {"Appl. Opt."} |
511 |
|
512 |
MACRO {apl} {"Appl. Phys. Lett."} |
513 |
|
514 |
MACRO {app} {"Astroparticle Phys."} |
515 |
|
516 |
MACRO {apj} {"Astrophys. J."} |
517 |
|
518 |
|
519 |
MACRO {apjsup} {"Astrophys. J. Suppl."} |
520 |
|
521 |
|
522 |
MACRO {apss} {"Astrophys. Space Sci."} |
523 |
|
524 |
|
525 |
MACRO {araa} {"Ann. Rev. Astron. Astrophys."} |
526 |
|
527 |
|
528 |
MACRO {baas} {"Bull. Amer. Astron. Soc."} |
529 |
|
530 |
|
531 |
MACRO {baps} {"Bull. Amer. Phys. Soc."} |
532 |
|
533 |
MACRO {cmp} {"Comm. Math. Phys."} |
534 |
|
535 |
MACRO {cpam} {"Commun. Pure Appl. Math."} |
536 |
|
537 |
MACRO {cppcf} {"Comm. Plasma Phys. \& Controlled Fusion"} |
538 |
|
539 |
MACRO {cpc} {"Comp. Phys. Comm."} |
540 |
|
541 |
MACRO {cqg} {"Class. Quant. Grav."} |
542 |
|
543 |
MACRO {cra} {"C. R. Acad. Sci. A"} |
544 |
|
545 |
MACRO {fed} {"Fusion Eng. \& Design"} |
546 |
|
547 |
MACRO {ft} {"Fusion Tech."} |
548 |
|
549 |
MACRO {grg} {"Gen. Relativ. Gravit."} |
550 |
|
551 |
MACRO {ieeens} {"IEEE Trans. Nucl. Sci."} |
552 |
|
553 |
MACRO {ieeeps} {"IEEE Trans. Plasma Sci."} |
554 |
|
555 |
MACRO {ijimw} {"Interntl. J. Infrared \& Millimeter Waves"} |
556 |
|
557 |
MACRO {ip} {"Infrared Phys."} |
558 |
|
559 |
MACRO {irp} {"Infrared Phys."} |
560 |
|
561 |
MACRO {jap} {"J. Appl. Phys."} |
562 |
|
563 |
MACRO {jasa} {"J. Acoust. Soc. America"} |
564 |
|
565 |
MACRO {jcp} {"J. Comp. Phys."} |
566 |
|
567 |
MACRO {jetp} {"Sov. Phys.--JETP"} |
568 |
|
569 |
MACRO {jfe} {"J. Fusion Energy"} |
570 |
|
571 |
MACRO {jfm} {"J. Fluid Mech."} |
572 |
|
573 |
MACRO {jmp} {"J. Math. Phys."} |
574 |
|
575 |
MACRO {jne} {"J. Nucl. Energy"} |
576 |
|
577 |
MACRO {jnec} {"J. Nucl. Energy, C: Plasma Phys., Accelerators, Thermonucl. Res."} |
578 |
|
579 |
MACRO {jnm} {"J. Nucl. Mat."} |
580 |
|
581 |
MACRO {jpc} {"J. Phys. Chem."} |
582 |
|
583 |
MACRO {jpp} {"J. Plasma Phys."} |
584 |
|
585 |
MACRO {jpsj} {"J. Phys. Soc. Japan"} |
586 |
|
587 |
MACRO {jsi} {"J. Sci. Instrum."} |
588 |
|
589 |
MACRO {jvst} {"J. Vac. Sci. \& Tech."} |
590 |
|
591 |
MACRO {nat} {"Nature"} |
592 |
|
593 |
MACRO {nature} {"Nature"} |
594 |
|
595 |
|
596 |
|
597 |
MACRO {nedf} {"Nucl. Eng. \& Design/Fusion"} |
598 |
|
599 |
MACRO {nf} {"Nucl. Fusion"} |
600 |
|
601 |
MACRO {nim} {"Nucl. Inst. \& Meth."} |
602 |
|
603 |
MACRO {nimpr} {"Nucl. Inst. \& Meth. in Phys. Res."} |
604 |
|
605 |
MACRO {np} {"Nucl. Phys."} |
606 |
|
607 |
MACRO {npb} {"Nucl. Phys. B"} |
608 |
|
609 |
MACRO {nt/f} {"Nucl. Tech./Fusion"} |
610 |
|
611 |
MACRO {npbpc} {"Nucl. Phys. B (Proc. Suppl.)"} |
612 |
|
613 |
MACRO {inc} {"Nuovo Cimento"} |
614 |
|
615 |
MACRO {nc} {"Nuovo Cimento"} |
616 |
|
617 |
MACRO {pf} {"Phys. Fluids"} |
618 |
|
619 |
MACRO {pfa} {"Phys. Fluids A: Fluid Dyn."} |
620 |
|
621 |
MACRO {pfb} {"Phys. Fluids B: Plasma Phys."} |
622 |
|
623 |
MACRO {pl} {"Phys. Lett."} |
624 |
|
625 |
MACRO {pla} {"Phys. Lett. A"} |
626 |
|
627 |
MACRO {plb} {"Phys. Lett. B"} |
628 |
|
629 |
MACRO {prep} {"Phys. Rep."} |
630 |
|
631 |
MACRO {pnas} {"Proc. Nat. Acad. Sci. USA"} |
632 |
|
633 |
MACRO {pp} {"Phys. Plasmas"} |
634 |
|
635 |
MACRO {ppcf} {"Plasma Phys. \& Controlled Fusion"} |
636 |
|
637 |
MACRO {phitrsl} {"Philos. Trans. Roy. Soc. London"} |
638 |
|
639 |
MACRO {prl} {"Phys. Rev. Lett."} |
640 |
|
641 |
MACRO {pr} {"Phys. Rev."} |
642 |
|
643 |
MACRO {physrev} {"Phys. Rev."} |
644 |
|
645 |
MACRO {pra} {"Phys. Rev. A"} |
646 |
|
647 |
MACRO {prb} {"Phys. Rev. B"} |
648 |
|
649 |
MACRO {prc} {"Phys. Rev. C"} |
650 |
|
651 |
MACRO {prd} {"Phys. Rev. D"} |
652 |
|
653 |
MACRO {pre} {"Phys. Rev. E"} |
654 |
|
655 |
MACRO {ps} {"Phys. Scripta"} |
656 |
|
657 |
MACRO {procrsl} {"Proc. Roy. Soc. London"} |
658 |
|
659 |
MACRO {rmp} {"Rev. Mod. Phys."} |
660 |
|
661 |
MACRO {rsi} {"Rev. Sci. Inst."} |
662 |
|
663 |
MACRO {science} {"Science"} |
664 |
|
665 |
|
666 |
MACRO {sciam} {"Sci. Am."} |
667 |
|
668 |
MACRO {sam} {"Stud. Appl. Math."} |
669 |
|
670 |
MACRO {sjpp} {"Sov. J. Plasma Phys."} |
671 |
|
672 |
MACRO {spd} {"Sov. Phys.--Doklady"} |
673 |
|
674 |
MACRO {sptp} {"Sov. Phys.--Tech. Phys."} |
675 |
|
676 |
MACRO {spu} {"Sov. Phys.--Uspeki"} |
677 |
|
678 |
MACRO {st} {"Sky and Telesc."} |
679 |
|
680 |
|
681 |
|
682 |
|
683 |
|
684 |
% End module: physjour.mbs |
685 |
|
686 |
|
687 |
|
688 |
%------------------------------------------------------------------- |
689 |
% Begin module: |
690 |
% \ProvidesFile{geojour.mbs}[1999/11/16 2.0g (PWD)] |
691 |
MACRO {aisr} {"Adv. Space Res."} |
692 |
MACRO {ag} {"Ann. Geophys."} |
693 |
MACRO {anigeo} {"Ann. Geofis."} |
694 |
MACRO {angl} {"Ann. Glaciol."} |
695 |
MACRO {andmet} {"Ann. d. Meteor."} |
696 |
MACRO {andgeo} {"Ann. d. Geophys."} |
697 |
MACRO {andphy} {"Ann. Phys.-Paris"} |
698 |
MACRO {afmgb} {"Arch. Meteor. Geophys. Bioklimatol."} |
699 |
MACRO {atph} {"Atm\'osphera"} |
700 |
MACRO {aao} {"Atmos. Ocean"} |
701 |
MACRO {ass}{"Astrophys. Space Sci."} |
702 |
MACRO {atenv} {"Atmos. Environ."} |
703 |
MACRO {aujag} {"Aust. J. Agr. Res."} |
704 |
MACRO {aumet} {"Aust. Meteorol. Mag."} |
705 |
MACRO {blmet} {"Bound.-Lay. Meteorol."} |
706 |
MACRO {bams} {"Bull. Amer. Meteorol. Soc."} |
707 |
MACRO {cch} {"Clim. Change"} |
708 |
MACRO {cdyn} {"Clim. Dynam."} |
709 |
MACRO {cbul} {"Climatol. Bull."} |
710 |
MACRO {cap} {"Contrib. Atmos. Phys."} |
711 |
MACRO {dsr} {"Deep-Sea Res."} |
712 |
MACRO {dhz} {"Dtsch. Hydrogr. Z."} |
713 |
MACRO {dao} {"Dynam. Atmos. Oceans"} |
714 |
MACRO {eco} {"Ecology"} |
715 |
MACRO {empl}{"Earth, Moon and Planets"} |
716 |
MACRO {envres} {"Environ. Res."} |
717 |
MACRO {envst} {"Environ. Sci. Technol."} |
718 |
MACRO {ecms} {"Estuarine Coastal Mar. Sci."} |
719 |
MACRO {expa}{"Exper. Astron."} |
720 |
MACRO {geoint} {"Geofis. Int."} |
721 |
MACRO {geopub} {"Geofys. Publ."} |
722 |
MACRO {geogeo} {"Geol. Geofiz."} |
723 |
MACRO {gafd} {"Geophys. Astrophys. Fluid Dyn."} |
724 |
MACRO {gfd} {"Geophys. Fluid Dyn."} |
725 |
MACRO {geomag} {"Geophys. Mag."} |
726 |
MACRO {georl} {"Geophys. Res. Lett."} |
727 |
MACRO {grl} {"Geophys. Res. Lett."} |
728 |
MACRO {ga} {"Geophysica"} |
729 |
MACRO {gs} {"Geophysics"} |
730 |
MACRO {ieeetap} {"IEEE Trans. Antenn. Propag."} |
731 |
MACRO {ijawp} {"Int. J. Air Water Pollut."} |
732 |
MACRO {ijc} {"Int. J. Climatol."} |
733 |
MACRO {ijrs} {"Int. J. Remote Sens."} |
734 |
MACRO {jam} {"J. Appl. Meteorol."} |
735 |
MACRO {jaot} {"J. Atmos. Ocean. Technol."} |
736 |
MACRO {jatp} {"J. Atmos. Terr. Phys."} |
737 |
MACRO {jce} {"J. Climate"} |
738 |
MACRO {jcam} {"J. Climate Appl. Meteor."} |
739 |
MACRO {jcm} {"J. Climate Meteor."} |
740 |
MACRO {jcy} {"J. Climatol."} |
741 |
MACRO {jgr} {"J. Geophys. Res."} |
742 |
MACRO {jga} {"J. Glaciol."} |
743 |
MACRO {jh} {"J. Hydrol."} |
744 |
MACRO {jmr} {"J. Mar. Res."} |
745 |
MACRO {jmrj} {"J. Meteor. Res. Japan"} |
746 |
MACRO {jm} {"J. Meteor."} |
747 |
MACRO {jpo} {"J. Phys. Oceanogr."} |
748 |
MACRO {jra} {"J. Rech. Atmos."} |
749 |
MACRO {jaes} {"J. Aeronaut. Sci."} |
750 |
MACRO {japca} {"J. Air Pollut. Control Assoc."} |
751 |
MACRO {jas} {"J. Atmos. Sci."} |
752 |
MACRO {jmts} {"J. Mar. Technol. Soc."} |
753 |
MACRO {jmsj} {"J. Meteorol. Soc. Japan"} |
754 |
MACRO {josj} {"J. Oceanogr. Soc. Japan"} |
755 |
MACRO {jwm} {"J. Wea. Mod."} |
756 |
MACRO {lao} {"Limnol. Oceanogr."} |
757 |
MACRO {mwl} {"Mar. Wea. Log"} |
758 |
MACRO {mau} {"Mausam"} |
759 |
MACRO {meteor} {"``Meteor'' Forschungsergeb."} |
760 |
MACRO {map} {"Meteorol. Atmos. Phys."} |
761 |
MACRO {metmag} {"Meteor. Mag."} |
762 |
MACRO {metmon} {"Meteor. Monogr."} |
763 |
MACRO {metrun} {"Meteor. Rundsch."} |
764 |
MACRO {metzeit} {"Meteor. Z."} |
765 |
MACRO {metgid} {"Meteor. Gidrol."} |
766 |
MACRO {mwr} {"Mon. Weather Rev."} |
767 |
MACRO {nwd} {"Natl. Weather Dig."} |
768 |
MACRO {nzjmfr} {"New Zeal. J. Mar. Freshwater Res."} |
769 |
MACRO {npg} {"Nonlin. Proc. Geophys."} |
770 |
MACRO {om} {"Oceanogr. Meteorol."} |
771 |
MACRO {ocac} {"Oceanol. Acta"} |
772 |
MACRO {oceanus} {"Oceanus"} |
773 |
MACRO {paleoc} {"Paleoceanography"} |
774 |
MACRO {pce} {"Phys. Chem. Earth"} |
775 |
MACRO {pmg} {"Pap. Meteor. Geophys."} |
776 |
MACRO {ppom} {"Pap. Phys. Oceanogr. Meteor."} |
777 |
MACRO {physzeit} {"Phys. Z."} |
778 |
MACRO {pps} {"Planet. Space Sci."} |
779 |
MACRO {pss} {"Planet. Space Sci."} |
780 |
MACRO {pag} {"Pure Appl. Geophys."} |
781 |
MACRO {qjrms} {"Quart. J. Roy. Meteorol. Soc."} |
782 |
MACRO {quatres} {"Quat. Res."} |
783 |
MACRO {rsci} {"Radio Sci."} |
784 |
MACRO {rse} {"Remote Sens. Environ."} |
785 |
MACRO {rgeo} {"Rev. Geophys."} |
786 |
MACRO {rgsp} {"Rev. Geophys. Space Phys."} |
787 |
MACRO {rdgeo} {"Rev. Geofis."} |
788 |
MACRO {revmeta} {"Rev. Meteorol."} |
789 |
MACRO {sgp}{"Surveys in Geophys."} |
790 |
MACRO {sp} {"Solar Phys."} |
791 |
MACRO {ssr} {"Space Sci. Rev."} |
792 |
MACRO {tellus} {"Tellus"} |
793 |
MACRO {tac} {"Theor. Appl. Climatol."} |
794 |
MACRO {tagu} {"Trans. Am. Geophys. Union (EOS)"} |
795 |
MACRO {wrr} {"Water Resour. Res."} |
796 |
MACRO {weather} {"Weather"} |
797 |
MACRO {wafc} {"Weather Forecast."} |
798 |
MACRO {ww} {"Weatherwise"} |
799 |
MACRO {wmob} {"WMO Bull."} |
800 |
MACRO {zeitmet} {"Z. Meteorol."} |
801 |
% End module: geojour.mbs |
802 |
|
803 |
|
804 |
|
805 |
|
806 |
|
807 |
|
808 |
|
809 |
|
810 |
|
811 |
|
812 |
|
813 |
|
814 |
|
815 |
|
816 |
|
817 |
|
818 |
|
819 |
|
820 |
|
821 |
|
822 |
|
823 |
|
824 |
|
825 |
|
826 |
|
827 |
%------------------------------------------------------------------- |
828 |
|
829 |
% Begin module: |
830 |
|
831 |
|
832 |
% \ProvidesFile{photjour.mbs}[1999/02/24 2.0b (PWD)] |
833 |
|
834 |
|
835 |
|
836 |
|
837 |
|
838 |
|
839 |
|
840 |
|
841 |
|
842 |
|
843 |
|
844 |
|
845 |
|
846 |
|
847 |
|
848 |
|
849 |
|
850 |
|
851 |
|
852 |
|
853 |
|
854 |
|
855 |
|
856 |
|
857 |
|
858 |
|
859 |
|
860 |
|
861 |
|
862 |
|
863 |
|
864 |
|
865 |
|
866 |
|
867 |
|
868 |
|
869 |
|
870 |
|
871 |
|
872 |
|
873 |
|
874 |
|
875 |
|
876 |
|
877 |
|
878 |
|
879 |
|
880 |
|
881 |
|
882 |
|
883 |
|
884 |
|
885 |
|
886 |
|
887 |
|
888 |
|
889 |
|
890 |
|
891 |
|
892 |
|
893 |
|
894 |
|
895 |
|
896 |
|
897 |
|
898 |
|
899 |
|
900 |
|
901 |
|
902 |
|
903 |
|
904 |
|
905 |
|
906 |
|
907 |
|
908 |
|
909 |
|
910 |
|
911 |
|
912 |
|
913 |
|
914 |
|
915 |
|
916 |
|
917 |
|
918 |
|
919 |
|
920 |
|
921 |
|
922 |
|
923 |
|
924 |
|
925 |
|
926 |
|
927 |
|
928 |
|
929 |
|
930 |
|
931 |
|
932 |
|
933 |
|
934 |
|
935 |
|
936 |
|
937 |
MACRO {appopt} {"Appl. Opt."} |
938 |
|
939 |
MACRO {bell} {"Bell Syst. Tech. J."} |
940 |
|
941 |
MACRO {ell} {"Electron. Lett."} |
942 |
|
943 |
MACRO {jasp} {"J. Appl. Spectr."} |
944 |
|
945 |
MACRO {jqe} {"IEEE J. Quantum Electron."} |
946 |
|
947 |
MACRO {jlwt} {"J. Lightwave Technol."} |
948 |
|
949 |
MACRO {jmo} {"J. Mod. Opt."} |
950 |
|
951 |
MACRO {josa} {"J. Opt. Soc. America"} |
952 |
|
953 |
MACRO {josaa} {"J. Opt. Soc. Amer.~A"} |
954 |
|
955 |
MACRO {josab} {"J. Opt. Soc. Amer.~B"} |
956 |
|
957 |
MACRO {jdp} {"J. Phys. (Paris)"} |
958 |
|
959 |
MACRO {oc} {"Opt. Commun."} |
960 |
|
961 |
MACRO {ol} {"Opt. Lett."} |
962 |
|
963 |
MACRO {phtl} {"IEEE Photon. Technol. Lett."} |
964 |
|
965 |
MACRO {pspie} {"Proc. Soc. Photo-Opt. Instrum. Eng."} |
966 |
|
967 |
MACRO {sse} {"Solid-State Electron."} |
968 |
|
969 |
MACRO {sjot} {"Sov. J. Opt. Technol."} |
970 |
|
971 |
MACRO {sjqe} {"Sov. J. Quantum Electron."} |
972 |
|
973 |
MACRO {sleb} {"Sov. Phys.--Leb. Inst. Rep."} |
974 |
|
975 |
MACRO {stph} {"Sov. Phys.--Techn. Phys."} |
976 |
|
977 |
MACRO {stphl} {"Sov. Techn. Phys. Lett."} |
978 |
|
979 |
MACRO {vr} {"Vision Res."} |
980 |
|
981 |
MACRO {zph} {"Z. f. Physik"} |
982 |
|
983 |
MACRO {zphb} {"Z. f. Physik~B"} |
984 |
|
985 |
MACRO {zphd} {"Z. f. Physik~D"} |
986 |
|
987 |
MACRO {CLEO} {"CLEO"} |
988 |
|
989 |
MACRO {ASSL} {"Adv. Sol.-State Lasers"} |
990 |
|
991 |
MACRO {OSA} {"OSA"} |
992 |
|
993 |
|
994 |
|
995 |
|
996 |
% End module: photjour.mbs |
997 |
|
998 |
|
999 |
|
1000 |
%% Copyright 1994-2000 Patrick W Daly |
1001 |
MACRO {acmcs} {"ACM Comput. Surv."} |
1002 |
|
1003 |
MACRO {acta} {"Acta Inf."} |
1004 |
|
1005 |
MACRO {cacm} {"Commun. ACM"} |
1006 |
|
1007 |
MACRO {ibmjrd} {"IBM J. Res. Dev."} |
1008 |
|
1009 |
MACRO {ibmsj} {"IBM Syst.~J."} |
1010 |
|
1011 |
MACRO {ieeese} {"IEEE Trans. Software Eng."} |
1012 |
|
1013 |
MACRO {ieeetc} {"IEEE Trans. Comput."} |
1014 |
|
1015 |
MACRO {ieeetcad} |
1016 |
{"IEEE Trans. Comput. Aid. Des."} |
1017 |
|
1018 |
MACRO {ipl} {"Inf. Process. Lett."} |
1019 |
|
1020 |
MACRO {jacm} {"J.~ACM"} |
1021 |
|
1022 |
MACRO {jcss} {"J.~Comput. Syst. Sci."} |
1023 |
|
1024 |
MACRO {scp} {"Sci. Comput. Program."} |
1025 |
|
1026 |
MACRO {sicomp} {"SIAM J. Comput."} |
1027 |
|
1028 |
MACRO {tocs} {"ACM Trans. Comput. Syst."} |
1029 |
|
1030 |
MACRO {tods} {"ACM Trans. Database Syst."} |
1031 |
|
1032 |
MACRO {tog} {"ACM Trans. Graphic."} |
1033 |
|
1034 |
MACRO {toms} {"ACM Trans. Math. Software"} |
1035 |
|
1036 |
MACRO {toois} {"ACM Trans. Office Inf. Syst."} |
1037 |
|
1038 |
MACRO {toplas} {"ACM Trans. Progr. Lang. Syst."} |
1039 |
|
1040 |
MACRO {tcs} {"Theor. Comput. Sci."} |
1041 |
|
1042 |
FUNCTION {bibinfo.check} |
1043 |
{ swap$ |
1044 |
duplicate$ missing$ |
1045 |
{ |
1046 |
pop$ pop$ |
1047 |
"" |
1048 |
} |
1049 |
{ duplicate$ empty$ |
1050 |
{ |
1051 |
swap$ pop$ |
1052 |
} |
1053 |
{ swap$ |
1054 |
"\bibinfo{" swap$ * "}{" * swap$ * "}" * |
1055 |
} |
1056 |
if$ |
1057 |
} |
1058 |
if$ |
1059 |
} |
1060 |
FUNCTION {bibinfo.warn} |
1061 |
{ swap$ |
1062 |
duplicate$ missing$ |
1063 |
{ |
1064 |
swap$ "missing " swap$ * " in " * cite$ * warning$ pop$ |
1065 |
"" |
1066 |
} |
1067 |
{ duplicate$ empty$ |
1068 |
{ |
1069 |
swap$ "empty " swap$ * " in " * cite$ * warning$ |
1070 |
} |
1071 |
{ swap$ |
1072 |
"\bibinfo{" swap$ * "}{" * swap$ * "}" * |
1073 |
} |
1074 |
if$ |
1075 |
} |
1076 |
if$ |
1077 |
} |
1078 |
FUNCTION {format.eprint} |
1079 |
{ eprint duplicate$ empty$ |
1080 |
'skip$ |
1081 |
{ "\eprint" |
1082 |
archive empty$ |
1083 |
'skip$ |
1084 |
{ "[" * archive * "]" * } |
1085 |
if$ |
1086 |
"{" * swap$ * "}" * |
1087 |
} |
1088 |
if$ |
1089 |
} |
1090 |
FUNCTION {format.url} |
1091 |
{ url empty$ |
1092 |
{ "" } |
1093 |
{ "\urlprefix\url{" url * "}" * } |
1094 |
if$ |
1095 |
} |
1096 |
|
1097 |
STRINGS { bibinfo} |
1098 |
INTEGERS { nameptr namesleft numnames } |
1099 |
|
1100 |
FUNCTION {format.names} |
1101 |
{ 'bibinfo := |
1102 |
duplicate$ empty$ 'skip$ { |
1103 |
's := |
1104 |
"" 't := |
1105 |
#1 'nameptr := |
1106 |
s num.names$ 'numnames := |
1107 |
numnames 'namesleft := |
1108 |
{ namesleft #0 > } |
1109 |
{ s nameptr |
1110 |
nameptr #1 > |
1111 |
{ "{f.}" format.name$ duplicate$ empty$ 'skip$ |
1112 |
{ tie.or.space.prefix bib.fname.font swap$ * } |
1113 |
if$ |
1114 |
s nameptr |
1115 |
"{vv~}{ll}" format.name$ bib.name.font * |
1116 |
s nameptr |
1117 |
"{jj}" format.name$ duplicate$ empty$ 'skip$ |
1118 |
{ bib.fname.font ", " swap$ * } |
1119 |
if$ |
1120 |
} |
1121 |
{ "{vv~}{ll}" format.name$ bib.name.font |
1122 |
s nameptr |
1123 |
"{f.}{, jj}" |
1124 |
format.name$ duplicate$ empty$ 'skip$ |
1125 |
{ bib.fname.font ", " swap$ * } |
1126 |
if$ |
1127 |
} |
1128 |
if$ |
1129 |
* |
1130 |
bibinfo bibinfo.check |
1131 |
't := |
1132 |
nameptr #1 > |
1133 |
{ |
1134 |
nameptr #2 |
1135 |
#10 + |
1136 |
#1 + = |
1137 |
numnames #2 |
1138 |
#10 + |
1139 |
> and |
1140 |
{ "others" 't := |
1141 |
#1 'namesleft := } |
1142 |
'skip$ |
1143 |
if$ |
1144 |
namesleft #1 > |
1145 |
{ ", " * t * } |
1146 |
{ |
1147 |
"," * |
1148 |
s nameptr "{ll}" format.name$ duplicate$ "others" = |
1149 |
{ 't := } |
1150 |
{ pop$ } |
1151 |
if$ |
1152 |
t "others" = |
1153 |
{ |
1154 |
" " * bbl.etal emphasize * |
1155 |
} |
1156 |
{ |
1157 |
bbl.and |
1158 |
space.word * t * |
1159 |
} |
1160 |
if$ |
1161 |
} |
1162 |
if$ |
1163 |
} |
1164 |
't |
1165 |
if$ |
1166 |
nameptr #1 + 'nameptr := |
1167 |
namesleft #1 - 'namesleft := |
1168 |
} |
1169 |
while$ |
1170 |
} if$ |
1171 |
} |
1172 |
FUNCTION {format.names.ed} |
1173 |
{ |
1174 |
'bibinfo := |
1175 |
duplicate$ empty$ 'skip$ { |
1176 |
's := |
1177 |
"" 't := |
1178 |
#1 'nameptr := |
1179 |
s num.names$ 'numnames := |
1180 |
numnames 'namesleft := |
1181 |
{ namesleft #0 > } |
1182 |
{ s nameptr |
1183 |
"{f.}" format.name$ duplicate$ empty$ 'skip$ |
1184 |
{ tie.or.space.prefix bib.fname.font swap$ * } |
1185 |
if$ |
1186 |
s nameptr |
1187 |
"{vv~}{ll}" format.name$ bib.name.font * |
1188 |
s nameptr |
1189 |
"{jj}" format.name$ duplicate$ empty$ 'skip$ |
1190 |
{ bib.fname.font ", " swap$ * } |
1191 |
if$ |
1192 |
* |
1193 |
bibinfo bibinfo.check |
1194 |
't := |
1195 |
nameptr #1 > |
1196 |
{ |
1197 |
namesleft #1 > |
1198 |
{ ", " * t * } |
1199 |
{ |
1200 |
numnames #2 > |
1201 |
{ "," * } |
1202 |
'skip$ |
1203 |
if$ |
1204 |
s nameptr "{ll}" format.name$ duplicate$ "others" = |
1205 |
{ 't := } |
1206 |
{ pop$ } |
1207 |
if$ |
1208 |
t "others" = |
1209 |
{ |
1210 |
|
1211 |
" " * bbl.etal emphasize * |
1212 |
} |
1213 |
{ |
1214 |
bbl.and |
1215 |
space.word * t * |
1216 |
} |
1217 |
if$ |
1218 |
} |
1219 |
if$ |
1220 |
} |
1221 |
't |
1222 |
if$ |
1223 |
nameptr #1 + 'nameptr := |
1224 |
namesleft #1 - 'namesleft := |
1225 |
} |
1226 |
while$ |
1227 |
} if$ |
1228 |
} |
1229 |
FUNCTION {format.key} |
1230 |
{ empty$ |
1231 |
{ key field.or.null } |
1232 |
{ "" } |
1233 |
if$ |
1234 |
} |
1235 |
|
1236 |
FUNCTION {format.authors} |
1237 |
{ author "author" format.names |
1238 |
duplicate$ empty$ 'skip$ |
1239 |
{ collaboration "collaboration" bibinfo.check |
1240 |
duplicate$ empty$ 'skip$ |
1241 |
{ " (" swap$ * ")" * } |
1242 |
if$ |
1243 |
* |
1244 |
} |
1245 |
if$ |
1246 |
} |
1247 |
FUNCTION {get.bbl.editor} |
1248 |
{ editor num.names$ #1 > 'bbl.editors 'bbl.editor if$ } |
1249 |
|
1250 |
FUNCTION {format.editors} |
1251 |
{ editor "editor" format.names duplicate$ empty$ 'skip$ |
1252 |
{ |
1253 |
" " * |
1254 |
get.bbl.editor |
1255 |
"(" swap$ * ")" * |
1256 |
* |
1257 |
} |
1258 |
if$ |
1259 |
} |
1260 |
FUNCTION {format.isbn} |
1261 |
{ isbn "isbn" bibinfo.check |
1262 |
duplicate$ empty$ 'skip$ |
1263 |
{ |
1264 |
"ISBN " swap$ * |
1265 |
} |
1266 |
if$ |
1267 |
} |
1268 |
|
1269 |
FUNCTION {format.issn} |
1270 |
{ issn "issn" bibinfo.check |
1271 |
duplicate$ empty$ 'skip$ |
1272 |
{ |
1273 |
"ISSN " swap$ * |
1274 |
} |
1275 |
if$ |
1276 |
} |
1277 |
|
1278 |
FUNCTION {format.note} |
1279 |
{ |
1280 |
note empty$ |
1281 |
{ "" } |
1282 |
{ note #1 #1 substring$ |
1283 |
duplicate$ "{" = |
1284 |
'skip$ |
1285 |
{ output.state mid.sentence = |
1286 |
{ "l" } |
1287 |
{ "u" } |
1288 |
if$ |
1289 |
change.case$ |
1290 |
} |
1291 |
if$ |
1292 |
note #2 global.max$ substring$ * "note" bibinfo.check |
1293 |
} |
1294 |
if$ |
1295 |
} |
1296 |
|
1297 |
FUNCTION {format.title} |
1298 |
{ title |
1299 |
duplicate$ empty$ |
1300 |
{ skip$ } |
1301 |
{ "t" change.case$ } |
1302 |
if$ |
1303 |
"title" bibinfo.check |
1304 |
} |
1305 |
|
1306 |
FUNCTION {format.full.names} |
1307 |
{'s := |
1308 |
"" 't := |
1309 |
#1 'nameptr := |
1310 |
s num.names$ 'numnames := |
1311 |
numnames 'namesleft := |
1312 |
{ namesleft #0 > } |
1313 |
{ s nameptr |
1314 |
"{vv~}{ll}" format.name$ |
1315 |
't := |
1316 |
nameptr #1 > |
1317 |
{ |
1318 |
nameptr #2 |
1319 |
#10 + |
1320 |
#1 + = |
1321 |
numnames #2 |
1322 |
#10 + |
1323 |
> and |
1324 |
{ "others" 't := |
1325 |
#1 'namesleft := } |
1326 |
'skip$ |
1327 |
if$ |
1328 |
namesleft #1 > |
1329 |
{ ", " * t * } |
1330 |
{ |
1331 |
s nameptr "{ll}" format.name$ duplicate$ "others" = |
1332 |
{ 't := } |
1333 |
{ pop$ } |
1334 |
if$ |
1335 |
t "others" = |
1336 |
{ |
1337 |
cite.name.font |
1338 |
" " * bbl.etal emphasize * |
1339 |
} |
1340 |
{ |
1341 |
numnames #2 > |
1342 |
{ "," * } |
1343 |
'skip$ |
1344 |
if$ |
1345 |
bbl.and |
1346 |
space.word * t * |
1347 |
} |
1348 |
if$ |
1349 |
} |
1350 |
if$ |
1351 |
} |
1352 |
't |
1353 |
if$ |
1354 |
nameptr #1 + 'nameptr := |
1355 |
namesleft #1 - 'namesleft := |
1356 |
} |
1357 |
while$ |
1358 |
t "others" = |
1359 |
'skip$ |
1360 |
{ cite.name.font } |
1361 |
if$ |
1362 |
} |
1363 |
|
1364 |
FUNCTION {author.editor.key.full} |
1365 |
{ author empty$ |
1366 |
{ editor empty$ |
1367 |
{ key empty$ |
1368 |
{ cite$ #1 #3 substring$ } |
1369 |
'key |
1370 |
if$ |
1371 |
} |
1372 |
{ editor format.full.names } |
1373 |
if$ |
1374 |
} |
1375 |
{ author format.full.names } |
1376 |
if$ |
1377 |
} |
1378 |
|
1379 |
FUNCTION {author.key.full} |
1380 |
{ author empty$ |
1381 |
{ key empty$ |
1382 |
{ cite$ #1 #3 substring$ } |
1383 |
'key |
1384 |
if$ |
1385 |
} |
1386 |
{ author format.full.names } |
1387 |
if$ |
1388 |
} |
1389 |
|
1390 |
FUNCTION {editor.key.full} |
1391 |
{ editor empty$ |
1392 |
{ key empty$ |
1393 |
{ cite$ #1 #3 substring$ } |
1394 |
'key |
1395 |
if$ |
1396 |
} |
1397 |
{ editor format.full.names } |
1398 |
if$ |
1399 |
} |
1400 |
|
1401 |
FUNCTION {make.full.names} |
1402 |
{ type$ "book" = |
1403 |
type$ "inbook" = |
1404 |
or |
1405 |
'author.editor.key.full |
1406 |
{ type$ "proceedings" = |
1407 |
'editor.key.full |
1408 |
'author.key.full |
1409 |
if$ |
1410 |
} |
1411 |
if$ |
1412 |
} |
1413 |
|
1414 |
FUNCTION {output.bibitem} |
1415 |
{ newline$ |
1416 |
"\bibitem[{" write$ |
1417 |
label write$ |
1418 |
")" make.full.names duplicate$ short.list = |
1419 |
{ pop$ } |
1420 |
{ * } |
1421 |
if$ |
1422 |
"}]{" * write$ |
1423 |
cite$ write$ |
1424 |
"}" write$ |
1425 |
newline$ |
1426 |
"" |
1427 |
before.all 'output.state := |
1428 |
} |
1429 |
|
1430 |
FUNCTION {n.dashify} |
1431 |
{ |
1432 |
't := |
1433 |
"" |
1434 |
{ t empty$ not } |
1435 |
{ t #1 #1 substring$ "-" = |
1436 |
{ t #1 #2 substring$ "--" = not |
1437 |
{ "--" * |
1438 |
t #2 global.max$ substring$ 't := |
1439 |
} |
1440 |
{ { t #1 #1 substring$ "-" = } |
1441 |
{ "-" * |
1442 |
t #2 global.max$ substring$ 't := |
1443 |
} |
1444 |
while$ |
1445 |
} |
1446 |
if$ |
1447 |
} |
1448 |
{ t #1 #1 substring$ * |
1449 |
t #2 global.max$ substring$ 't := |
1450 |
} |
1451 |
if$ |
1452 |
} |
1453 |
while$ |
1454 |
} |
1455 |
|
1456 |
FUNCTION {word.in} |
1457 |
{ bbl.in |
1458 |
" " * } |
1459 |
|
1460 |
FUNCTION {format.date} |
1461 |
{ year "year" bibinfo.check duplicate$ empty$ |
1462 |
{ |
1463 |
"empty year in " cite$ * "; set to ????" * warning$ |
1464 |
pop$ "????" |
1465 |
} |
1466 |
'skip$ |
1467 |
if$ |
1468 |
extra.label * |
1469 |
before.all 'output.state := |
1470 |
", " swap$ * |
1471 |
} |
1472 |
FUNCTION {format.date.misc} |
1473 |
{ |
1474 |
format.date "year" output.check |
1475 |
} |
1476 |
FUNCTION {format.btitle} |
1477 |
{ title "title" bibinfo.check |
1478 |
duplicate$ empty$ 'skip$ |
1479 |
{ |
1480 |
emphasize |
1481 |
} |
1482 |
if$ |
1483 |
} |
1484 |
FUNCTION {either.or.check} |
1485 |
{ empty$ |
1486 |
'pop$ |
1487 |
{ "can't use both " swap$ * " fields in " * cite$ * warning$ } |
1488 |
if$ |
1489 |
} |
1490 |
FUNCTION {format.bvolume} |
1491 |
{ volume empty$ |
1492 |
{ "" } |
1493 |
{ bbl.volume volume tie.or.space.prefix |
1494 |
"volume" bibinfo.check * * |
1495 |
series "series" bibinfo.check |
1496 |
duplicate$ empty$ 'pop$ |
1497 |
{ swap$ bbl.of space.word * swap$ |
1498 |
emphasize * } |
1499 |
if$ |
1500 |
"volume and number" number either.or.check |
1501 |
} |
1502 |
if$ |
1503 |
} |
1504 |
FUNCTION {format.number.series} |
1505 |
{ volume empty$ |
1506 |
{ number empty$ |
1507 |
{ series field.or.null } |
1508 |
{ series empty$ |
1509 |
{ number "number" bibinfo.check } |
1510 |
{ output.state mid.sentence = |
1511 |
{ bbl.number } |
1512 |
{ bbl.number capitalize } |
1513 |
if$ |
1514 |
number tie.or.space.prefix "number" bibinfo.check * * |
1515 |
bbl.in space.word * |
1516 |
series "series" bibinfo.check * |
1517 |
} |
1518 |
if$ |
1519 |
} |
1520 |
if$ |
1521 |
} |
1522 |
{ "" } |
1523 |
if$ |
1524 |
} |
1525 |
|
1526 |
FUNCTION {format.edition} |
1527 |
{ edition duplicate$ empty$ 'skip$ |
1528 |
{ |
1529 |
output.state mid.sentence = |
1530 |
{ "l" } |
1531 |
{ "t" } |
1532 |
if$ change.case$ |
1533 |
"edition" bibinfo.check |
1534 |
" " * bbl.edition * |
1535 |
} |
1536 |
if$ |
1537 |
} |
1538 |
INTEGERS { multiresult } |
1539 |
FUNCTION {multi.page.check} |
1540 |
{ 't := |
1541 |
#0 'multiresult := |
1542 |
{ multiresult not |
1543 |
t empty$ not |
1544 |
and |
1545 |
} |
1546 |
{ t #1 #1 substring$ |
1547 |
duplicate$ "-" = |
1548 |
swap$ duplicate$ "," = |
1549 |
swap$ "+" = |
1550 |
or or |
1551 |
{ #1 'multiresult := } |
1552 |
{ t #2 global.max$ substring$ 't := } |
1553 |
if$ |
1554 |
} |
1555 |
while$ |
1556 |
multiresult |
1557 |
} |
1558 |
FUNCTION {format.pages} |
1559 |
{ pages duplicate$ empty$ 'skip$ |
1560 |
{ duplicate$ multi.page.check |
1561 |
{ |
1562 |
bbl.pages swap$ |
1563 |
n.dashify |
1564 |
} |
1565 |
{ |
1566 |
bbl.page swap$ |
1567 |
} |
1568 |
if$ |
1569 |
tie.or.space.prefix |
1570 |
"pages" bibinfo.check |
1571 |
* * |
1572 |
} |
1573 |
if$ |
1574 |
} |
1575 |
FUNCTION {first.page} |
1576 |
{ 't := |
1577 |
"" |
1578 |
{ t empty$ not t #1 #1 substring$ "-" = not and } |
1579 |
{ t #1 #1 substring$ * |
1580 |
t #2 global.max$ substring$ 't := |
1581 |
} |
1582 |
while$ |
1583 |
} |
1584 |
|
1585 |
FUNCTION {format.journal.pages} |
1586 |
{ pages duplicate$ empty$ 'pop$ |
1587 |
{ swap$ duplicate$ empty$ |
1588 |
{ pop$ pop$ format.pages } |
1589 |
{ |
1590 |
", " * |
1591 |
swap$ |
1592 |
first.page |
1593 |
"pages" bibinfo.check |
1594 |
* |
1595 |
} |
1596 |
if$ |
1597 |
} |
1598 |
if$ |
1599 |
} |
1600 |
FUNCTION {format.journal.eid} |
1601 |
{ eid "eid" bibinfo.check |
1602 |
duplicate$ empty$ 'skip$ |
1603 |
{ swap$ duplicate$ empty$ 'skip$ |
1604 |
{ |
1605 |
", " * |
1606 |
} |
1607 |
if$ |
1608 |
swap$ |
1609 |
numpages empty$ 'skip$ |
1610 |
{ bbl.eidpp numpages tie.or.space.prefix |
1611 |
"numpages" bibinfo.check * * |
1612 |
" (" swap$ * ")" * * |
1613 |
} |
1614 |
if$ |
1615 |
} |
1616 |
if$ * |
1617 |
} |
1618 |
FUNCTION {format.vol.num.pages} |
1619 |
{ volume field.or.null |
1620 |
duplicate$ empty$ 'skip$ |
1621 |
{ |
1622 |
"volume" bibinfo.check |
1623 |
} |
1624 |
if$ |
1625 |
bolden |
1626 |
number "number" bibinfo.check duplicate$ empty$ 'skip$ |
1627 |
{ |
1628 |
swap$ duplicate$ empty$ |
1629 |
{ "there's a number but no volume in " cite$ * warning$ } |
1630 |
'skip$ |
1631 |
if$ |
1632 |
swap$ |
1633 |
"(" swap$ * ")" * |
1634 |
} |
1635 |
if$ * |
1636 |
} |
1637 |
|
1638 |
FUNCTION {format.chapter.pages} |
1639 |
{ chapter empty$ |
1640 |
{ "" } |
1641 |
{ type empty$ |
1642 |
{ bbl.chapter } |
1643 |
{ type "l" change.case$ |
1644 |
"type" bibinfo.check |
1645 |
} |
1646 |
if$ |
1647 |
chapter tie.or.space.prefix |
1648 |
"chapter" bibinfo.check |
1649 |
* * |
1650 |
} |
1651 |
if$ |
1652 |
} |
1653 |
|
1654 |
FUNCTION {format.booktitle} |
1655 |
{ |
1656 |
booktitle "booktitle" bibinfo.check |
1657 |
emphasize |
1658 |
} |
1659 |
FUNCTION {format.in.ed.booktitle} |
1660 |
{ format.booktitle duplicate$ empty$ 'skip$ |
1661 |
{ |
1662 |
editor "editor" format.names.ed duplicate$ empty$ 'pop$ |
1663 |
{ |
1664 |
bbl.edby |
1665 |
" " * swap$ * |
1666 |
swap$ |
1667 |
"," * |
1668 |
" " * swap$ |
1669 |
* } |
1670 |
if$ |
1671 |
word.in swap$ * |
1672 |
} |
1673 |
if$ |
1674 |
} |
1675 |
FUNCTION {format.thesis.type} |
1676 |
{ type duplicate$ empty$ |
1677 |
'pop$ |
1678 |
{ swap$ pop$ |
1679 |
"t" change.case$ "type" bibinfo.check |
1680 |
} |
1681 |
if$ |
1682 |
} |
1683 |
FUNCTION {format.tr.number} |
1684 |
{ number "number" bibinfo.check |
1685 |
type duplicate$ empty$ |
1686 |
{ pop$ bbl.techrep } |
1687 |
'skip$ |
1688 |
if$ |
1689 |
"type" bibinfo.check |
1690 |
swap$ duplicate$ empty$ |
1691 |
{ pop$ "t" change.case$ } |
1692 |
{ tie.or.space.prefix * * } |
1693 |
if$ |
1694 |
} |
1695 |
FUNCTION {format.article.crossref} |
1696 |
{ |
1697 |
word.in |
1698 |
" \cite{" * crossref * "}" * |
1699 |
} |
1700 |
FUNCTION {format.book.crossref} |
1701 |
{ volume duplicate$ empty$ |
1702 |
{ "empty volume in " cite$ * "'s crossref of " * crossref * warning$ |
1703 |
pop$ word.in |
1704 |
} |
1705 |
{ bbl.volume |
1706 |
swap$ tie.or.space.prefix "volume" bibinfo.check * * bbl.of space.word * |
1707 |
} |
1708 |
if$ |
1709 |
" \cite{" * crossref * "}" * |
1710 |
} |
1711 |
FUNCTION {format.incoll.inproc.crossref} |
1712 |
{ |
1713 |
word.in |
1714 |
" \cite{" * crossref * "}" * |
1715 |
} |
1716 |
FUNCTION {format.org.or.pub} |
1717 |
{ 't := |
1718 |
"" |
1719 |
address empty$ t empty$ and |
1720 |
'skip$ |
1721 |
{ |
1722 |
add.blank "(" * |
1723 |
t empty$ |
1724 |
{ address "address" bibinfo.check * |
1725 |
} |
1726 |
{ t * |
1727 |
address empty$ |
1728 |
'skip$ |
1729 |
{ ", " * address "address" bibinfo.check * } |
1730 |
if$ |
1731 |
} |
1732 |
if$ |
1733 |
")" * |
1734 |
} |
1735 |
if$ |
1736 |
} |
1737 |
FUNCTION {format.publisher.address} |
1738 |
{ publisher "publisher" bibinfo.warn format.org.or.pub |
1739 |
} |
1740 |
|
1741 |
FUNCTION {format.organization.address} |
1742 |
{ organization "organization" bibinfo.check format.org.or.pub |
1743 |
} |
1744 |
|
1745 |
FUNCTION {article} |
1746 |
{ output.bibitem |
1747 |
format.authors "author" output.check |
1748 |
author format.key output |
1749 |
format.date "year" output.check |
1750 |
date.block |
1751 |
crossref missing$ |
1752 |
{ |
1753 |
"" |
1754 |
journal |
1755 |
duplicate$ empty$ |
1756 |
{ pop$ pop$ } { |
1757 |
"journal" bibinfo.check |
1758 |
* "journal" output.check |
1759 |
add.blank |
1760 |
} if$ |
1761 |
format.vol.num.pages output |
1762 |
} |
1763 |
{ format.article.crossref output.nonnull |
1764 |
} |
1765 |
if$ |
1766 |
eid empty$ |
1767 |
{ format.journal.pages } |
1768 |
{ format.journal.eid } |
1769 |
if$ |
1770 |
format.issn output |
1771 |
format.note output |
1772 |
journal empty$ volume empty$ or { |
1773 |
format.eprint output |
1774 |
} {} if$ |
1775 |
format.url output |
1776 |
fin.entry |
1777 |
} |
1778 |
FUNCTION {book} |
1779 |
{ output.bibitem |
1780 |
author empty$ |
1781 |
{ format.editors "author and editor" output.check |
1782 |
editor format.key output |
1783 |
} |
1784 |
{ format.authors output.nonnull |
1785 |
crossref missing$ |
1786 |
{ "author and editor" editor either.or.check } |
1787 |
'skip$ |
1788 |
if$ |
1789 |
} |
1790 |
if$ |
1791 |
format.date "year" output.check |
1792 |
date.block |
1793 |
format.btitle "title" output.check |
1794 |
crossref missing$ |
1795 |
{ format.bvolume output |
1796 |
format.number.series output |
1797 |
format.publisher.address output |
1798 |
} |
1799 |
{ |
1800 |
format.book.crossref output.nonnull |
1801 |
} |
1802 |
if$ |
1803 |
format.edition output |
1804 |
format.isbn output |
1805 |
format.note output |
1806 |
format.eprint output |
1807 |
format.url output |
1808 |
fin.entry |
1809 |
} |
1810 |
FUNCTION {booklet} |
1811 |
{ output.bibitem |
1812 |
format.authors output |
1813 |
author format.key output |
1814 |
format.date "year" output.check |
1815 |
date.block |
1816 |
format.title "title" output.check |
1817 |
howpublished "howpublished" bibinfo.check output |
1818 |
address "address" bibinfo.check output |
1819 |
format.isbn output |
1820 |
format.note output |
1821 |
format.eprint output |
1822 |
format.url output |
1823 |
fin.entry |
1824 |
} |
1825 |
|
1826 |
FUNCTION {inbook} |
1827 |
{ output.bibitem |
1828 |
author empty$ |
1829 |
{ format.editors "author and editor" output.check |
1830 |
editor format.key output |
1831 |
} |
1832 |
{ format.authors output.nonnull |
1833 |
crossref missing$ |
1834 |
{ "author and editor" editor either.or.check } |
1835 |
'skip$ |
1836 |
if$ |
1837 |
} |
1838 |
if$ |
1839 |
format.date "year" output.check |
1840 |
date.block |
1841 |
format.btitle "title" output.check |
1842 |
crossref missing$ |
1843 |
{ |
1844 |
format.publisher.address output |
1845 |
format.bvolume output |
1846 |
format.chapter.pages "chapter and pages" output.check |
1847 |
format.number.series output |
1848 |
} |
1849 |
{ |
1850 |
format.chapter.pages "chapter and pages" output.check |
1851 |
format.book.crossref output.nonnull |
1852 |
} |
1853 |
if$ |
1854 |
format.edition output |
1855 |
crossref missing$ |
1856 |
{ format.isbn output } |
1857 |
'skip$ |
1858 |
if$ |
1859 |
format.pages "pages" output.check |
1860 |
format.note output |
1861 |
format.eprint output |
1862 |
format.url output |
1863 |
fin.entry |
1864 |
} |
1865 |
|
1866 |
FUNCTION {incollection} |
1867 |
{ output.bibitem |
1868 |
format.authors "author" output.check |
1869 |
author format.key output |
1870 |
format.date "year" output.check |
1871 |
date.block |
1872 |
crossref missing$ |
1873 |
{ format.in.ed.booktitle "booktitle" output.check |
1874 |
format.publisher.address output |
1875 |
format.bvolume output |
1876 |
format.number.series output |
1877 |
format.chapter.pages output |
1878 |
format.edition output |
1879 |
format.isbn output |
1880 |
} |
1881 |
{ format.incoll.inproc.crossref output.nonnull |
1882 |
format.chapter.pages output |
1883 |
} |
1884 |
if$ |
1885 |
format.pages "pages" output.check |
1886 |
format.note output |
1887 |
format.eprint output |
1888 |
format.url output |
1889 |
fin.entry |
1890 |
} |
1891 |
FUNCTION {inproceedings} |
1892 |
{ output.bibitem |
1893 |
format.authors "author" output.check |
1894 |
author format.key output |
1895 |
format.date "year" output.check |
1896 |
date.block |
1897 |
crossref missing$ |
1898 |
{ format.in.ed.booktitle "booktitle" output.check |
1899 |
publisher empty$ |
1900 |
{ format.organization.address output } |
1901 |
{ organization "organization" bibinfo.check output |
1902 |
format.publisher.address output |
1903 |
} |
1904 |
if$ |
1905 |
format.bvolume output |
1906 |
format.number.series output |
1907 |
format.pages output |
1908 |
format.isbn output |
1909 |
format.issn output |
1910 |
} |
1911 |
{ format.incoll.inproc.crossref output.nonnull |
1912 |
format.pages output |
1913 |
} |
1914 |
if$ |
1915 |
format.note output |
1916 |
format.eprint output |
1917 |
format.url output |
1918 |
fin.entry |
1919 |
} |
1920 |
FUNCTION {conference} { inproceedings } |
1921 |
FUNCTION {manual} |
1922 |
{ output.bibitem |
1923 |
format.authors output |
1924 |
author format.key output |
1925 |
format.date "year" output.check |
1926 |
date.block |
1927 |
format.btitle "title" output.check |
1928 |
organization "organization" bibinfo.check output |
1929 |
address "address" bibinfo.check output |
1930 |
format.edition output |
1931 |
format.note output |
1932 |
format.eprint output |
1933 |
format.url output |
1934 |
fin.entry |
1935 |
} |
1936 |
|
1937 |
FUNCTION {mastersthesis} |
1938 |
{ output.bibitem |
1939 |
format.authors "author" output.check |
1940 |
author format.key output |
1941 |
format.date "year" output.check |
1942 |
date.block |
1943 |
format.btitle |
1944 |
"title" output.check |
1945 |
bbl.mthesis format.thesis.type output.nonnull |
1946 |
school "school" bibinfo.warn output |
1947 |
address "address" bibinfo.check output |
1948 |
format.note output |
1949 |
format.eprint output |
1950 |
format.url output |
1951 |
fin.entry |
1952 |
} |
1953 |
|
1954 |
FUNCTION {misc} |
1955 |
{ output.bibitem |
1956 |
format.authors output |
1957 |
author format.key output |
1958 |
format.date.misc |
1959 |
date.block |
1960 |
format.title output |
1961 |
howpublished "howpublished" bibinfo.check output |
1962 |
format.note output |
1963 |
format.eprint output |
1964 |
format.url output |
1965 |
fin.entry |
1966 |
} |
1967 |
FUNCTION {phdthesis} |
1968 |
{ output.bibitem |
1969 |
format.authors "author" output.check |
1970 |
author format.key output |
1971 |
format.date "year" output.check |
1972 |
date.block |
1973 |
format.btitle |
1974 |
"title" output.check |
1975 |
bbl.phdthesis format.thesis.type output.nonnull |
1976 |
school "school" bibinfo.warn output |
1977 |
address "address" bibinfo.check output |
1978 |
format.note output |
1979 |
format.eprint output |
1980 |
format.url output |
1981 |
fin.entry |
1982 |
} |
1983 |
|
1984 |
FUNCTION {proceedings} |
1985 |
{ output.bibitem |
1986 |
format.editors output |
1987 |
editor format.key output |
1988 |
format.date "year" output.check |
1989 |
date.block |
1990 |
format.btitle "title" output.check |
1991 |
format.bvolume output |
1992 |
format.number.series output |
1993 |
publisher empty$ |
1994 |
{ format.organization.address output } |
1995 |
{ organization "organization" bibinfo.check output |
1996 |
format.publisher.address output |
1997 |
} |
1998 |
if$ |
1999 |
format.isbn output |
2000 |
format.issn output |
2001 |
format.note output |
2002 |
format.eprint output |
2003 |
format.url output |
2004 |
fin.entry |
2005 |
} |
2006 |
|
2007 |
FUNCTION {techreport} |
2008 |
{ output.bibitem |
2009 |
format.authors "author" output.check |
2010 |
author format.key output |
2011 |
format.date "year" output.check |
2012 |
date.block |
2013 |
format.btitle |
2014 |
"title" output.check |
2015 |
format.tr.number output.nonnull |
2016 |
institution "institution" bibinfo.warn output |
2017 |
address "address" bibinfo.check output |
2018 |
format.note output |
2019 |
format.eprint output |
2020 |
format.url output |
2021 |
fin.entry |
2022 |
} |
2023 |
|
2024 |
FUNCTION {unpublished} |
2025 |
{ output.bibitem |
2026 |
format.authors "author" output.check |
2027 |
author format.key output |
2028 |
format.date "year" output.check |
2029 |
date.block |
2030 |
format.title "title" output.check |
2031 |
format.note "note" output.check |
2032 |
format.eprint output |
2033 |
format.url output |
2034 |
fin.entry |
2035 |
} |
2036 |
|
2037 |
FUNCTION {default.type} { misc } |
2038 |
READ |
2039 |
FUNCTION {sortify} |
2040 |
{ purify$ |
2041 |
"l" change.case$ |
2042 |
} |
2043 |
INTEGERS { len } |
2044 |
FUNCTION {chop.word} |
2045 |
{ 's := |
2046 |
'len := |
2047 |
s #1 len substring$ = |
2048 |
{ s len #1 + global.max$ substring$ } |
2049 |
's |
2050 |
if$ |
2051 |
} |
2052 |
FUNCTION {format.lab.names} |
2053 |
{ 's := |
2054 |
"" 't := |
2055 |
s #1 "{vv~}{ll}" format.name$ |
2056 |
s num.names$ duplicate$ |
2057 |
#2 > |
2058 |
{ pop$ |
2059 |
cite.name.font |
2060 |
" " * bbl.etal emphasize * |
2061 |
"others" 't := |
2062 |
} |
2063 |
{ #2 < |
2064 |
'skip$ |
2065 |
{ s #2 "{ff }{vv }{ll}{ jj}" format.name$ "others" = |
2066 |
{ |
2067 |
" " * bbl.etal emphasize * |
2068 |
"others" 't := |
2069 |
} |
2070 |
{ bbl.and space.word * s #2 "{vv~}{ll}" format.name$ |
2071 |
* } |
2072 |
if$ |
2073 |
} |
2074 |
if$ |
2075 |
} |
2076 |
if$ |
2077 |
t "others" = |
2078 |
'skip$ |
2079 |
{ cite.name.font } |
2080 |
if$ |
2081 |
} |
2082 |
|
2083 |
FUNCTION {author.key.label} |
2084 |
{ author empty$ |
2085 |
{ key empty$ |
2086 |
{ cite$ #1 #3 substring$ } |
2087 |
'key |
2088 |
if$ |
2089 |
} |
2090 |
{ author format.lab.names } |
2091 |
if$ |
2092 |
} |
2093 |
|
2094 |
FUNCTION {author.editor.key.label} |
2095 |
{ author empty$ |
2096 |
{ editor empty$ |
2097 |
{ key empty$ |
2098 |
{ cite$ #1 #3 substring$ } |
2099 |
'key |
2100 |
if$ |
2101 |
} |
2102 |
{ editor format.lab.names } |
2103 |
if$ |
2104 |
} |
2105 |
{ author format.lab.names } |
2106 |
if$ |
2107 |
} |
2108 |
|
2109 |
FUNCTION {editor.key.label} |
2110 |
{ editor empty$ |
2111 |
{ key empty$ |
2112 |
{ cite$ #1 #3 substring$ } |
2113 |
'key |
2114 |
if$ |
2115 |
} |
2116 |
{ editor format.lab.names } |
2117 |
if$ |
2118 |
} |
2119 |
|
2120 |
FUNCTION {calc.short.authors} |
2121 |
{ type$ "book" = |
2122 |
type$ "inbook" = |
2123 |
or |
2124 |
'author.editor.key.label |
2125 |
{ type$ "proceedings" = |
2126 |
'editor.key.label |
2127 |
'author.key.label |
2128 |
if$ |
2129 |
} |
2130 |
if$ |
2131 |
'short.list := |
2132 |
} |
2133 |
|
2134 |
FUNCTION {calc.label} |
2135 |
{ calc.short.authors |
2136 |
short.list |
2137 |
"(" |
2138 |
* |
2139 |
year duplicate$ empty$ |
2140 |
short.list key field.or.null = or |
2141 |
{ pop$ "" } |
2142 |
'skip$ |
2143 |
if$ |
2144 |
* |
2145 |
'label := |
2146 |
} |
2147 |
|
2148 |
FUNCTION {sort.format.names} |
2149 |
{ 's := |
2150 |
#1 'nameptr := |
2151 |
"" |
2152 |
s num.names$ 'numnames := |
2153 |
numnames 'namesleft := |
2154 |
{ namesleft #0 > } |
2155 |
{ s nameptr |
2156 |
"{ll{ }}{ f{ }}{ jj{ }}" |
2157 |
format.name$ 't := |
2158 |
nameptr #1 > |
2159 |
{ |
2160 |
nameptr #2 |
2161 |
#10 + |
2162 |
#1 + = |
2163 |
numnames #2 |
2164 |
#10 + |
2165 |
> and |
2166 |
{ "others" 't := |
2167 |
#1 'namesleft := } |
2168 |
'skip$ |
2169 |
if$ |
2170 |
" " * |
2171 |
namesleft #1 = t "others" = and |
2172 |
{ "zzzzz" * } |
2173 |
{ t sortify * } |
2174 |
if$ |
2175 |
} |
2176 |
{ t sortify * } |
2177 |
if$ |
2178 |
nameptr #1 + 'nameptr := |
2179 |
namesleft #1 - 'namesleft := |
2180 |
} |
2181 |
while$ |
2182 |
} |
2183 |
|
2184 |
FUNCTION {sort.format.title} |
2185 |
{ 't := |
2186 |
"A " #2 |
2187 |
"An " #3 |
2188 |
"The " #4 t chop.word |
2189 |
chop.word |
2190 |
chop.word |
2191 |
sortify |
2192 |
#1 global.max$ substring$ |
2193 |
} |
2194 |
FUNCTION {author.sort} |
2195 |
{ author empty$ |
2196 |
{ key empty$ |
2197 |
{ "to sort, need author or key in " cite$ * warning$ |
2198 |
"" |
2199 |
} |
2200 |
{ key sortify } |
2201 |
if$ |
2202 |
} |
2203 |
{ author sort.format.names } |
2204 |
if$ |
2205 |
} |
2206 |
FUNCTION {author.editor.sort} |
2207 |
{ author empty$ |
2208 |
{ editor empty$ |
2209 |
{ key empty$ |
2210 |
{ "to sort, need author, editor, or key in " cite$ * warning$ |
2211 |
"" |
2212 |
} |
2213 |
{ key sortify } |
2214 |
if$ |
2215 |
} |
2216 |
{ editor sort.format.names } |
2217 |
if$ |
2218 |
} |
2219 |
{ author sort.format.names } |
2220 |
if$ |
2221 |
} |
2222 |
FUNCTION {editor.sort} |
2223 |
{ editor empty$ |
2224 |
{ key empty$ |
2225 |
{ "to sort, need editor or key in " cite$ * warning$ |
2226 |
"" |
2227 |
} |
2228 |
{ key sortify } |
2229 |
if$ |
2230 |
} |
2231 |
{ editor sort.format.names } |
2232 |
if$ |
2233 |
} |
2234 |
FUNCTION {presort} |
2235 |
{ calc.label |
2236 |
label sortify |
2237 |
" " |
2238 |
* |
2239 |
type$ "book" = |
2240 |
type$ "inbook" = |
2241 |
or |
2242 |
'author.editor.sort |
2243 |
{ type$ "proceedings" = |
2244 |
'editor.sort |
2245 |
'author.sort |
2246 |
if$ |
2247 |
} |
2248 |
if$ |
2249 |
#1 entry.max$ substring$ |
2250 |
'sort.label := |
2251 |
sort.label |
2252 |
* |
2253 |
" " |
2254 |
* |
2255 |
title field.or.null |
2256 |
sort.format.title |
2257 |
* |
2258 |
#1 entry.max$ substring$ |
2259 |
'sort.key$ := |
2260 |
} |
2261 |
|
2262 |
ITERATE {presort} |
2263 |
SORT |
2264 |
STRINGS { last.label next.extra } |
2265 |
INTEGERS { last.extra.num number.label } |
2266 |
FUNCTION {initialize.extra.label.stuff} |
2267 |
{ #0 int.to.chr$ 'last.label := |
2268 |
"" 'next.extra := |
2269 |
#0 'last.extra.num := |
2270 |
#0 'number.label := |
2271 |
} |
2272 |
FUNCTION {forward.pass} |
2273 |
{ last.label label = |
2274 |
{ last.extra.num #1 + 'last.extra.num := |
2275 |
last.extra.num int.to.chr$ 'extra.label := |
2276 |
} |
2277 |
{ "a" chr.to.int$ 'last.extra.num := |
2278 |
"" 'extra.label := |
2279 |
label 'last.label := |
2280 |
} |
2281 |
if$ |
2282 |
number.label #1 + 'number.label := |
2283 |
} |
2284 |
FUNCTION {reverse.pass} |
2285 |
{ next.extra "b" = |
2286 |
{ "a" 'extra.label := } |
2287 |
'skip$ |
2288 |
if$ |
2289 |
extra.label 'next.extra := |
2290 |
extra.label |
2291 |
duplicate$ empty$ |
2292 |
'skip$ |
2293 |
{ "{\natexlab{" swap$ * "}}" * } |
2294 |
if$ |
2295 |
'extra.label := |
2296 |
label extra.label * 'label := |
2297 |
} |
2298 |
EXECUTE {initialize.extra.label.stuff} |
2299 |
ITERATE {forward.pass} |
2300 |
REVERSE {reverse.pass} |
2301 |
FUNCTION {bib.sort.order} |
2302 |
{ sort.label |
2303 |
" " |
2304 |
* |
2305 |
year field.or.null sortify |
2306 |
* |
2307 |
" " |
2308 |
* |
2309 |
title field.or.null |
2310 |
sort.format.title |
2311 |
* |
2312 |
#1 entry.max$ substring$ |
2313 |
'sort.key$ := |
2314 |
} |
2315 |
ITERATE {bib.sort.order} |
2316 |
SORT |
2317 |
FUNCTION {begin.bib} |
2318 |
{ preamble$ empty$ |
2319 |
'skip$ |
2320 |
{ preamble$ write$ newline$ } |
2321 |
if$ |
2322 |
"\begin{thebibliography}{" number.label int.to.str$ * "}" * |
2323 |
write$ newline$ |
2324 |
"\expandafter\ifx\csname natexlab\endcsname\relax\def\natexlab#1{#1}\fi" |
2325 |
write$ newline$ |
2326 |
"\expandafter\ifx\csname bibnamefont\endcsname\relax" |
2327 |
write$ newline$ |
2328 |
" \def\bibnamefont#1{#1}\fi" |
2329 |
write$ newline$ |
2330 |
"\expandafter\ifx\csname bibfnamefont\endcsname\relax" |
2331 |
write$ newline$ |
2332 |
" \def\bibfnamefont#1{#1}\fi" |
2333 |
write$ newline$ |
2334 |
"\expandafter\ifx\csname citenamefont\endcsname\relax" |
2335 |
write$ newline$ |
2336 |
" \def\citenamefont#1{#1}\fi" |
2337 |
write$ newline$ |
2338 |
"\expandafter\ifx\csname url\endcsname\relax" |
2339 |
write$ newline$ |
2340 |
" \def\url#1{\texttt{#1}}\fi" |
2341 |
write$ newline$ |
2342 |
"\expandafter\ifx\csname urlprefix\endcsname\relax\def\urlprefix{URL }\fi" |
2343 |
write$ newline$ |
2344 |
"\providecommand{\bibinfo}[2]{#2}" |
2345 |
write$ newline$ |
2346 |
"\providecommand{\eprint}[2][]{\url{#2}}" |
2347 |
write$ newline$ |
2348 |
} |
2349 |
EXECUTE {begin.bib} |
2350 |
EXECUTE {init.state.consts} |
2351 |
ITERATE {call.type$} |
2352 |
FUNCTION {end.bib} |
2353 |
{ newline$ |
2354 |
"\end{thebibliography}" write$ newline$ |
2355 |
} |
2356 |
EXECUTE {end.bib} |
2357 |
%% End of customized bst file |
2358 |
%% |
2359 |
%% End of file `apsrmp.bst'. |