2 %% This is file `agu.bst',
3 %% generated with the docstrip utility.
5 %% The original source files were:
7 %% merlin.mbs (with options: `head,ay,nat,seq-key,nm-rev1,nmlm,x9,m1,lab,lab-it,keyxyr,blkyear,note-yr,thtit-a,trnum-it,vol-it,vnum-x,volp-com,pgsep-c,num-xser,pre-edn,edpar,bkedcap,edby,blk-com,pp,ed,abr,ednx,xedn,jabr,and-com,em-it,{}')
8 %% physjour.mbs (with options: `ay,nat,seq-key,nm-rev1,nmlm,x9,m1,lab,lab-it,keyxyr,blkyear,note-yr,thtit-a,trnum-it,vol-it,vnum-x,volp-com,pgsep-c,num-xser,pre-edn,edpar,bkedcap,edby,blk-com,pp,ed,abr,ednx,xedn,jabr,and-com,em-it,{}')
9 %% geojour.mbs (with options: `ay,nat,seq-key,nm-rev1,nmlm,x9,m1,lab,lab-it,keyxyr,blkyear,note-yr,thtit-a,trnum-it,vol-it,vnum-x,volp-com,pgsep-c,num-xser,pre-edn,edpar,bkedcap,edby,blk-com,pp,ed,abr,ednx,xedn,jabr,and-com,em-it,{}')
10 %% merlin.mbs (with options: `tail,ay,nat,seq-key,nm-rev1,nmlm,x9,m1,lab,lab-it,keyxyr,blkyear,note-yr,thtit-a,trnum-it,vol-it,vnum-x,volp-com,pgsep-c,num-xser,pre-edn,edpar,bkedcap,edby,blk-com,pp,ed,abr,ednx,xedn,jabr,and-com,em-it,{}')
11 %% ----------------------------------------
12 %% *** For journals of the American Geophysical Union ***
13 %% *** NOTE: this version limits number of authors in ref list to
14 %% *** maximum of 9; if more there, only First et al are listed
15 %% *** Use agufull.bst instead for complete list
17 %% *** Version 2.1d from 1999/05/20
18 %% *** Book editors done right as P. James (Ed.),
19 %% *** Missing italics with some authors fixed
21 %% *** Version 2.1c from 1999/02/11
22 %% *** This version does not crash older BibTeX installations with
23 %% *** more than 3000 wiz-functions
25 %% *** Version 2.1b from 1997/11/18
26 %% *** (page numbers over 9999 are broken with commas, as 12,345)
28 %% *** Version 2.1a from 1997/05/26
29 %% *** (contains improvements from copy editor comments,
30 %% *** notes added with first word lowercase (bug in 2.1 fixed)
31 %% *** and journal `number' never output
32 %% *** abbreviation for grl corrected)
35 %% Copyright 1994-1999 Patrick W Daly
36 % ===============================================================
38 % This bibliographic style (bst) file has been generated from one or
39 % more master bibliographic style (mbs) files, listed above.
41 % This generated file can be redistributed and/or modified under the terms
42 % of the LaTeX Project Public License Distributed from CTAN
43 % archives in directory macros/latex/base/lppl.txt; either
44 % version 1 of the License, or any later version.
45 % ===============================================================
46 % Name and version information of the main mbs file:
47 % \ProvidesFile{merlin.mbs}[1999/05/20 3.89 (PWD)]
48 % For use with BibTeX version 0.99a or later
49 %-------------------------------------------------------------------
50 % This bibliography style file is intended for texts in ENGLISH
51 % This is an author-year citation style bibliography. As such, it is
52 % non-standard LaTeX, and requires a special package file to function properly.
53 % Such a package is natbib.sty by Patrick W. Daly
54 % The form of the \bibitem entries is
55 % \bibitem[Jones et al.(1990)]{key}...
56 % \bibitem[Jones et al.(1990)Jones, Baker, and Smith]{key}...
57 % The essential feature is that the label (the part in brackets) consists
58 % of the author names, as they should appear in the citation, with the year
59 % in parentheses following. There must be no space before the opening
61 % With natbib v5.3, a full list of authors may also follow the year.
62 % In natbib.sty, it is possible to define the type of enclosures that is
63 % really wanted (brackets or parentheses), but in either case, there must
64 % be parentheses in the label.
65 % The \cite command functions as follows:
66 % \citet{key} ==>> Jones et al. (1990)
67 % \citet*{key} ==>> Jones, Baker, and Smith (1990)
68 % \citep{key} ==>> (Jones et al., 1990)
69 % \citep*{key} ==>> (Jones, Baker, and Smith, 1990)
70 % \citep[chap. 2]{key} ==>> (Jones et al., 1990, chap. 2)
71 % \citep[e.g.][]{key} ==>> (e.g. Jones et al., 1990)
72 % \citep[e.g.][p. 32]{key} ==>> (e.g. Jones et al., p. 32)
73 % \citeauthor{key} ==>> Jones et al.
74 % \citeauthor*{key} ==>> Jones, Baker, and Smith
75 % \citeyear{key} ==>> 1990
76 %---------------------------------------------------------------------
103 { label extra.label sort.label short.list }
105 INTEGERS { output.state before.all mid.sentence after.sentence after.block }
107 FUNCTION {init.state.consts}
110 #2 'after.sentence :=
116 FUNCTION {output.nonnull}
118 output.state mid.sentence =
120 { output.state after.block =
125 { output.state before.all =
127 { add.period$ " " * write$ }
131 mid.sentence 'output.state :=
144 FUNCTION {output.check}
147 { pop$ "empty " t * " in " * cite$ * warning$ }
159 { output.state before.all =
161 { after.block 'output.state := }
165 FUNCTION {new.sentence}
166 { output.state after.block =
168 { output.state before.all =
170 { after.sentence 'output.state := }
177 { " " * before.all 'output.state :=
180 FUNCTION {date.block}
203 FUNCTION {new.block.checkb}
212 FUNCTION {field.or.null}
222 { "{\it " swap$ * "\/}" * }
227 FUNCTION {cite.name.font}
230 FUNCTION {capitalize}
231 { "u" change.case$ "t" change.case$ }
233 FUNCTION {space.word}
234 { " " 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
245 FUNCTION {bbl.editors}
248 FUNCTION {bbl.editor}
254 FUNCTION {bbl.edition}
257 FUNCTION {bbl.volume}
263 FUNCTION {bbl.number}
278 FUNCTION {bbl.chapter}
281 FUNCTION {bbl.techrep}
284 FUNCTION {bbl.mthesis}
285 { "Master's thesis" }
287 FUNCTION {bbl.phdthesis}
314 %-------------------------------------------------------------------
316 % \ProvidesFile{physjour.mbs}[1999/02/24 2.0d (PWD)]
317 MACRO {aa}{"Astron. \& Astrophys."}
318 MACRO {aasup}{"Astron. \& Astrophys. Suppl. Ser."}
319 MACRO {aph} {"Acta Phys."}
320 MACRO {advp} {"Adv. Phys."}
321 MACRO {ajp} {"Amer. J. Phys."}
322 MACRO {ajm} {"Amer. J. Math."}
323 MACRO {amsci} {"Amer. Sci."}
324 MACRO {anofd} {"Ann. Fluid Dyn."}
325 MACRO {am} {"Ann. Math."}
326 MACRO {ap} {"Ann. Phys. (NY)"}
327 MACRO {adp} {"Ann. Phys. (Leipzig)"}
328 MACRO {ao} {"Appl. Opt."}
329 MACRO {apl} {"Appl. Phys. Lett."}
330 MACRO {app} {"Astroparticle Phys."}
331 MACRO {apj} {"Astrophys. J."}
332 MACRO {apjsup} {"Astrophys. J. Suppl. Ser."}
333 MACRO {baps} {"Bull. Amer. Phys. Soc."}
334 MACRO {cmp} {"Comm. Math. Phys."}
335 MACRO {cpam} {"Commun. Pure Appl. Math."}
336 MACRO {cppcf} {"Comm. Plasma Phys. \& Controlled Fusion"}
337 MACRO {cpc} {"Comp. Phys. Comm."}
338 MACRO {cqg} {"Class. Quant. Grav."}
339 MACRO {cra} {"C. R. Acad. Sci. A"}
340 MACRO {fed} {"Fusion Eng. \& Design"}
341 MACRO {ft} {"Fusion Tech."}
342 MACRO {grg} {"Gen. Relativ. Gravit."}
343 MACRO {ieeens} {"IEEE Trans. Nucl. Sci."}
344 MACRO {ieeeps} {"IEEE Trans. Plasma Sci."}
345 MACRO {ijimw} {"Interntl. J. Infrared \& Millimeter Waves"}
346 MACRO {ip} {"Infrared Phys."}
347 MACRO {irp} {"Infrared Phys."}
348 MACRO {jap} {"J. Appl. Phys."}
349 MACRO {jasa} {"J. Acoust. Soc. America"}
350 MACRO {jcp} {"J. Comp. Phys."}
351 MACRO {jetp} {"Sov. Phys.--JETP"}
352 MACRO {jfe} {"J. Fusion Energy"}
353 MACRO {jfm} {"J. Fluid Mech."}
354 MACRO {jmp} {"J. Math. Phys."}
355 MACRO {jne} {"J. Nucl. Energy"}
356 MACRO {jnec} {"J. Nucl. Energy, C: Plasma Phys., Accelerators, Thermonucl. Res."}
357 MACRO {jnm} {"J. Nucl. Mat."}
358 MACRO {jpc} {"J. Phys. Chem."}
359 MACRO {jpp} {"J. Plasma Phys."}
360 MACRO {jpsj} {"J. Phys. Soc. Japan"}
361 MACRO {jsi} {"J. Sci. Instrum."}
362 MACRO {jvst} {"J. Vac. Sci. \& Tech."}
363 MACRO {nat} {"Nature"}
364 MACRO {nature} {"Nature"}
365 MACRO {nedf} {"Nucl. Eng. \& Design/Fusion"}
366 MACRO {nf} {"Nucl. Fusion"}
367 MACRO {nim} {"Nucl. Inst. \& Meth."}
368 MACRO {nimpr} {"Nucl. Inst. \& Meth. in Phys. Res."}
369 MACRO {np} {"Nucl. Phys."}
370 MACRO {npb} {"Nucl. Phys. B"}
371 MACRO {nt/f} {"Nucl. Tech./Fusion"}
372 MACRO {npbpc} {"Nucl. Phys. B (Proc. Suppl.)"}
373 MACRO {inc} {"Nuovo Cimento"}
374 MACRO {nc} {"Nuovo Cimento"}
375 MACRO {pf} {"Phys. Fluids"}
376 MACRO {pfa} {"Phys. Fluids A: Fluid Dyn."}
377 MACRO {pfb} {"Phys. Fluids B: Plasma Phys."}
378 MACRO {pl} {"Phys. Lett."}
379 MACRO {pla} {"Phys. Lett. A"}
380 MACRO {plb} {"Phys. Lett. B"}
381 MACRO {prep} {"Phys. Rep."}
382 MACRO {pnas} {"Proc. Nat. Acad. Sci. USA"}
383 MACRO {pp} {"Phys. Plasmas"}
384 MACRO {ppcf} {"Plasma Phys. \& Controlled Fusion"}
385 MACRO {phitrsl} {"Philos. Trans. Roy. Soc. London"}
386 MACRO {prl} {"Phys. Rev. Lett."}
387 MACRO {pr} {"Phys. Rev."}
388 MACRO {physrev} {"Phys. Rev."}
389 MACRO {pra} {"Phys. Rev. A"}
390 MACRO {prb} {"Phys. Rev. B"}
391 MACRO {prc} {"Phys. Rev. C"}
392 MACRO {prd} {"Phys. Rev. D"}
393 MACRO {pre} {"Phys. Rev. E"}
394 MACRO {ps} {"Phys. Scripta"}
395 MACRO {procrsl} {"Proc. Roy. Soc. London"}
396 MACRO {rmp} {"Rev. Mod. Phys."}
397 MACRO {rsi} {"Rev. Sci. Inst."}
398 MACRO {science} {"Science"}
399 MACRO {sciam} {"Sci. Am."}
400 MACRO {sam} {"Stud. Appl. Math."}
401 MACRO {sjpp} {"Sov. J. Plasma Phys."}
402 MACRO {spd} {"Sov. Phys.--Doklady"}
403 MACRO {sptp} {"Sov. Phys.--Tech. Phys."}
404 MACRO {spu} {"Sov. Phys.--Uspeki"}
405 % End module: physjour.mbs
406 %-------------------------------------------------------------------
408 % \ProvidesFile{geojour.mbs}[1999/02/24 2.0e (PWD)]
409 MACRO {aisr} {"Adv. Space Res."}
410 MACRO {ag} {"Ann. Geophys."}
411 MACRO {anigeo} {"Ann. Geofis."}
412 MACRO {angl} {"Ann. Glaciol."}
413 MACRO {andmet} {"Ann. d. Meteor."}
414 MACRO {andgeo} {"Ann. d. Geophys."}
415 MACRO {andphy} {"Ann. d. Phys."}
416 MACRO {afmgb} {"Arch. Meteor. Geophys. Bioklimatol."}
417 MACRO {atph} {"Atm\'osphera"}
418 MACRO {aao} {"Atmos.-Ocean"}
419 MACRO {ass}{"Astrophys. Space Sci."}
420 MACRO {atenv} {"Atmos. Environ."}
421 MACRO {aujag} {"Aust. J. Agric. Res."}
422 MACRO {aumet} {"Aust. Meteor. Mag."}
423 MACRO {blmet} {"Bound.-Layer Meteor."}
424 MACRO {bams} {"Bull. Amer. Meteor. Soc."}
425 MACRO {cch} {"Clim. Change"}
426 MACRO {cdyn} {"Climate Dyn."}
427 MACRO {cbul} {"Climatol. Bull."}
428 MACRO {cap} {"Contrib. Atmos. Phys."}
429 MACRO {dsr} {"Deep-Sea Res."}
430 MACRO {dhz} {"Dtsch. Hydrogr. Z."}
431 MACRO {dao} {"Dyn. Atmos. Oceans"}
432 MACRO {eco} {"Ecology"}
433 MACRO {empl}{"Earth, Moon and Planets"}
434 MACRO {envres} {"Environ. Res."}
435 MACRO {envst} {"Environ. Sci. Technol."}
436 MACRO {ecms} {"Estuarine Coastal Mar. Sci."}
437 MACRO {expa}{"Exper. Astron."}
438 MACRO {geoint} {"Geofis. Int."}
439 MACRO {geopub} {"Geofys. Publ."}
440 MACRO {geogeo} {"Geol. Geofiz."}
441 MACRO {gafd} {"Geophys. Astrophys. Fluid Dyn."}
442 MACRO {gfd} {"Geophys. Fluid Dyn."}
443 MACRO {geomag} {"Geophys. Mag."}
444 MACRO {georl} {"Geophys. Res. Lett."}
445 MACRO {grl} {"Geophys. Res. Lett."}
446 MACRO {ga} {"Geophysica"}
447 MACRO {gs} {"Geophysics"}
448 MACRO {ieeetap} {"IEEE Trans. Antennas Propag."}
449 MACRO {ijawp} {"Int. J. Air Water Pollut."}
450 MACRO {ijc} {"Int. J. Climatol."}
451 MACRO {ijrs} {"Int. J. Remote Sensing"}
452 MACRO {jam} {"J. Appl. Meteor."}
453 MACRO {jaot} {"J. Atmos. Ocean. Technol."}
454 MACRO {jatp} {"J. Atmos. Terr. Phys."}
455 MACRO {jce} {"J. Climate"}
456 MACRO {jcam} {"J. Climate Appl. Meteor."}
457 MACRO {jcm} {"J. Climate Meteor."}
458 MACRO {jcy} {"J. Climatol."}
459 MACRO {jgr} {"J. Geophys. Res."}
460 MACRO {jga} {"J. Glaciol."}
461 MACRO {jh} {"J. Hydrol."}
462 MACRO {jmr} {"J. Mar. Res."}
463 MACRO {jmrj} {"J. Meteor. Res. Japan"}
464 MACRO {jm} {"J. Meteor."}
465 MACRO {jpo} {"J. Phys. Oceanogr."}
466 MACRO {jra} {"J. Rech. Atmos."}
467 MACRO {jaes} {"J. Aeronaut. Sci."}
468 MACRO {japca} {"J. Air Pollut. Control Assoc."}
469 MACRO {jas} {"J. Atmos. Sci."}
470 MACRO {jmts} {"J. Mar. Technol. Soc."}
471 MACRO {jmsj} {"J. Meteor. Soc. Japan"}
472 MACRO {josj} {"J. Oceanogr. Soc. Japan"}
473 MACRO {jwm} {"J. Wea. Mod."}
474 MACRO {lao} {"Limnol. Oceanogr."}
475 MACRO {mwl} {"Mar. Wea. Log"}
476 MACRO {mau} {"Mausam"}
477 MACRO {meteor} {"``Meteor'' Forschungsergeb."}
478 MACRO {map} {"Met. Atmos. Phys."}
479 MACRO {metmag} {"Meteor. Mag."}
480 MACRO {metmon} {"Meteor. Monogr."}
481 MACRO {metrun} {"Meteor. Rundsch."}
482 MACRO {metzeit} {"Meteor. Z."}
483 MACRO {metgid} {"Meteor. Gidrol."}
484 MACRO {mwr} {"Mon. Wea. Rev."}
485 MACRO {nwd} {"Natl. Wea. Dig."}
486 MACRO {nzjmfr} {"N. Z. J. Mar. Freshwater Res."}
487 MACRO {npg} {"Nonlin. Proc. Geophys."}
488 MACRO {om} {"Oceanogr. Meteor."}
489 MACRO {ocac} {"Oceanol. Acta"}
490 MACRO {oceanus} {"Oceanus"}
491 MACRO {paleoc} {"Paleoceanography"}
492 MACRO {pce} {"Physics and Chemistry of the Earth"}
493 MACRO {pmg} {"Pap. Meteor. Geophys."}
494 MACRO {ppom} {"Pap. Phys. Oceanogr. Meteor."}
495 MACRO {physzeit} {"Phys. Z."}
496 MACRO {pps} {"Planet. Space Sci."}
497 MACRO {pss} {"Planet. Space Sci."}
498 MACRO {pag} {"Pure Appl. Geophys."}
499 MACRO {qjrms} {"Quart. J. Roy. Meteor. Soc."}
500 MACRO {quatres} {"Quat. Res."}
501 MACRO {rsci} {"Radio Sci."}
502 MACRO {rse} {"Remote Sens. Environ."}
503 MACRO {rgeo} {"Rev. Geophys."}
504 MACRO {rgsp} {"Rev. Geophys. Space Phys."}
505 MACRO {rdgeo} {"Rev. Geofis."}
506 MACRO {revmeta} {"Rev. Meteor."}
507 MACRO {sgp}{"Surveys in Geophys."}
508 MACRO {sp} {"Solar Phys."}
509 MACRO {ssr} {"Space Sci. Rev."}
510 MACRO {tellus} {"Tellus"}
511 MACRO {tac} {"Theor. Appl. Climatol."}
512 MACRO {tagu} {"Trans. Am. Geophys. Union (EOS)"}
513 MACRO {wrr} {"Water Resour. Res."}
514 MACRO {weather} {"Weather"}
515 MACRO {wafc} {"Wea. Forecasting"}
516 MACRO {ww} {"Weatherwise"}
517 MACRO {wmob} {"WMO Bull."}
518 MACRO {zeitmet} {"Z. Meteor."}
519 % End module: geojour.mbs
520 %% Copyright 1994-1999 Patrick W Daly
521 MACRO {acmcs} {"ACM Comput. Surv."}
523 MACRO {acta} {"Acta Inf."}
525 MACRO {cacm} {"Commun. ACM"}
527 MACRO {ibmjrd} {"IBM J. Res. Dev."}
529 MACRO {ibmsj} {"IBM Syst.~J."}
531 MACRO {ieeese} {"IEEE Trans. Softw. Eng."}
533 MACRO {ieeetc} {"IEEE Trans. Comput."}
536 {"IEEE Trans. Comput.-Aided Design Integrated Circuits"}
538 MACRO {ipl} {"Inf. Process. Lett."}
540 MACRO {jacm} {"J.~ACM"}
542 MACRO {jcss} {"J.~Comput. Syst. Sci."}
544 MACRO {scp} {"Sci. Comput. Programming"}
546 MACRO {sicomp} {"SIAM J. Comput."}
548 MACRO {tocs} {"ACM Trans. Comput. Syst."}
550 MACRO {tods} {"ACM Trans. Database Syst."}
552 MACRO {tog} {"ACM Trans. Gr."}
554 MACRO {toms} {"ACM Trans. Math. Softw."}
556 MACRO {toois} {"ACM Trans. Office Inf. Syst."}
558 MACRO {toplas} {"ACM Trans. Prog. Lang. Syst."}
560 MACRO {tcs} {"Theoretical Comput. Sci."}
563 INTEGERS { nameptr namesleft numnames }
565 FUNCTION {format.names}
569 s num.names$ 'numnames :=
570 numnames 'namesleft :=
573 { s nameptr "{f.~}{vv~}{ll}{, jj}" format.name$ }
574 { s nameptr "{vv~}{ll}{, f.}{, jj}" format.name$ }
591 s nameptr "{ll}" format.name$ duplicate$ "others" =
608 nameptr #1 + 'nameptr :=
609 namesleft #1 - 'namesleft :=
614 FUNCTION {format.names.ed}
618 s num.names$ 'numnames :=
619 numnames 'namesleft :=
622 "{f.~}{vv~}{ll}{, jj}"
634 s nameptr "{ll}" format.name$ duplicate$ "others" =
652 nameptr #1 + 'nameptr :=
653 namesleft #1 - 'namesleft :=
658 FUNCTION {format.key}
660 { key field.or.null }
665 FUNCTION {format.authors}
668 { author format.names }
672 FUNCTION {format.editors}
675 { editor format.names
677 editor num.names$ #1 >
687 FUNCTION {format.in.editors}
690 { editor format.names.ed
695 FUNCTION {format.note}
699 { note #1 #1 substring$
702 { output.state mid.sentence =
709 note #2 global.max$ substring$ *
714 FUNCTION {format.title}
717 { title "t" change.case$
722 FUNCTION {format.full.names}
726 s num.names$ 'numnames :=
727 numnames 'namesleft :=
730 "{vv~}{ll}" format.name$
745 s nameptr "{ll}" format.name$ duplicate$ "others" =
768 nameptr #1 + 'nameptr :=
769 namesleft #1 - 'namesleft :=
778 FUNCTION {author.editor.key.full}
782 { cite$ #1 #3 substring$ }
786 { editor format.full.names }
789 { author format.full.names }
793 FUNCTION {author.key.full}
796 { cite$ #1 #3 substring$ }
800 { author format.full.names }
804 FUNCTION {editor.key.full}
807 { cite$ #1 #3 substring$ }
811 { editor format.full.names }
815 FUNCTION {make.full.names}
819 'author.editor.key.full
820 { type$ "proceedings" =
828 FUNCTION {output.bibitem}
832 ")" make.full.names duplicate$ short.list =
841 before.all 'output.state :=
846 swap$ duplicate$ "1" =
847 swap$ duplicate$ "2" =
848 swap$ duplicate$ "3" =
849 swap$ duplicate$ "4" =
850 swap$ duplicate$ "5" =
851 swap$ duplicate$ "6" =
852 swap$ duplicate$ "7" =
853 swap$ duplicate$ "8" =
854 swap$ "9" = or or or or or or or or or
856 FUNCTION {n.separate}
861 { t #-1 #1 substring$ if.digit
862 { numnames #1 + 'numnames := }
865 t #-1 #1 substring$ swap$ *
866 t #-2 global.max$ substring$ 't :=
868 { duplicate$ #1 #2 substring$ swap$
869 #3 global.max$ substring$
883 { t #1 #1 substring$ "-" =
884 { t #1 #2 substring$ "--" = not
886 t #2 global.max$ substring$ 't :=
888 { { t #1 #1 substring$ "-" = }
890 t #2 global.max$ substring$ 't :=
896 { t #1 #1 substring$ *
897 t #2 global.max$ substring$ 't :=
908 FUNCTION {format.date}
909 { year duplicate$ empty$
916 FUNCTION {format.btitle}
920 FUNCTION {tie.or.space.connect}
921 { duplicate$ text.length$ #3 <
928 FUNCTION {either.or.check}
931 { "can't use both " swap$ * " fields in " * cite$ * warning$ }
935 FUNCTION {format.bvolume}
938 { bbl.volume volume tie.or.space.connect
941 { bbl.of space.word * series emphasize * }
943 "volume and number" number either.or.check
948 FUNCTION {format.number.series}
951 { series field.or.null }
954 { output.state mid.sentence =
956 { bbl.number capitalize }
958 number tie.or.space.connect
959 bbl.in space.word * series *
970 FUNCTION {format.edition}
973 { output.state mid.sentence =
974 { edition "l" change.case$ " " * bbl.edition * }
975 { edition "t" change.case$ " " * bbl.edition * }
981 INTEGERS { multiresult }
983 FUNCTION {multi.page.check}
992 swap$ duplicate$ "," =
995 { #1 'multiresult := }
996 { t #2 global.max$ substring$ 't := }
1003 FUNCTION {format.pages}
1006 { pages multi.page.check
1007 { bbl.pages pages n.dashify tie.or.space.connect }
1008 { bbl.page pages tie.or.space.connect }
1014 FUNCTION {format.journal.pages}
1018 { pop$ format.pages }
1028 FUNCTION {format.vol.num.pages}
1029 { volume field.or.null
1031 format.journal.pages
1034 FUNCTION {format.chapter.pages}
1039 { type "l" change.case$ }
1041 chapter tie.or.space.connect
1044 { ", " * format.pages * }
1050 FUNCTION {format.in.ed.booktitle}
1054 { word.in booktitle emphasize * }
1055 { word.in booktitle emphasize *
1066 FUNCTION {format.thesis.type}
1070 type "t" change.case$
1075 FUNCTION {format.tr.number}
1081 { "t" change.case$ }
1082 { number tie.or.space.connect }
1086 FUNCTION {format.article.crossref}
1089 " \cite{" * crossref * "}" *
1092 FUNCTION {format.book.crossref}
1094 { "empty volume in " cite$ * "'s crossref of " * crossref * warning$
1097 { bbl.volume volume tie.or.space.connect
1101 " \cite{" * crossref * "}" *
1104 FUNCTION {format.incoll.inproc.crossref}
1107 " \cite{" * crossref * "}" *
1110 FUNCTION {format.org.or.pub}
1113 address empty$ t empty$ and
1125 { ", " * address * }
1133 FUNCTION {format.publisher.address}
1135 { "empty publisher in " cite$ * warning$
1143 FUNCTION {format.organization.address}
1144 { organization empty$
1153 format.authors "author" output.check
1154 author format.key output
1155 format.title "title" output.check
1159 "journal" output.check
1160 format.vol.num.pages output
1161 format.date "year" output.check
1163 { format.article.crossref output.nonnull
1174 { format.editors "author and editor" output.check
1175 editor format.key output
1177 { format.authors output.nonnull
1179 { "author and editor" editor either.or.check }
1184 format.btitle "title" output.check
1186 { format.bvolume output
1187 format.number.series output
1188 format.edition output
1189 format.publisher.address output
1192 format.book.crossref output.nonnull
1195 format.date "year" output.check
1202 format.authors output
1203 author format.key output
1204 format.title "title" output.check
1207 format.date "year" output.check
1215 { format.editors "author and editor" output.check
1216 editor format.key output
1218 { format.authors output.nonnull
1220 { "author and editor" editor either.or.check }
1225 format.btitle "title" output.check
1228 format.bvolume output
1229 format.chapter.pages "chapter and pages" output.check
1230 format.number.series output
1231 format.edition output
1232 format.publisher.address output
1235 format.chapter.pages "chapter and pages" output.check
1236 format.book.crossref output.nonnull
1239 format.date "year" output.check
1244 FUNCTION {incollection}
1246 format.authors "author" output.check
1247 author format.key output
1248 format.title "title" output.check
1250 { format.in.ed.booktitle "booktitle" output.check
1251 format.bvolume output
1252 format.number.series output
1253 format.edition output
1254 format.chapter.pages output
1255 format.publisher.address output
1256 format.date "year" output.check
1258 { format.incoll.inproc.crossref output.nonnull
1259 format.chapter.pages output
1266 FUNCTION {inproceedings}
1268 format.authors "author" output.check
1269 author format.key output
1270 format.title "title" output.check
1272 { format.in.ed.booktitle "booktitle" output.check
1273 format.bvolume output
1274 format.number.series output
1277 { format.organization.address output }
1278 { organization output
1279 format.publisher.address output
1282 format.date "year" output.check
1284 { format.incoll.inproc.crossref output.nonnull
1292 FUNCTION {conference} { inproceedings }
1296 format.authors output
1297 author format.key output
1298 format.btitle "title" output.check
1301 format.edition output
1302 format.date "year" output.check
1307 FUNCTION {mastersthesis}
1309 format.authors "author" output.check
1310 author format.key output
1311 format.title "title" output.check
1312 bbl.mthesis format.thesis.type output.nonnull
1313 school "school" output.check
1315 format.date "year" output.check
1322 format.authors output
1323 author format.key output
1326 format.date "year" output.check
1331 FUNCTION {phdthesis}
1333 format.authors "author" output.check
1334 author format.key output
1335 format.title "title" output.check
1336 bbl.phdthesis format.thesis.type output.nonnull
1337 school "school" output.check
1339 format.date "year" output.check
1344 FUNCTION {proceedings}
1346 format.editors output
1347 editor format.key output
1348 format.btitle "title" output.check
1349 format.bvolume output
1350 format.number.series output
1352 { format.organization.address output }
1353 { organization output
1354 format.publisher.address output
1357 format.date "year" output.check
1362 FUNCTION {techreport}
1364 format.authors "author" output.check
1365 author format.key output
1366 format.title "title" output.check
1367 format.tr.number emphasize output.nonnull
1368 institution "institution" output.check
1370 format.date "year" output.check
1375 FUNCTION {unpublished}
1377 format.authors "author" output.check
1378 author format.key output
1379 format.title "title" output.check
1380 format.date "year" output.check
1381 format.note "note" output.check
1385 FUNCTION {default.type} { misc }
1396 FUNCTION {chop.word}
1399 s #1 len substring$ =
1400 { s len #1 + global.max$ substring$ }
1405 FUNCTION {format.lab.names}
1408 s #1 "{vv~}{ll}" format.name$
1409 s num.names$ duplicate$
1418 { s #2 "{ff }{vv }{ll}{ jj}" format.name$ "others" =
1424 { bbl.and space.word * s #2 "{vv~}{ll}" format.name$
1437 FUNCTION {author.key.label}
1440 { cite$ #1 #3 substring$ }
1444 { author format.lab.names }
1448 FUNCTION {author.editor.key.label}
1452 { cite$ #1 #3 substring$ }
1456 { editor format.lab.names }
1459 { author format.lab.names }
1463 FUNCTION {editor.key.label}
1466 { cite$ #1 #3 substring$ }
1470 { editor format.lab.names }
1474 FUNCTION {calc.short.authors}
1478 'author.editor.key.label
1479 { type$ "proceedings" =
1488 FUNCTION {calc.label}
1489 { calc.short.authors
1493 year duplicate$ empty$
1494 short.list key field.or.null = or
1502 FUNCTION {sort.format.names}
1506 s num.names$ 'numnames :=
1507 numnames 'namesleft :=
1510 "{vv{ } }{ll{ }}{ f{ }}{ jj{ }}"
1523 namesleft #1 = t "others" = and
1525 { numnames #2 > nameptr #2 = and
1526 { "zz" * year field.or.null * " " * }
1535 nameptr #1 + 'nameptr :=
1536 namesleft #1 - 'namesleft :=
1541 FUNCTION {sort.format.title}
1545 "The " #4 t chop.word
1549 #1 global.max$ substring$
1552 FUNCTION {author.sort}
1555 { "to sort, need author or key in " cite$ * warning$
1561 { author sort.format.names }
1565 FUNCTION {author.editor.sort}
1569 { "to sort, need author, editor, or key in " cite$ * warning$
1575 { editor sort.format.names }
1578 { author sort.format.names }
1582 FUNCTION {editor.sort}
1585 { "to sort, need editor or key in " cite$ * warning$
1591 { editor sort.format.names }
1604 { type$ "proceedings" =
1610 #1 entry.max$ substring$
1618 #1 entry.max$ substring$
1626 STRINGS { last.label next.extra }
1628 INTEGERS { last.extra.num number.label }
1630 FUNCTION {initialize.extra.label.stuff}
1631 { #0 int.to.chr$ 'last.label :=
1633 #0 'last.extra.num :=
1637 FUNCTION {forward.pass}
1638 { last.label label =
1639 { last.extra.num #1 + 'last.extra.num :=
1640 last.extra.num int.to.chr$ 'extra.label :=
1642 { "a" chr.to.int$ 'last.extra.num :=
1644 label 'last.label :=
1647 number.label #1 + 'number.label :=
1650 FUNCTION {reverse.pass}
1652 { "a" 'extra.label := }
1655 extra.label 'next.extra :=
1659 { "{\natexlab{" swap$ * "}}" * }
1662 label extra.label * 'label :=
1665 EXECUTE {initialize.extra.label.stuff}
1667 ITERATE {forward.pass}
1669 REVERSE {reverse.pass}
1671 FUNCTION {bib.sort.order}
1675 year field.or.null sortify
1681 #1 entry.max$ substring$
1685 ITERATE {bib.sort.order}
1689 FUNCTION {begin.bib}
1692 { preamble$ write$ newline$ }
1694 "\begin{thebibliography}{" number.label int.to.str$ * "}" *
1696 "\expandafter\ifx\csname natexlab\endcsname\relax\def\natexlab#1{#1}\fi"
1702 EXECUTE {init.state.consts}
1704 ITERATE {call.type$}
1708 "\end{thebibliography}" write$ newline$
1712 %% End of customized bst file
1714 %% End of file `agu.bst'.