mmcp-19-gerstner

Computational Model of Unsteady Hydromechanics of Large Amplitude Gerstner Waves
git clone https://git.igankevich.com/mmcp-19-gerstner.git
Log | Files | Refs

woc.bst (44106B)


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