+%% This is file `wileyj.bst',\r
+%% Created by Sunrise Setting Ltd, Torquay, UK, www.sunrise-setting.co.uk\r
+%% Version 1.00, 21 September 2007\r
+%%\r
+%% The original source files were:\r
+%%\r
+%% merlin.mbs (with options: `seq-no,nm-rvx,ed-rev,jnrlst,nmlm,x10,x0,m10,m0,dt-jnl,yr-com,yrp-semi,thtit-a,trnum-it,vol-bf,pgsep-s,pp-last,num-xser,numser,ser-vol,ser-ed,jnm-x,bkpg-x,pub-date,pub-xpar,pre-edn,doi,edpar,edby,edbyx,blk-tit,blknt,in-x,ppx,ed,abr,mth-bare,xedn,varand,and-xcom,xand,etal-xc,etal-it,url,url-nt,nfss,')\r
+%% ----------------------------------------\r
+%% *** wileyj.bst ***\r
+%% \r
+%% Copyright 1994-2005 Patrick W Daly\r
+ % ===============================================================\r
+ % IMPORTANT NOTICE:\r
+ % This bibliographic style (bst) file has been generated from one or\r
+ % more master bibliographic style (mbs) files, listed above.\r
+ %\r
+ % This generated file can be redistributed and/or modified under the terms\r
+ % of the LaTeX Project Public License Distributed from CTAN\r
+ % archives in directory macros/latex/base/lppl.txt; either\r
+ % version 1 of the License, or any later version.\r
+ % ===============================================================\r
+ % Name and version information of the main mbs file:\r
+ % \ProvidesFile{merlin.mbs}[2005/10/17 4.14 (PWD, AO, DPC)]\r
+ % For use with BibTeX version 0.99a or later\r
+ %-------------------------------------------------------------------\r
+ % This bibliography style file is intended for texts in ENGLISH\r
+ % This is a numerical citation style, and as such is standard LaTeX.\r
+ % It requires no extra package to interface to the main text.\r
+ % The form of the \bibitem entries is\r
+ % \bibitem{key}...\r
+ % Usage of \cite is as follows:\r
+ % \cite{key} ==>> [#]\r
+ % \cite[chap. 2]{key} ==>> [#, chap. 2]\r
+ % where # is a number determined by the ordering in the reference list.\r
+ % The order in the reference list is that by which the works were originally\r
+ % cited in the text, or that in the database.\r
+ %---------------------------------------------------------------------\r
+\r
+ENTRY\r
+ { address\r
+ author\r
+ booktitle\r
+ chapter\r
+ doi\r
+ edition\r
+ editor\r
+ eid\r
+ howpublished\r
+ institution\r
+ journal\r
+ key\r
+ month\r
+ note\r
+ number\r
+ organization\r
+ pages\r
+ publisher\r
+ school\r
+ series\r
+ title\r
+ type\r
+ url\r
+ volume\r
+ year\r
+ }\r
+ {}\r
+ { label }\r
+INTEGERS { output.state before.all mid.sentence after.sentence after.block }\r
+FUNCTION {init.state.consts}\r
+{ #0 'before.all :=\r
+ #1 'mid.sentence :=\r
+ #2 'after.sentence :=\r
+ #3 'after.block :=\r
+}\r
+STRINGS { s t}\r
+FUNCTION {output.nonnull}\r
+{ 's :=\r
+ output.state mid.sentence =\r
+ { ", " * write$ }\r
+ { output.state after.block =\r
+ { add.period$ write$\r
+ newline$\r
+ "\newblock " write$\r
+ }\r
+ { output.state before.all =\r
+ 'write$\r
+ { add.period$ " " * write$ }\r
+ if$\r
+ }\r
+ if$\r
+ mid.sentence 'output.state :=\r
+ }\r
+ if$\r
+ s\r
+}\r
+FUNCTION {output}\r
+{ duplicate$ empty$\r
+ 'pop$\r
+ 'output.nonnull\r
+ if$\r
+}\r
+FUNCTION {output.check}\r
+{ 't :=\r
+ duplicate$ empty$\r
+ { pop$ "empty " t * " in " * cite$ * warning$ }\r
+ 'output.nonnull\r
+ if$\r
+}\r
+FUNCTION {fin.entry}\r
+{ add.period$\r
+ write$\r
+ newline$\r
+}\r
+\r
+FUNCTION {new.block}\r
+{ output.state before.all =\r
+ 'skip$\r
+ { after.block 'output.state := }\r
+ if$\r
+}\r
+FUNCTION {new.sentence}\r
+{ output.state after.block =\r
+ 'skip$\r
+ { output.state before.all =\r
+ 'skip$\r
+ { after.sentence 'output.state := }\r
+ if$\r
+ }\r
+ if$\r
+}\r
+FUNCTION {add.blank}\r
+{ " " * before.all 'output.state :=\r
+}\r
+\r
+%AS\r
+FUNCTION {add.fullstop}\r
+{ duplicate$ empty$\r
+ 'skip$\r
+ { "." * add.blank }\r
+ if$\r
+}\r
+\r
+FUNCTION {date.block}\r
+{\r
+ ";" *\r
+ add.blank\r
+}\r
+\r
+FUNCTION {not}\r
+{ { #0 }\r
+ { #1 }\r
+ if$\r
+}\r
+FUNCTION {and}\r
+{ 'skip$\r
+ { pop$ #0 }\r
+ if$\r
+}\r
+FUNCTION {or}\r
+{ { pop$ #1 }\r
+ 'skip$\r
+ if$\r
+}\r
+STRINGS {z}\r
+FUNCTION {remove.dots}\r
+{ 'z :=\r
+ ""\r
+ { z empty$ not }\r
+ { z #1 #1 substring$\r
+ z #2 global.max$ substring$ 'z :=\r
+ duplicate$ "." = 'pop$\r
+ { * }\r
+ if$\r
+ }\r
+ while$\r
+}\r
+FUNCTION {new.block.checka}\r
+{ empty$\r
+ 'skip$\r
+ 'new.block\r
+ if$\r
+}\r
+FUNCTION {new.block.checkb}\r
+{ empty$\r
+ swap$ empty$\r
+ and\r
+ 'skip$\r
+ 'new.block\r
+ if$\r
+}\r
+FUNCTION {new.sentence.checka}\r
+{ empty$\r
+ 'skip$\r
+ 'new.sentence\r
+ if$\r
+}\r
+FUNCTION {new.sentence.checkb}\r
+{ empty$\r
+ swap$ empty$\r
+ and\r
+ 'skip$\r
+ 'new.sentence\r
+ if$\r
+}\r
+FUNCTION {field.or.null}\r
+{ duplicate$ empty$\r
+ { pop$ "" }\r
+ 'skip$\r
+ if$\r
+}\r
+FUNCTION {emphasize}\r
+{ duplicate$ empty$\r
+ { pop$ "" }\r
+ { "\emph{" swap$ * "}" * }\r
+ if$\r
+}\r
+FUNCTION {bolden}\r
+{ duplicate$ empty$\r
+ { pop$ "" }\r
+ { "\textbf{" swap$ * "}" * }\r
+ if$\r
+}\r
+FUNCTION {tie.or.space.prefix}\r
+{ duplicate$ text.length$ #3 <\r
+ { "~" }\r
+ { " " }\r
+ if$\r
+ swap$\r
+}\r
+\r
+FUNCTION {capitalize}\r
+{ "u" change.case$ "t" change.case$ }\r
+\r
+FUNCTION {space.word}\r
+{ " " swap$ * " " * }\r
+ % Here are the language-specific definitions for explicit words.\r
+ % Each function has a name bbl.xxx where xxx is the English word.\r
+ % The language selected here is ENGLISH\r
+FUNCTION {bbl.and}\r
+{ "\protect\BIBand{}"}\r
+\r
+FUNCTION {bbl.etal}\r
+{ "et~al." }\r
+\r
+FUNCTION {bbl.editors}\r
+{ " (eds.)" }\r
+\r
+FUNCTION {bbl.editor}\r
+{ " (ed.)" }\r
+\r
+FUNCTION {bbl.edby}\r
+{ "edited by" }\r
+\r
+FUNCTION {bbl.edition}\r
+{ "edn." }\r
+\r
+FUNCTION {bbl.volume}\r
+{ "vol." }\r
+\r
+FUNCTION {bbl.of}\r
+{ "of" }\r
+\r
+FUNCTION {bbl.number}\r
+{ "no." }\r
+\r
+FUNCTION {bbl.nr}\r
+{ "no." }\r
+\r
+FUNCTION {bbl.in}\r
+{ "in" }\r
+\r
+FUNCTION {bbl.pages}\r
+{ "" }\r
+\r
+FUNCTION {bbl.page}\r
+{ "" }\r
+\r
+FUNCTION {bbl.chapter}\r
+{ "chap." }\r
+\r
+FUNCTION {bbl.techrep}\r
+{ "Technical {R}eport" }\r
+\r
+FUNCTION {bbl.mthesis}\r
+{ "Master's {T}hesis" }\r
+\r
+FUNCTION {bbl.phdthesis}\r
+{ "Ph{D} {T}hesis" }\r
+\r
+MACRO {jan} {"Jan."}\r
+\r
+MACRO {feb} {"Feb."}\r
+\r
+MACRO {mar} {"Mar."}\r
+\r
+MACRO {apr} {"Apr."}\r
+\r
+MACRO {may} {"May"}\r
+\r
+MACRO {jun} {"Jun."}\r
+\r
+MACRO {jul} {"Jul."}\r
+\r
+MACRO {aug} {"Aug."}\r
+\r
+MACRO {sep} {"Sep."}\r
+\r
+MACRO {oct} {"Oct."}\r
+\r
+MACRO {nov} {"Nov."}\r
+\r
+MACRO {dec} {"Dec."}\r
+\r
+MACRO {acmcs} {"ACM Computing Surveys"}\r
+\r
+MACRO {acta} {"Acta Informatica"}\r
+\r
+MACRO {cacm} {"Communications of the ACM"}\r
+\r
+MACRO {ibmjrd} {"IBM Journal of Research and Development"}\r
+\r
+MACRO {ibmsj} {"IBM Systems Journal"}\r
+\r
+MACRO {ieeese} {"IEEE Transactions on Software Engineering"}\r
+\r
+MACRO {ieeetc} {"IEEE Transactions on Computers"}\r
+\r
+MACRO {ieeetcad}\r
+ {"IEEE Transactions on Computer-Aided Design of Integrated Circuits"}\r
+\r
+MACRO {ipl} {"Information Processing Letters"}\r
+\r
+MACRO {jacm} {"Journal of the ACM"}\r
+\r
+MACRO {jcss} {"Journal of Computer and System Sciences"}\r
+\r
+MACRO {scp} {"Science of Computer Programming"}\r
+\r
+MACRO {sicomp} {"SIAM Journal on Computing"}\r
+\r
+MACRO {tocs} {"ACM Transactions on Computer Systems"}\r
+\r
+MACRO {tods} {"ACM Transactions on Database Systems"}\r
+\r
+MACRO {tog} {"ACM Transactions on Graphics"}\r
+\r
+MACRO {toms} {"ACM Transactions on Mathematical Software"}\r
+\r
+MACRO {toois} {"ACM Transactions on Office Information Systems"}\r
+\r
+MACRO {toplas} {"ACM Transactions on Programming Languages and Systems"}\r
+\r
+MACRO {tcs} {"Theoretical Computer Science"}\r
+FUNCTION {bibinfo.check}\r
+{ swap$\r
+ duplicate$ missing$\r
+ {\r
+ pop$ pop$\r
+ ""\r
+ }\r
+ { duplicate$ empty$\r
+ {\r
+ swap$ pop$\r
+ }\r
+ { swap$\r
+ pop$\r
+ }\r
+ if$\r
+ }\r
+ if$\r
+}\r
+FUNCTION {bibinfo.warn}\r
+{ swap$\r
+ duplicate$ missing$\r
+ {\r
+ swap$ "missing " swap$ * " in " * cite$ * warning$ pop$\r
+ ""\r
+ }\r
+ { duplicate$ empty$\r
+ {\r
+ swap$ "empty " swap$ * " in " * cite$ * warning$\r
+ }\r
+ { swap$\r
+ pop$\r
+ }\r
+ if$\r
+ }\r
+ if$\r
+}\r
+STRINGS { bibinfo}\r
+INTEGERS { nameptr namesleft numnames }\r
+\r
+FUNCTION {format.names}\r
+{ 'bibinfo :=\r
+ duplicate$ empty$ 'skip$ {\r
+ 's :=\r
+ "" 't :=\r
+ #1 'nameptr :=\r
+ s num.names$ 'numnames :=\r
+ numnames 'namesleft :=\r
+ { namesleft #0 > }\r
+ { s nameptr\r
+ "{vv~}{ll}{ f{}}{ jj}"\r
+ format.name$\r
+ remove.dots\r
+ bibinfo bibinfo.check\r
+ 't :=\r
+ nameptr #1 >\r
+ {\r
+ nameptr #0\r
+ #10 +\r
+ #1 + =\r
+ numnames #0\r
+ #10 +\r
+ > and\r
+ { "others" 't :=\r
+ #1 'namesleft := }\r
+ 'skip$\r
+ if$\r
+ namesleft #1 >\r
+ { ", " * t * }\r
+ {\r
+ s nameptr "{ll}" format.name$ duplicate$ "others" =\r
+ { 't := }\r
+ { pop$ }\r
+ if$\r
+ "," *\r
+ t "others" =\r
+ {\r
+ " " * bbl.etal emphasize *\r
+ }\r
+ { " " * t * }\r
+ if$\r
+ }\r
+ if$\r
+ }\r
+ 't\r
+ if$\r
+ nameptr #1 + 'nameptr :=\r
+ namesleft #1 - 'namesleft :=\r
+ }\r
+ while$\r
+ } if$\r
+}\r
+FUNCTION {format.names.ed}\r
+{\r
+ format.names\r
+}\r
+FUNCTION {format.authors}\r
+{ author "author" format.names\r
+}\r
+FUNCTION {get.bbl.editor}\r
+{ editor num.names$ #1 > 'bbl.editors 'bbl.editor if$ }\r
+\r
+FUNCTION {format.editors}\r
+{ editor "editor" format.names duplicate$ empty$ 'skip$\r
+ {\r
+ " " *\r
+ get.bbl.editor\r
+ "(" swap$ * ")" *\r
+ *\r
+ }\r
+ if$\r
+}\r
+\r
+FUNCTION {format.doi}\r
+{ doi "doi" bibinfo.check\r
+ duplicate$ empty$ 'skip$\r
+ {\r
+ "\doi{" swap$ * "}" *\r
+ }\r
+ if$\r
+}\r
+FUNCTION {format.note}\r
+{\r
+ url empty$\r
+ 'skip$\r
+ { "\urlprefix\url{" url * "}" * output }\r
+ if$\r
+ note empty$\r
+ { "" }\r
+ { note #1 #1 substring$\r
+ duplicate$ "{" =\r
+ 'skip$\r
+ { output.state mid.sentence =\r
+ { "l" }\r
+ { "u" }\r
+ if$\r
+ change.case$\r
+ }\r
+ if$\r
+ note #2 global.max$ substring$ * "note" bibinfo.check\r
+ }\r
+ if$\r
+}\r
+\r
+FUNCTION {format.title}\r
+{ title\r
+ duplicate$ empty$ 'skip$\r
+ { "t" change.case$ }\r
+ if$\r
+ "title" bibinfo.check\r
+}\r
+FUNCTION {output.bibitem}\r
+{ newline$\r
+ "\bibitem{" write$\r
+ cite$ write$\r
+ "}" write$\r
+ newline$\r
+ ""\r
+ before.all 'output.state :=\r
+}\r
+\r
+FUNCTION {if.digit}\r
+{ duplicate$ "0" =\r
+ swap$ duplicate$ "1" =\r
+ swap$ duplicate$ "2" =\r
+ swap$ duplicate$ "3" =\r
+ swap$ duplicate$ "4" =\r
+ swap$ duplicate$ "5" =\r
+ swap$ duplicate$ "6" =\r
+ swap$ duplicate$ "7" =\r
+ swap$ duplicate$ "8" =\r
+ swap$ "9" = or or or or or or or or or\r
+}\r
+FUNCTION {n.separate}\r
+{ 't :=\r
+ ""\r
+ #0 'numnames :=\r
+ { t empty$ not }\r
+ { t #-1 #1 substring$ if.digit\r
+ { numnames #1 + 'numnames := }\r
+ { #0 'numnames := }\r
+ if$\r
+ t #-1 #1 substring$ swap$ *\r
+ t #-2 global.max$ substring$ 't :=\r
+ numnames #5 =\r
+ { duplicate$ #1 #2 substring$ swap$\r
+ #3 global.max$ substring$\r
+ "\," swap$ * *\r
+ }\r
+ 'skip$\r
+ if$\r
+ }\r
+ while$\r
+}\r
+FUNCTION {n.dashify}\r
+{\r
+ n.separate\r
+ 't :=\r
+ ""\r
+ { t empty$ not }\r
+ { t #1 #1 substring$ "-" =\r
+ { t #1 #2 substring$ "--" = not\r
+ { "--" *\r
+ t #2 global.max$ substring$ 't :=\r
+ }\r
+ { { t #1 #1 substring$ "-" = }\r
+ { "-" *\r
+ t #2 global.max$ substring$ 't :=\r
+ }\r
+ while$\r
+ }\r
+ if$\r
+ }\r
+ { t #1 #1 substring$ *\r
+ t #2 global.max$ substring$ 't :=\r
+ }\r
+ if$\r
+ }\r
+ while$\r
+}\r
+\r
+FUNCTION {word.in}\r
+{ "" }\r
+\r
+FUNCTION {format.date}\r
+{\r
+ month "month" bibinfo.check\r
+ duplicate$ empty$\r
+ year "year" bibinfo.check duplicate$ empty$\r
+ { swap$ 'skip$\r
+ { "there's a month but no year in " cite$ * warning$ }\r
+ if$\r
+ *\r
+ }\r
+ { swap$ 'skip$\r
+ {\r
+ swap$\r
+ " " * swap$\r
+ }\r
+ if$\r
+ *\r
+ remove.dots\r
+ }\r
+ if$\r
+ duplicate$ empty$\r
+ 'skip$\r
+ {\r
+ before.all 'output.state :=\r
+ %AS", " swap$ *\r
+ " " swap$ *\r
+ }\r
+ if$\r
+}\r
+FUNCTION {format.btitle}\r
+{ title "title" bibinfo.check\r
+ duplicate$ empty$ 'skip$\r
+ {\r
+ emphasize\r
+ }\r
+ if$\r
+}\r
+FUNCTION {either.or.check}\r
+{ empty$\r
+ 'pop$\r
+ { "can't use both " swap$ * " fields in " * cite$ * warning$ }\r
+ if$\r
+}\r
+FUNCTION {format.bvolume}\r
+{ volume empty$\r
+ { "" }\r
+ { bbl.volume volume tie.or.space.prefix\r
+ "volume" bibinfo.check * *\r
+ series "series" bibinfo.check\r
+ duplicate$ empty$ 'pop$\r
+ { emphasize ", " * swap$ * }\r
+ if$\r
+ "volume and number" number either.or.check\r
+ }\r
+ if$\r
+}\r
+FUNCTION {format.number.series}\r
+{ volume empty$\r
+ { number empty$\r
+ { series field.or.null }\r
+ { series empty$\r
+ { number "number" bibinfo.check }\r
+ { output.state mid.sentence =\r
+ { bbl.number }\r
+ { bbl.number capitalize }\r
+ if$\r
+ number tie.or.space.prefix "number" bibinfo.check * *\r
+ bbl.in space.word *\r
+ series "series" bibinfo.check *\r
+ }\r
+ if$\r
+ }\r
+ if$\r
+ }\r
+ { "" }\r
+ if$\r
+}\r
+\r
+FUNCTION {format.edition}\r
+{ edition duplicate$ empty$ 'skip$\r
+ {\r
+ output.state mid.sentence =\r
+ { "l" }\r
+ { "t" }\r
+ if$ change.case$\r
+ "edition" bibinfo.check\r
+ " " * bbl.edition *\r
+ }\r
+ if$\r
+}\r
+INTEGERS { multiresult }\r
+FUNCTION {multi.page.check}\r
+{ 't :=\r
+ #0 'multiresult :=\r
+ { multiresult not\r
+ t empty$ not\r
+ and\r
+ }\r
+ { t #1 #1 substring$\r
+ duplicate$ "-" =\r
+ swap$ duplicate$ "," =\r
+ swap$ "+" =\r
+ or or\r
+ { #1 'multiresult := }\r
+ { t #2 global.max$ substring$ 't := }\r
+ if$\r
+ }\r
+ while$\r
+ multiresult\r
+}\r
+FUNCTION {format.pages}\r
+{ pages duplicate$ empty$ 'skip$\r
+ { duplicate$ multi.page.check\r
+ {\r
+ n.dashify\r
+ }\r
+ {\r
+ }\r
+ if$\r
+ "pages" bibinfo.check\r
+ }\r
+ if$\r
+}\r
+%AS\r
+FUNCTION {format.book.pages}\r
+{ pages duplicate$ empty$ 'pop$\r
+ { swap$ duplicate$ empty$\r
+ { pop$ pop$ format.pages }\r
+ { \r
+ "; " *\r
+ swap$\r
+ n.dashify\r
+ "pages" bibinfo.check\r
+ *\r
+ }\r
+ if$\r
+ }\r
+ if$\r
+}\r
+FUNCTION {format.journal.pages}\r
+{ pages duplicate$ empty$ 'pop$\r
+ { swap$ duplicate$ empty$\r
+ { pop$ pop$ format.pages }\r
+ {\r
+ ":" *\r
+ swap$\r
+ n.dashify\r
+ "pages" bibinfo.check\r
+ *\r
+ }\r
+ if$\r
+ }\r
+ if$\r
+}\r
+FUNCTION {format.journal.eid}\r
+{ eid "eid" bibinfo.check\r
+ duplicate$ empty$ 'pop$\r
+ { swap$ duplicate$ empty$ 'skip$\r
+ {\r
+ ":" *\r
+ }\r
+ if$\r
+ swap$ *\r
+ }\r
+ if$\r
+}\r
+FUNCTION {format.vol.num.pages}\r
+{ volume field.or.null\r
+ duplicate$ empty$ 'skip$\r
+ {\r
+ "volume" bibinfo.check\r
+ }\r
+ if$\r
+ bolden\r
+ number "number" bibinfo.check duplicate$ empty$ 'skip$\r
+ {\r
+ swap$ duplicate$ empty$\r
+ { "there's a number but no volume in " cite$ * warning$ }\r
+ 'skip$\r
+ if$\r
+ swap$\r
+ "(" swap$ * ")" *\r
+ }\r
+ if$ *\r
+}\r
+\r
+FUNCTION {format.chapter.pages}\r
+{ chapter empty$\r
+ { "" }\r
+ { type empty$\r
+ { bbl.chapter }\r
+ { type "l" change.case$\r
+ "type" bibinfo.check\r
+ }\r
+ if$\r
+ chapter tie.or.space.prefix\r
+ "chapter" bibinfo.check\r
+ * *\r
+ }\r
+ if$\r
+}\r
+\r
+FUNCTION {format.booktitle}\r
+{\r
+ booktitle "booktitle" bibinfo.check\r
+ emphasize\r
+}\r
+FUNCTION {format.in.ed.booktitle}\r
+{ format.booktitle duplicate$ empty$ 'skip$\r
+ {\r
+ format.bvolume duplicate$ empty$ 'pop$\r
+ { ", " swap$ * * }\r
+ if$\r
+ editor "editor" format.names.ed duplicate$ empty$ 'pop$\r
+ {\r
+ get.bbl.editor\r
+ %" " * swap$ *\r
+ * swap$ \r
+ "," *\r
+ " " * swap$\r
+ * }\r
+ if$\r
+ word.in swap$ *\r
+ }\r
+ if$\r
+}\r
+FUNCTION {empty.misc.check}\r
+{ author empty$ title empty$ howpublished empty$\r
+ month empty$ year empty$ note empty$\r
+ and and and and and\r
+ { "all relevant fields are empty in " cite$ * warning$ }\r
+ 'skip$\r
+ if$\r
+}\r
+FUNCTION {format.thesis.type}\r
+{ type duplicate$ empty$\r
+ 'pop$\r
+ { swap$ pop$\r
+ "t" change.case$ "type" bibinfo.check\r
+ }\r
+ if$\r
+}\r
+FUNCTION {format.tr.number}\r
+{ number "number" bibinfo.check\r
+ type duplicate$ empty$\r
+ { pop$ bbl.techrep }\r
+ 'skip$\r
+ if$\r
+ "type" bibinfo.check\r
+ swap$ duplicate$ empty$\r
+ { pop$ "t" change.case$ }\r
+ { tie.or.space.prefix * * }\r
+ if$\r
+}\r
+FUNCTION {format.article.crossref}\r
+{\r
+ key duplicate$ empty$\r
+ { pop$\r
+ journal duplicate$ empty$\r
+ { "need key or journal for " cite$ * " to crossref " * crossref * warning$ }\r
+ { "journal" bibinfo.check emphasize word.in swap$ * }\r
+ if$\r
+ }\r
+ { word.in swap$ * " " *}\r
+ if$\r
+ " \cite{" * crossref * "}" *\r
+}\r
+FUNCTION {format.crossref.editor}\r
+{ editor #1 "{vv~}{ll}" format.name$\r
+ "editor" bibinfo.check\r
+ editor num.names$ duplicate$\r
+ #2 >\r
+ { pop$\r
+ "editor" bibinfo.check\r
+ " " * bbl.etal\r
+ emphasize\r
+ *\r
+ }\r
+ { #2 <\r
+ 'skip$\r
+ { editor #2 "{ff }{vv }{ll}{ jj}" format.name$ "others" =\r
+ {\r
+ "editor" bibinfo.check\r
+ " " * bbl.etal\r
+ emphasize\r
+ *\r
+ }\r
+ {\r
+ bbl.and space.word\r
+ * editor #2 "{vv~}{ll}" format.name$\r
+ "editor" bibinfo.check\r
+ *\r
+ }\r
+ if$\r
+ }\r
+ if$\r
+ }\r
+ if$\r
+}\r
+FUNCTION {format.book.crossref}\r
+{ volume duplicate$ empty$\r
+ { "empty volume in " cite$ * "'s crossref of " * crossref * warning$\r
+ pop$ word.in\r
+ }\r
+ { bbl.volume\r
+ capitalize\r
+ swap$ tie.or.space.prefix "volume" bibinfo.check * * bbl.of space.word *\r
+ }\r
+ if$\r
+ editor empty$\r
+ editor field.or.null author field.or.null =\r
+ or\r
+ { key empty$\r
+ { series empty$\r
+ { "need editor, key, or series for " cite$ * " to crossref " *\r
+ crossref * warning$\r
+ "" *\r
+ }\r
+ { series emphasize * }\r
+ if$\r
+ }\r
+ { key * }\r
+ if$\r
+ }\r
+ { format.crossref.editor * }\r
+ if$\r
+ " \cite{" * crossref * "}" *\r
+}\r
+FUNCTION {format.incoll.inproc.crossref}\r
+{\r
+ editor empty$\r
+ editor field.or.null author field.or.null =\r
+ or\r
+ { key empty$\r
+ { format.booktitle duplicate$ empty$\r
+ { "need editor, key, or booktitle for " cite$ * " to crossref " *\r
+ crossref * warning$\r
+ }\r
+ { word.in swap$ * }\r
+ if$\r
+ }\r
+ { word.in key * " " *}\r
+ if$\r
+ }\r
+ { word.in format.crossref.editor * " " *}\r
+ if$\r
+ " \cite{" * crossref * "}" *\r
+}\r
+FUNCTION {format.org.or.pub}\r
+{ 't :=\r
+ ""\r
+ year empty$\r
+ { "empty year in " cite$ * warning$ }\r
+ 'skip$\r
+ if$\r
+ address empty$ t empty$ and\r
+ year empty$ and\r
+ 'skip$\r
+ {\r
+ t empty$\r
+ { address "address" bibinfo.check *\r
+ }\r
+ { t *\r
+ address empty$\r
+ 'skip$\r
+ { ": " * address "address" bibinfo.check * }\r
+ if$\r
+ }\r
+ if$\r
+ year empty$\r
+ 'skip$\r
+ { t empty$ address empty$ and\r
+ 'skip$\r
+ { ", " * }\r
+ if$\r
+ year "year" bibinfo.check\r
+ *\r
+ }\r
+ if$\r
+ }\r
+ if$\r
+}\r
+FUNCTION {format.publisher.address}\r
+{ publisher "publisher" bibinfo.warn format.org.or.pub\r
+}\r
+\r
+FUNCTION {format.organization.address}\r
+{ organization "organization" bibinfo.check format.org.or.pub\r
+}\r
+\r
+FUNCTION {article}\r
+{ output.bibitem\r
+ format.authors "author" output.check\r
+ add.fullstop\r
+ format.title "title" output.check\r
+ new.sentence\r
+ crossref missing$\r
+ {\r
+ journal\r
+ "journal" bibinfo.check\r
+ emphasize\r
+ "journal" output.check\r
+ add.blank\r
+ format.date "year" output.check\r
+ date.block\r
+ format.vol.num.pages output\r
+ }\r
+ { format.article.crossref output.nonnull\r
+ }\r
+ if$\r
+ eid empty$\r
+ { format.journal.pages }\r
+ { format.journal.eid }\r
+ if$\r
+ format.doi output\r
+ new.sentence\r
+ format.note output\r
+ fin.entry\r
+}\r
+FUNCTION {book}\r
+{ output.bibitem\r
+ author empty$\r
+ { format.editors "author and editor" output.check\r
+ add.fullstop\r
+ }\r
+ { format.authors output.nonnull\r
+ add.fullstop\r
+ crossref missing$\r
+ { "author and editor" editor either.or.check }\r
+ 'skip$\r
+ if$\r
+ }\r
+ if$\r
+ format.btitle "title" output.check\r
+ crossref missing$\r
+ { format.bvolume output\r
+ new.sentence\r
+ format.edition output\r
+ format.number.series output\r
+ format.publisher.address output\r
+ }\r
+ {\r
+ new.sentence\r
+ format.book.crossref output.nonnull\r
+ format.date "year" output.check\r
+ }\r
+ if$\r
+ format.doi output\r
+ new.sentence\r
+ format.note output\r
+ fin.entry\r
+}\r
+FUNCTION {booklet}\r
+{ output.bibitem\r
+ format.authors output\r
+ add.fullstop\r
+ format.title "title" output.check\r
+ new.sentence\r
+ howpublished "howpublished" bibinfo.check output\r
+ address "address" bibinfo.check output\r
+ format.date output\r
+ format.doi output\r
+ new.sentence\r
+ format.note output\r
+ fin.entry\r
+}\r
+\r
+FUNCTION {inbook}\r
+{ output.bibitem\r
+ author empty$\r
+ { format.editors "author and editor" output.check\r
+ add.fullstop\r
+ }\r
+ { format.authors output.nonnull\r
+ add.fullstop\r
+ crossref missing$\r
+ { "author and editor" editor either.or.check }\r
+ 'skip$\r
+ if$\r
+ }\r
+ if$\r
+ format.btitle "title" output.check\r
+ crossref missing$\r
+ {\r
+ format.bvolume output\r
+ format.chapter.pages "chapter and pages" output.check\r
+ new.sentence\r
+ format.edition output\r
+ format.number.series output\r
+ format.publisher.address output\r
+ }\r
+ {\r
+ format.chapter.pages "chapter and pages" output.check\r
+ new.sentence\r
+ format.book.crossref output.nonnull\r
+ }\r
+ if$\r
+ format.book.pages %AS"pages" output.check\r
+ format.doi output\r
+ new.sentence\r
+ format.note output\r
+ fin.entry\r
+}\r
+\r
+FUNCTION {incollection}\r
+{ output.bibitem\r
+ format.authors "author" output.check\r
+ add.fullstop\r
+ format.title "title" output.check\r
+ new.sentence\r
+ crossref missing$\r
+ { format.in.ed.booktitle "booktitle" output.check\r
+ add.fullstop\r
+ format.edition output\r
+ format.chapter.pages output\r
+ format.number.series output\r
+ format.publisher.address output\r
+ }\r
+ { format.incoll.inproc.crossref output.nonnull\r
+ format.chapter.pages output\r
+ }\r
+ if$\r
+ format.book.pages %AS"pages" output.check\r
+ format.doi output\r
+ new.sentence\r
+ format.note output\r
+ fin.entry\r
+}\r
+FUNCTION {inproceedings}\r
+{ output.bibitem\r
+ format.authors "author" output.check\r
+ add.fullstop\r
+ format.title "title" output.check\r
+ new.sentence\r
+ crossref missing$\r
+ { format.in.ed.booktitle "booktitle" output.check\r
+ format.number.series output\r
+ publisher empty$\r
+ { format.organization.address output }\r
+ { organization "organization" bibinfo.check output\r
+ format.publisher.address output\r
+ }\r
+ if$\r
+ }\r
+ { format.incoll.inproc.crossref output.nonnull\r
+ }\r
+ if$\r
+ format.book.pages %AS"pages" output.check\r
+ format.doi output\r
+ new.sentence\r
+ format.note output\r
+ fin.entry\r
+}\r
+FUNCTION {conference} { inproceedings }\r
+FUNCTION {manual}\r
+{ output.bibitem\r
+ author empty$\r
+ { organization "organization" bibinfo.check\r
+ duplicate$ empty$ 'pop$\r
+ { output\r
+ address "address" bibinfo.check output\r
+ }\r
+ if$\r
+ }\r
+ { format.authors output.nonnull }\r
+ if$\r
+ add.fullstop\r
+ format.btitle "title" output.check\r
+ new.sentence\r
+ author empty$\r
+ { organization empty$\r
+ {\r
+ address "address" bibinfo.check output\r
+ }\r
+ 'skip$\r
+ if$\r
+ }\r
+ {\r
+ organization "organization" bibinfo.check output\r
+ address "address" bibinfo.check output\r
+ }\r
+ if$\r
+ format.edition output\r
+ format.date output\r
+ format.doi output\r
+ new.sentence\r
+ format.note output\r
+ fin.entry\r
+}\r
+\r
+FUNCTION {mastersthesis}\r
+{ output.bibitem\r
+ format.authors "author" output.check\r
+ add.fullstop\r
+ format.title\r
+ "title" output.check\r
+ new.sentence\r
+ bbl.mthesis format.thesis.type output.nonnull\r
+ school "school" bibinfo.warn output\r
+ address "address" bibinfo.check output\r
+ format.date "year" output.check\r
+ format.doi output\r
+ new.sentence\r
+ format.note output\r
+ fin.entry\r
+}\r
+\r
+FUNCTION {misc}\r
+{ output.bibitem\r
+ format.authors output\r
+ add.fullstop\r
+ format.title output\r
+ new.sentence\r
+ howpublished "howpublished" bibinfo.check output\r
+ format.date output\r
+ format.doi output\r
+ new.sentence\r
+ format.note output\r
+ fin.entry\r
+ empty.misc.check\r
+}\r
+FUNCTION {phdthesis}\r
+{ output.bibitem\r
+ format.authors "author" output.check\r
+ add.fullstop\r
+ format.title\r
+ "title" output.check\r
+ new.sentence\r
+ bbl.phdthesis format.thesis.type output.nonnull\r
+ school "school" bibinfo.warn output\r
+ address "address" bibinfo.check output\r
+ format.date "year" output.check\r
+ format.doi output\r
+ new.sentence\r
+ format.note output\r
+ fin.entry\r
+}\r
+\r
+FUNCTION {proceedings}\r
+{ output.bibitem\r
+ editor empty$\r
+ { organization "organization" bibinfo.check output\r
+ }\r
+ { format.editors output.nonnull }\r
+ if$\r
+ add.fullstop\r
+ format.btitle "title" output.check\r
+ format.bvolume output\r
+ editor empty$\r
+ { publisher empty$\r
+ 'skip$\r
+ {\r
+ format.number.series output\r
+ format.publisher.address output\r
+ }\r
+ if$\r
+ }\r
+ { publisher empty$\r
+ {\r
+ format.organization.address output }\r
+ {\r
+ organization "organization" bibinfo.check output\r
+ format.publisher.address output\r
+ }\r
+ if$\r
+ }\r
+ if$\r
+ format.doi output\r
+ new.sentence\r
+ format.note output\r
+ fin.entry\r
+}\r
+\r
+FUNCTION {techreport}\r
+{ output.bibitem\r
+ format.authors "author" output.check\r
+ add.fullstop\r
+ format.title\r
+ "title" output.check\r
+ new.sentence\r
+ format.tr.number emphasize output.nonnull\r
+ institution "institution" bibinfo.warn output\r
+ address "address" bibinfo.check output\r
+ format.date "year" output.check\r
+ format.doi output\r
+ new.sentence\r
+ format.note output\r
+ fin.entry\r
+}\r
+\r
+FUNCTION {unpublished}\r
+{ output.bibitem\r
+ format.authors "author" output.check\r
+ add.fullstop\r
+ format.title "title" output.check\r
+ format.date output\r
+ format.doi output\r
+ new.sentence\r
+ format.note "note" output.check\r
+ fin.entry\r
+}\r
+\r
+FUNCTION {default.type} { misc }\r
+READ\r
+STRINGS { longest.label }\r
+INTEGERS { number.label longest.label.width }\r
+FUNCTION {initialize.longest.label}\r
+{ "" 'longest.label :=\r
+ #1 'number.label :=\r
+ #0 'longest.label.width :=\r
+}\r
+FUNCTION {longest.label.pass}\r
+{ number.label int.to.str$ 'label :=\r
+ number.label #1 + 'number.label :=\r
+ label width$ longest.label.width >\r
+ { label 'longest.label :=\r
+ label width$ 'longest.label.width :=\r
+ }\r
+ 'skip$\r
+ if$\r
+}\r
+EXECUTE {initialize.longest.label}\r
+ITERATE {longest.label.pass}\r
+FUNCTION {begin.bib}\r
+{ preamble$ empty$\r
+ 'skip$\r
+ { preamble$ write$ newline$ }\r
+ if$\r
+ "\begin{thebibliography}{" longest.label * "}" *\r
+ write$ newline$\r
+ "\providecommand{\url}[1]{\texttt{#1}}"\r
+ write$ newline$\r
+ "\providecommand{\urlprefix}{URL }"\r
+ write$ newline$\r
+ "\expandafter\ifx\csname urlstyle\endcsname\relax"\r
+ write$ newline$\r
+ " \providecommand{\doi}[1]{doi:\discretionary{}{}{}#1}\else"\r
+ write$ newline$\r
+ " \providecommand{\doi}{doi:\discretionary{}{}{}\begingroup \urlstyle{rm}\Url}\fi"\r
+ write$ newline$\r
+}\r
+EXECUTE {begin.bib}\r
+EXECUTE {init.state.consts}\r
+ITERATE {call.type$}\r
+FUNCTION {end.bib}\r
+{ newline$\r
+ "\end{thebibliography}" write$ newline$\r
+}\r
+EXECUTE {end.bib}\r
+%% End of customized bst file\r
+%%\r
+%% End of file `wileyj.bst'.\r
