%%

%% This is file `agufull08.bst',

%% generated with the docstrip utility.

%%

%% The original source files were:

%%

%% merlin.mbs (with options: `head,ay,nat,seq-labc,nm-rev1,jnrlst,lab,lab-it,keyxyr,blkyear,dt-beg,yr-par,xmth,note-yr,thtit-a,trnum-it,vol-it,volp-com,pgsep-c,num-xser,ser-vol,ser-ed,pg-bk,pg-pre,pre-edn,agu-doi,doi,edpar,bkedcap,edby,blk-com,pp,ed,abr,ednx,xedn,jabr,and-com,em-it,nfss,{}')

%% physjour.mbs (with options: `ay,nat,seq-labc,nm-rev1,jnrlst,lab,lab-it,keyxyr,blkyear,dt-beg,yr-par,xmth,note-yr,thtit-a,trnum-it,vol-it,volp-com,pgsep-c,num-xser,ser-vol,ser-ed,pg-bk,pg-pre,pre-edn,agu-doi,doi,edpar,bkedcap,edby,blk-com,pp,ed,abr,ednx,xedn,jabr,and-com,em-it,nfss,{}')

%% geojour.mbs (with options: `ay,nat,seq-labc,nm-rev1,jnrlst,lab,lab-it,keyxyr,blkyear,dt-beg,yr-par,xmth,note-yr,thtit-a,trnum-it,vol-it,volp-com,pgsep-c,num-xser,ser-vol,ser-ed,pg-bk,pg-pre,pre-edn,agu-doi,doi,edpar,bkedcap,edby,blk-com,pp,ed,abr,ednx,xedn,jabr,and-com,em-it,nfss,{}')

%% photjour.mbs (with options: `ay,nat,seq-labc,nm-rev1,jnrlst,lab,lab-it,keyxyr,blkyear,dt-beg,yr-par,xmth,note-yr,thtit-a,trnum-it,vol-it,volp-com,pgsep-c,num-xser,ser-vol,ser-ed,pg-bk,pg-pre,pre-edn,agu-doi,doi,edpar,bkedcap,edby,blk-com,pp,ed,abr,ednx,xedn,jabr,and-com,em-it,nfss,{}')

%% merlin.mbs (with options: `tail,ay,nat,seq-labc,nm-rev1,jnrlst,lab,lab-it,keyxyr,blkyear,dt-beg,yr-par,xmth,note-yr,thtit-a,trnum-it,vol-it,volp-com,pgsep-c,num-xser,ser-vol,ser-ed,pg-bk,pg-pre,pre-edn,agu-doi,doi,edpar,bkedcap,edby,blk-com,pp,ed,abr,ednx,xedn,jabr,and-com,em-it,nfss,{}')

%% ----------------------------------------

%% *** For journals of the American Geophysical Union ***

%% *** NOTE: this version does not limit the number of authors in ref list.

%% *** Use agu08.bst to limit authors to maximum 9.

%% ***

%% ----------------------------------------

%% *** Version 3.1 from 2008/08/27

%% *** Multiple authors of same first author and year now in order of citation

%% *** and other minor fixes

%% *** Renamed to agu08.bst and agufull08.bst

%% ***

%% *** Version 3.0 from 2004/02/06

%% *** Changed date format for AGU journals

%% *** The date now appears in parentheses after authors

%% ***

%% *** Version 2.2 from 2003/06/26

%% *** (with bug fix from 2003/08/19)

%% *** Includes new fields eid and doi

%% *** The eid is what the AGU calls "citation number"

%% *** and doi is the DOI number; both of these are

%% *** used as substitution for page number

%% *** The issue number is now also included as

%% *** 84(3) for vol. 84, nr. 3

%% ***

%% *** Version 2.1d from 1999/05/20

%% *** Book editors done right as P. James (Ed.),

%% *** Missing italics with some authors fixed

%% ***

%% *** Version 2.1c from 1999/02/11

%% *** This version does not crash older BibTeX installations with

%% *** more than 3000 wiz-functions

%% ***

%% *** Version 2.1b from 1997/11/18

%% *** (page numbers over 9999 are broken with commas, as 12,345)

%% ***

%% *** Version 2.1a from 1997/05/26

%% *** (contains improvements from copy editor comments,

%% *** notes added with first word lowercase (bug in 2.1 fixed)

%% *** and journal `number' never output

%% *** abbreviation for grl corrected)

%% ***

%%

%% Copyright 1994-2008 Patrick W Daly

% ===============================================================

% IMPORTANT NOTICE:

% This bibliographic style (bst) file has been generated from one or

% more master bibliographic style (mbs) files, listed above.

%

% This generated file can be redistributed and/or modified under the terms

% of the LaTeX Project Public License Distributed from CTAN

% archives in directory macros/latex/base/lppl.txt; either

% version 1 of the License, or any later version.

% ===============================================================

% Name and version information of the main mbs file:

% \ProvidesFile{merlin.mbs}[2008/08/27 4.30 (PWD, AO, DPC)]

% For use with BibTeX version 0.99a or later

%-------------------------------------------------------------------

% This bibliography style file is intended for texts in ENGLISH

% This is an author-year citation style bibliography. As such, it is

% non-standard LaTeX, and requires a special package file to function properly.

% Such a package is natbib.sty by Patrick W. Daly

% The form of the \bibitem entries is

% \bibitem[Jones et al.(1990)]{key}...

% \bibitem[Jones et al.(1990)Jones, Baker, and Smith]{key}...

% The essential feature is that the label (the part in brackets) consists

% of the author names, as they should appear in the citation, with the year

% in parentheses following. There must be no space before the opening

% parenthesis!

% With natbib v5.3, a full list of authors may also follow the year.

% In natbib.sty, it is possible to define the type of enclosures that is

% really wanted (brackets or parentheses), but in either case, there must

% be parentheses in the label.

% The \cite command functions as follows:

% \citet{key} ==>> Jones et al. (1990)

% \citet*{key} ==>> Jones, Baker, and Smith (1990)

% \citep{key} ==>> (Jones et al., 1990)

% \citep*{key} ==>> (Jones, Baker, and Smith, 1990)

% \citep[chap. 2]{key} ==>> (Jones et al., 1990, chap. 2)

% \citep[e.g.][]{key} ==>> (e.g. Jones et al., 1990)

% \citep[e.g.][p. 32]{key} ==>> (e.g. Jones et al., 1990, p. 32)

% \citeauthor{key} ==>> Jones et al.

% \citeauthor*{key} ==>> Jones, Baker, and Smith

% \citeyear{key} ==>> 1990

%---------------------------------------------------------------------

ENTRY

{ address

author

booktitle

chapter

doi

edition

editor

eid

howpublished

institution

journal

key

month

note

number

organization

pages

publisher

school

series

title

type

volume

year

}

{}

{ label extra.label sort.label short.list }

INTEGERS { output.state before.all mid.sentence after.sentence after.block }

FUNCTION {init.state.consts}

{ #0 'before.all :=

#1 'mid.sentence :=

#2 'after.sentence :=

#3 'after.block :=

}

STRINGS { s t}

FUNCTION {output.nonnull}

{ 's :=

output.state mid.sentence =

{ ", " * write$ }

{ output.state after.block =

{ add.period$ write$

newline$

"\newblock " write$

}

{ output.state before.all =

'write$

{ add.period$ " " * write$ }

if$

}

if$

mid.sentence 'output.state :=

}

if$

s

}

FUNCTION {output}

{ duplicate$ empty$

'pop$

'output.nonnull

if$

}

FUNCTION {output.check}

{ 't :=

duplicate$ empty$

{ pop$ "empty " t * " in " * cite$ * warning$ }

'output.nonnull

if$

}

FUNCTION {fin.entry}

{ add.period$

write$

newline$

}

FUNCTION {new.block}

{ output.state before.all =

'skip$

{ after.block 'output.state := }

if$

}

FUNCTION {new.sentence}

{ output.state after.block =

'skip$

{ output.state before.all =

'skip$

{ after.sentence 'output.state := }

if$

}

if$

}

FUNCTION {add.blank}

{ " " * before.all 'output.state :=

}

FUNCTION {date.block}

{

skip$

}

FUNCTION {bolden}

{ duplicate$ empty$

{ pop$ "" }

{ "{\bf " swap$ * "}" * }

if$

}

FUNCTION {not}

{ { #0 }

{ #1 }

if$

}

FUNCTION {and}

{ 'skip$

{ pop$ #0 }

if$

}

FUNCTION {or}

{ { pop$ #1 }

'skip$

if$

}

FUNCTION {new.block.checkb}

{ empty$

swap$ empty$

and

'skip$

'new.block

if$

}

FUNCTION {field.or.null}

{ duplicate$ empty$

{ pop$ "" }

'skip$

if$

}

FUNCTION {emphasize}

{ duplicate$ empty$

{ pop$ "" }

{ "\textit{" swap$ * "}" * }

if$

}

FUNCTION {cite.name.font}

{ } % emphasize removed here, so now a blank function

FUNCTION {tie.or.space.prefix}

{ duplicate$ text.length$ #3 <

{ "~" }

{ " " }

if$

swap$

}

FUNCTION {capitalize}

{ "u" change.case$ "t" change.case$ }

FUNCTION {space.word}

{ " " swap$ * " " * }

% Here are the language-specific definitions for explicit words.

% Each function has a name bbl.xxx where xxx is the English word.

% The language selected here is ENGLISH

FUNCTION {bbl.and}

{ "and"}

FUNCTION {bbl.etal}

{ "et~al." }

FUNCTION {bbl.editors}

{ "eds." }

FUNCTION {bbl.editor}

{ "ed." }

FUNCTION {bbl.edby}

{ "edited by" }

FUNCTION {bbl.edition}

{ "ed." }

FUNCTION {bbl.volume}

{ "vol." }

FUNCTION {bbl.of}

{ "of" }

FUNCTION {bbl.number}

{ "no." }

FUNCTION {bbl.nr}

{ "no." }

FUNCTION {bbl.in}

{ "in" }

FUNCTION {bbl.pages}

{ "pp." }

FUNCTION {bbl.page}

{ "p." }

FUNCTION {bbl.chapter}

{ "chap." }

FUNCTION {bbl.techrep}

{ "Tech. Rep." }

FUNCTION {bbl.mthesis}

{ "Master's thesis" }

FUNCTION {bbl.phdthesis}

{ "Ph.D. thesis" }

MACRO {jan} {"Jan."}

MACRO {feb} {"Feb."}

MACRO {mar} {"Mar."}

MACRO {apr} {"Apr."}

MACRO {may} {"May"}

MACRO {jun} {"Jun."}

MACRO {jul} {"Jul."}

MACRO {aug} {"Aug."}

MACRO {sep} {"Sep."}

MACRO {oct} {"Oct."}

MACRO {nov} {"Nov."}

MACRO {dec} {"Dec."}

%-------------------------------------------------------------------

% Begin module:

% \ProvidesFile{physjour.mbs}[2002/01/14 2.2 (PWD)]

MACRO {aa}{"Astron. \& Astrophys."}

MACRO {aasup}{"Astron. \& Astrophys. Suppl. Ser."}

MACRO {aj} {"Astron. J."}

MACRO {aph} {"Acta Phys."}

MACRO {advp} {"Adv. Phys."}

MACRO {ajp} {"Amer. J. Phys."}

MACRO {ajm} {"Amer. J. Math."}

MACRO {amsci} {"Amer. Sci."}

MACRO {anofd} {"Ann. Fluid Dyn."}

MACRO {am} {"Ann. Math."}

MACRO {ap} {"Ann. Phys. (NY)"}

MACRO {adp} {"Ann. Phys. (Leipzig)"}

MACRO {ao} {"Appl. Opt."}

MACRO {apl} {"Appl. Phys. Lett."}

MACRO {app} {"Astroparticle Phys."}

MACRO {apj} {"Astrophys. J."}

MACRO {apjsup} {"Astrophys. J. Suppl."}

MACRO {apss} {"Astrophys. Space Sci."}

MACRO {araa} {"Ann. Rev. Astron. Astrophys."}

MACRO {baas} {"Bull. Amer. Astron. Soc."}

MACRO {baps} {"Bull. Amer. Phys. Soc."}

MACRO {cmp} {"Comm. Math. Phys."}

MACRO {cpam} {"Commun. Pure Appl. Math."}

MACRO {cppcf} {"Comm. Plasma Phys. \& Controlled Fusion"}

MACRO {cpc} {"Comp. Phys. Comm."}

MACRO {cqg} {"Class. Quant. Grav."}

MACRO {cra} {"C. R. Acad. Sci. A"}

MACRO {fed} {"Fusion Eng. \& Design"}

MACRO {ft} {"Fusion Tech."}

MACRO {grg} {"Gen. Relativ. Gravit."}

MACRO {ieeens} {"IEEE Trans. Nucl. Sci."}

MACRO {ieeeps} {"IEEE Trans. Plasma Sci."}

MACRO {ijimw} {"Interntl. J. Infrared \& Millimeter Waves"}

MACRO {ip} {"Infrared Phys."}

MACRO {irp} {"Infrared Phys."}

MACRO {jap} {"J. Appl. Phys."}

MACRO {jasa} {"J. Acoust. Soc. America"}

MACRO {jcp} {"J. Comp. Phys."}

MACRO {jetp} {"Sov. Phys.--JETP"}

MACRO {jfe} {"J. Fusion Energy"}

MACRO {jfm} {"J. Fluid Mech."}

MACRO {jmp} {"J. Math. Phys."}

MACRO {jne} {"J. Nucl. Energy"}

MACRO {jnec} {"J. Nucl. Energy, C: Plasma Phys., Accelerators, Thermonucl. Res."}

MACRO {jnm} {"J. Nucl. Mat."}

MACRO {jpc} {"J. Phys. Chem."}

MACRO {jpp} {"J. Plasma Phys."}

MACRO {jpsj} {"J. Phys. Soc. Japan"}

MACRO {jsi} {"J. Sci. Instrum."}

MACRO {jvst} {"J. Vac. Sci. \& Tech."}

MACRO {nat} {"Nature"}

MACRO {nature} {"Nature"}

MACRO {nedf} {"Nucl. Eng. \& Design/Fusion"}

MACRO {nf} {"Nucl. Fusion"}

MACRO {nim} {"Nucl. Inst. \& Meth."}

MACRO {nimpr} {"Nucl. Inst. \& Meth. in Phys. Res."}

MACRO {np} {"Nucl. Phys."}

MACRO {npb} {"Nucl. Phys. B"}

MACRO {nt/f} {"Nucl. Tech./Fusion"}

MACRO {npbpc} {"Nucl. Phys. B (Proc. Suppl.)"}

MACRO {inc} {"Nuovo Cimento"}

MACRO {nc} {"Nuovo Cimento"}

MACRO {pf} {"Phys. Fluids"}

MACRO {pfa} {"Phys. Fluids A: Fluid Dyn."}

MACRO {pfb} {"Phys. Fluids B: Plasma Phys."}

MACRO {pl} {"Phys. Lett."}

MACRO {pla} {"Phys. Lett. A"}

MACRO {plb} {"Phys. Lett. B"}

MACRO {prep} {"Phys. Rep."}

MACRO {pnas} {"Proc. Nat. Acad. Sci. USA"}

MACRO {pp} {"Phys. Plasmas"}

MACRO {ppcf} {"Plasma Phys. \& Controlled Fusion"}

MACRO {phitrsl} {"Philos. Trans. Roy. Soc. London"}

MACRO {prl} {"Phys. Rev. Lett."}

MACRO {pr} {"Phys. Rev."}

MACRO {physrev} {"Phys. Rev."}

MACRO {pra} {"Phys. Rev. A"}

MACRO {prb} {"Phys. Rev. B"}

MACRO {prc} {"Phys. Rev. C"}

MACRO {prd} {"Phys. Rev. D"}

MACRO {pre} {"Phys. Rev. E"}

MACRO {ps} {"Phys. Scripta"}

MACRO {procrsl} {"Proc. Roy. Soc. London"}

MACRO {rmp} {"Rev. Mod. Phys."}

MACRO {rsi} {"Rev. Sci. Inst."}

MACRO {science} {"Science"}

MACRO {sciam} {"Sci. Am."}

MACRO {sam} {"Stud. Appl. Math."}

MACRO {sjpp} {"Sov. J. Plasma Phys."}

MACRO {spd} {"Sov. Phys.--Doklady"}

MACRO {sptp} {"Sov. Phys.--Tech. Phys."}

MACRO {spu} {"Sov. Phys.--Uspeki"}

MACRO {st} {"Sky and Telesc."}

% End module: physjour.mbs

%-------------------------------------------------------------------

% Begin module:

% \ProvidesFile{geojour.mbs}[2002/07/10 2.0h (PWD)]

MACRO {aisr} {"Adv. Space Res."}

MACRO {ag} {"Ann. Geophys."}

MACRO {anigeo} {"Ann. Geofis."}

MACRO {angl} {"Ann. Glaciol."}

MACRO {andmet} {"Ann. d. Meteor."}

MACRO {andgeo} {"Ann. d. Geophys."}

MACRO {andphy} {"Ann. Phys.-Paris"}

MACRO {afmgb} {"Arch. Meteor. Geophys. Bioklimatol."}

MACRO {atph} {"Atm\'osphera"}

MACRO {aao} {"Atmos. Ocean"}

MACRO {ass}{"Astrophys. Space Sci."}

MACRO {atenv} {"Atmos. Environ."}

MACRO {aujag} {"Aust. J. Agr. Res."}

MACRO {aumet} {"Aust. Meteorol. Mag."}

MACRO {blmet} {"Bound.-Lay. Meteorol."}

MACRO {bams} {"Bull. Amer. Meteorol. Soc."}

MACRO {cch} {"Clim. Change"}

MACRO {cdyn} {"Clim. Dynam."}

MACRO {cbul} {"Climatol. Bull."}

MACRO {cap} {"Contrib. Atmos. Phys."}

MACRO {dsr} {"Deep-Sea Res."}

MACRO {dhz} {"Dtsch. Hydrogr. Z."}

MACRO {dao} {"Dynam. Atmos. Oceans"}

MACRO {eco} {"Ecology"}

MACRO {empl}{"Earth, Moon and Planets"}

MACRO {envres} {"Environ. Res."}

MACRO {envst} {"Environ. Sci. Technol."}

MACRO {ecms} {"Estuarine Coastal Mar. Sci."}

MACRO {expa}{"Exper. Astron."}

MACRO {geoint} {"Geofis. Int."}

MACRO {geopub} {"Geofys. Publ."}

MACRO {geogeo} {"Geol. Geofiz."}

MACRO {gafd} {"Geophys. Astrophys. Fluid Dyn."}

MACRO {gfd} {"Geophys. Fluid Dyn."}

MACRO {geomag} {"Geophys. Mag."}

MACRO {georl} {"Geophys. Res. Lett."}

MACRO {grl} {"Geophys. Res. Lett."}

MACRO {ga} {"Geophysica"}

MACRO {gs} {"Geophysics"}

MACRO {ieeetap} {"IEEE Trans. Antenn. Propag."}

MACRO {ijawp} {"Int. J. Air Water Pollut."}

MACRO {ijc} {"Int. J. Climatol."}

MACRO {ijrs} {"Int. J. Remote Sens."}

MACRO {jam} {"J. Appl. Meteorol."}

MACRO {jaot} {"J. Atmos. Ocean. Technol."}

MACRO {jatp} {"J. Atmos. Terr. Phys."}

MACRO {jastp} {"J. Atmos. Solar-Terr. Phys."}

MACRO {jce} {"J. Climate"}

MACRO {jcam} {"J. Climate Appl. Meteor."}

MACRO {jcm} {"J. Climate Meteor."}

MACRO {jcy} {"J. Climatol."}

MACRO {jgr} {"J. Geophys. Res."}

MACRO {jga} {"J. Glaciol."}

MACRO {jh} {"J. Hydrol."}

MACRO {jmr} {"J. Mar. Res."}

MACRO {jmrj} {"J. Meteor. Res. Japan"}

MACRO {jm} {"J. Meteor."}

MACRO {jpo} {"J. Phys. Oceanogr."}

MACRO {jra} {"J. Rech. Atmos."}

MACRO {jaes} {"J. Aeronaut. Sci."}

MACRO {japca} {"J. Air Pollut. Control Assoc."}

MACRO {jas} {"J. Atmos. Sci."}

MACRO {jmts} {"J. Mar. Technol. Soc."}

MACRO {jmsj} {"J. Meteorol. Soc. Japan"}

MACRO {josj} {"J. Oceanogr. Soc. Japan"}

MACRO {jwm} {"J. Wea. Mod."}

MACRO {lao} {"Limnol. Oceanogr."}

MACRO {mwl} {"Mar. Wea. Log"}

MACRO {mau} {"Mausam"}

MACRO {meteor} {"``Meteor'' Forschungsergeb."}

MACRO {map} {"Meteorol. Atmos. Phys."}

MACRO {metmag} {"Meteor. Mag."}

MACRO {metmon} {"Meteor. Monogr."}

MACRO {metrun} {"Meteor. Rundsch."}

MACRO {metzeit} {"Meteor. Z."}

MACRO {metgid} {"Meteor. Gidrol."}

MACRO {mwr} {"Mon. Weather Rev."}

MACRO {nwd} {"Natl. Weather Dig."}

MACRO {nzjmfr} {"New Zeal. J. Mar. Freshwater Res."}

MACRO {npg} {"Nonlin. Proc. Geophys."}

MACRO {om} {"Oceanogr. Meteorol."}

MACRO {ocac} {"Oceanol. Acta"}

MACRO {oceanus} {"Oceanus"}

MACRO {paleoc} {"Paleoceanography"}

MACRO {pce} {"Phys. Chem. Earth"}

MACRO {pmg} {"Pap. Meteor. Geophys."}

MACRO {ppom} {"Pap. Phys. Oceanogr. Meteor."}

MACRO {physzeit} {"Phys. Z."}

MACRO {pps} {"Planet. Space Sci."}

MACRO {pss} {"Planet. Space Sci."}

MACRO {pag} {"Pure Appl. Geophys."}

MACRO {qjrms} {"Quart. J. Roy. Meteorol. Soc."}

MACRO {quatres} {"Quat. Res."}

MACRO {rsci} {"Radio Sci."}

MACRO {rse} {"Remote Sens. Environ."}

MACRO {rgeo} {"Rev. Geophys."}

MACRO {rgsp} {"Rev. Geophys. Space Phys."}

MACRO {rdgeo} {"Rev. Geofis."}

MACRO {revmeta} {"Rev. Meteorol."}

MACRO {sgp}{"Surveys in Geophys."}

MACRO {sp} {"Solar Phys."}

MACRO {ssr} {"Space Sci. Rev."}

MACRO {tellus} {"Tellus"}

MACRO {tac} {"Theor. Appl. Climatol."}

MACRO {tagu} {"Trans. Am. Geophys. Union (EOS)"}

MACRO {wrr} {"Water Resour. Res."}

MACRO {weather} {"Weather"}

MACRO {wafc} {"Weather Forecast."}

MACRO {ww} {"Weatherwise"}

MACRO {wmob} {"WMO Bull."}

MACRO {zeitmet} {"Z. Meteorol."}

% End module: geojour.mbs

%-------------------------------------------------------------------

% Begin module:

% \ProvidesFile{photjour.mbs}[1999/02/24 2.0b (PWD)]

MACRO {appopt} {"Appl. Opt."}

MACRO {bell} {"Bell Syst. Tech. J."}

MACRO {ell} {"Electron. Lett."}

MACRO {jasp} {"J. Appl. Spectr."}

MACRO {jqe} {"IEEE J. Quantum Electron."}

MACRO {jlwt} {"J. Lightwave Technol."}

MACRO {jmo} {"J. Mod. Opt."}

MACRO {josa} {"J. Opt. Soc. America"}

MACRO {josaa} {"J. Opt. Soc. Amer.~A"}

MACRO {josab} {"J. Opt. Soc. Amer.~B"}

MACRO {jdp} {"J. Phys. (Paris)"}

MACRO {oc} {"Opt. Commun."}

MACRO {ol} {"Opt. Lett."}

MACRO {phtl} {"IEEE Photon. Technol. Lett."}

MACRO {pspie} {"Proc. Soc. Photo-Opt. Instrum. Eng."}

MACRO {sse} {"Solid-State Electron."}

MACRO {sjot} {"Sov. J. Opt. Technol."}

MACRO {sjqe} {"Sov. J. Quantum Electron."}

MACRO {sleb} {"Sov. Phys.--Leb. Inst. Rep."}

MACRO {stph} {"Sov. Phys.--Techn. Phys."}

MACRO {stphl} {"Sov. Techn. Phys. Lett."}

MACRO {vr} {"Vision Res."}

MACRO {zph} {"Z. f. Physik"}

MACRO {zphb} {"Z. f. Physik~B"}

MACRO {zphd} {"Z. f. Physik~D"}

MACRO {CLEO} {"CLEO"}

MACRO {ASSL} {"Adv. Sol.-State Lasers"}

MACRO {OSA} {"OSA"}

% End module: photjour.mbs

%% Copyright 1994-2008 Patrick W Daly

MACRO {acmcs} {"ACM Comput. Surv."}

MACRO {acta} {"Acta Inf."}

MACRO {cacm} {"Commun. ACM"}

MACRO {ibmjrd} {"IBM J. Res. Dev."}

MACRO {ibmsj} {"IBM Syst.~J."}

MACRO {ieeese} {"IEEE Trans. Software Eng."}

MACRO {ieeetc} {"IEEE Trans. Comput."}

MACRO {ieeetcad}

{"IEEE Trans. Comput. Aid. Des."}

MACRO {ipl} {"Inf. Process. Lett."}

MACRO {jacm} {"J.~ACM"}

MACRO {jcss} {"J.~Comput. Syst. Sci."}

MACRO {scp} {"Sci. Comput. Program."}

MACRO {sicomp} {"SIAM J. Comput."}

MACRO {tocs} {"ACM Trans. Comput. Syst."}

MACRO {tods} {"ACM Trans. Database Syst."}

MACRO {tog} {"ACM Trans. Graphic."}

MACRO {toms} {"ACM Trans. Math. Software"}

MACRO {toois} {"ACM Trans. Office Inf. Syst."}

MACRO {toplas} {"ACM Trans. Progr. Lang. Syst."}

MACRO {tcs} {"Theor. Comput. Sci."}

FUNCTION {bibinfo.check}

{ swap$

duplicate$ missing$

{

pop$ pop$

""

}

{ duplicate$ empty$

{

swap$ pop$

}

{ swap$

pop$

}

if$

}

if$

}

FUNCTION {bibinfo.warn}

{ swap$

duplicate$ missing$

{

swap$ "missing " swap$ * " in " * cite$ * warning$ pop$

""

}

{ duplicate$ empty$

{

swap$ "empty " swap$ * " in " * cite$ * warning$

}

{ swap$

pop$

}

if$

}

if$

}

INTEGERS { nameptr namesleft numnames }

STRINGS { bibinfo}

FUNCTION {format.names}

{ 'bibinfo :=

duplicate$ empty$ 'skip$ {

's :=

"" 't :=

#1 'nameptr :=

s num.names$ 'numnames :=

numnames 'namesleft :=

{ namesleft #0 > }

{ s nameptr

duplicate$ #1 >

{ "{f.~}{vv~}{ll}{, jj}" }

{ "{vv~}{ll}{, f.}{, jj}" }

if$

format.name$

bibinfo bibinfo.check

't :=

nameptr #1 >

{

namesleft #1 >

{ ", " * t * }

{

s nameptr "{ll}" format.name$ duplicate$ "others" =

{ 't := }

{ pop$ }

if$

"," *

t "others" =

{

" " * bbl.etal *

}

{

bbl.and

space.word * t *

}

if$

}

if$

}

't

if$

nameptr #1 + 'nameptr :=

namesleft #1 - 'namesleft :=

}

while$

} if$

}

FUNCTION {format.names.ed}

{

'bibinfo :=

duplicate$ empty$ 'skip$ {

's :=

"" 't :=

#1 'nameptr :=

s num.names$ 'numnames :=

numnames 'namesleft :=

{ namesleft #0 > }

{ s nameptr

"{f.~}{vv~}{ll}{, jj}"

format.name$

bibinfo bibinfo.check

't :=

nameptr #1 >

{

namesleft #1 >

{ ", " * t * }

{

s nameptr "{ll}" format.name$ duplicate$ "others" =

{ 't := }

{ pop$ }

if$

numnames #2 >

{ "," * }

'skip$

if$

t "others" =

{

" " * bbl.etal *

}

{

bbl.and

space.word * t *

}

if$

}

if$

}

't

if$

nameptr #1 + 'nameptr :=

namesleft #1 - 'namesleft :=

}

while$

} if$

}

FUNCTION {format.key}

{ empty$

{ key field.or.null }

{ "" }

if$

}

FUNCTION {format.authors}

{ author "author" format.names

}

FUNCTION {get.bbl.editor}

{ editor num.names$ #1 > 'bbl.editors 'bbl.editor if$ }

FUNCTION {format.editors}

{ editor "editor" format.names duplicate$ empty$ 'skip$

{

" " *

get.bbl.editor

capitalize

"(" swap$ * ")" *

*

}

if$

}

FUNCTION {format.book.pages}

{ pages "pages" bibinfo.check

duplicate$ empty$ 'skip$

{ " " * bbl.pages * }

if$

}

FUNCTION {format.doi}

{ doi empty$

{ "" }

{

"\doi{" doi * "}" *

}

if$

}

FUNCTION {format.note}

{

note empty$

{ "" }

{ note #1 #1 substring$

duplicate$ "{" =

'skip$

{ output.state mid.sentence =

{ "l" }

{ "u" }

if$

change.case$

}

if$

note #2 global.max$ substring$ * "note" bibinfo.check

}

if$

}

FUNCTION {format.title}

{ title

duplicate$ empty$ 'skip$

{ "t" change.case$ }

if$

"title" bibinfo.check

}

FUNCTION {format.full.names}

{'s :=

"" 't :=

#1 'nameptr :=

s num.names$ 'numnames :=

numnames 'namesleft :=

{ namesleft #0 > }

{ s nameptr

"{vv~}{ll}" format.name$

't :=

nameptr #1 >

{

namesleft #1 >

{ ", " * t * }

{

s nameptr "{ll}" format.name$ duplicate$ "others" =

{ 't := }

{ pop$ }

if$

t "others" =

{

" " * bbl.etal *

cite.name.font

}

{

numnames #2 >

{ "," * }

'skip$

if$

bbl.and

space.word * t *

}

if$

}

if$

}

't

if$

nameptr #1 + 'nameptr :=

namesleft #1 - 'namesleft :=

}

while$

t "others" =

'skip$

{ cite.name.font }

if$

}

FUNCTION {author.editor.key.full}

{ author empty$

{ editor empty$

{ key empty$

{ cite$ #1 #3 substring$ }

'key

if$

}

{ editor format.full.names }

if$

}

{ author format.full.names }

if$

}

FUNCTION {author.key.full}

{ author empty$

{ key empty$

{ cite$ #1 #3 substring$ }

'key

if$

}

{ author format.full.names }

if$

}

FUNCTION {editor.key.full}

{ editor empty$

{ key empty$

{ cite$ #1 #3 substring$ }

'key

if$

}

{ editor format.full.names }

if$

}

FUNCTION {make.full.names}

{ type$ "book" =

type$ "inbook" =

or

'author.editor.key.full

{ type$ "proceedings" =

'editor.key.full

'author.key.full

if$

}

if$

}

FUNCTION {output.bibitem}

{ newline$

"\bibitem[{" write$

label write$

")" make.full.names duplicate$ short.list =

{ pop$ }

{ * }

if$

"}]{" * write$

cite$ write$

"}" write$

newline$

""

before.all 'output.state :=

}

FUNCTION {if.digit}

{ duplicate$ "0" =

swap$ duplicate$ "1" =

swap$ duplicate$ "2" =

swap$ duplicate$ "3" =

swap$ duplicate$ "4" =

swap$ duplicate$ "5" =

swap$ duplicate$ "6" =

swap$ duplicate$ "7" =

swap$ duplicate$ "8" =

swap$ "9" = or or or or or or or or or

}

FUNCTION {n.separate}

{ 't :=

""

#0 'numnames :=

{ t empty$ not }

{ t #-1 #1 substring$ if.digit

{ numnames #1 + 'numnames := }

{ #0 'numnames := }

if$

t #-1 #1 substring$ swap$ *

t #-2 global.max$ substring$ 't :=

numnames #5 =

{ duplicate$ #1 #2 substring$ swap$

#3 global.max$ substring$

"," swap$ * *

}

'skip$

if$

}

while$

}

FUNCTION {n.dashify}

{

n.separate

't :=

""

{ t empty$ not }

{ t #1 #1 substring$ "-" =

{ t #1 #2 substring$ "--" = not

{ "--" *

t #2 global.max$ substring$ 't :=

}

{ { t #1 #1 substring$ "-" = }

{ "-" *

t #2 global.max$ substring$ 't :=

}

while$

}

if$

}

{ t #1 #1 substring$ *

t #2 global.max$ substring$ 't :=

}

if$

}

while$

}

FUNCTION {word.in}

{ bbl.in

" " * }

FUNCTION {format.date}

{ year "year" bibinfo.check duplicate$ empty$