% ASME Transactions bibliography style (25-Aug-03 version) % Adapted from parts of unsrt, acm, and apalike, but: % Author names come out "Last, initials" as in acm and apalike; % Author name(s) are in \rm like apalike, not \sc as in acm; % Year follows name(s) of author(s) as in apalike, but not inside parentheses; % Periodical volume number is in \bf; % Periodical number is inside parentheses as in unsrt; % Pages use pp as in acm. % % History % 2/ 6/86 (HWT) Original `acm' version, by Howard Trickey. % 3/ 5/86 (HWT) Put in pp. everywhere but articles, as per ACM style. % 1/24/88 (OP&HWT) Updated for BibTeX version 0.99a, Oren Patashnik; % corrected the abbreviations to "Mar." and "Sept."; % SINCE THE `acm' VERSION ON WHICH THIS 'asmems4' % version WAS BASED DOES NOT WORK WITH BIBTEX 0.98i, % DON"T EXPECT 'asmems4' TO WORK WITH % BIBTEX 0.98i EITHER. % 1/1/03 (GRS) `acm' blended with 'unsrt' and 'apalike' to create % 'asmems4' % 8/25/03 (GRS) removed brackets surrounding month in article citations % 1/9/05 (GRS) modified article to: % remove space between volume and (number) % adjust spaces and commas for all number/month combinations % ensure journal is always italicized % put Thesis Title within quotes instead of italics % modified proceedings and inproceedings to % capitalize Vol. % uncapitalize ed. and eds. ENTRY { address author booktitle chapter edition editor howpublished institution journal key month note number organization pages publisher school series title type volume year } {} { label } 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$ } % asmems4 uses this function to % put the year after the author(s); % asmems4 ignores the month FUNCTION {output.year.check} { year empty$ { "empty year in " cite$ * warning$ } { write$ ", " year * "." * mid.sentence 'output.state := } if$ } FUNCTION {output.bibitem} { newline$ "\bibitem{" write$ cite$ write$ "}" write$ newline$ "" before.all 'output.state := } 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 {not} { { #0 } { #1 } if$ } FUNCTION {and} { 'skip$ { pop$ #0 } if$ } FUNCTION {or} { { pop$ #1 } 'skip$ if$ } FUNCTION {new.block.checka} { empty$ 'skip$ 'new.block 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$ "" } { "{\em " swap$ * "}" * } if$ } FUNCTION {emphasizeic} { duplicate$ empty$ { pop$ "" } { "{\em " swap$ * "\/}" * } if$ } FUNCTION {scapify} { duplic/|˗5WU`aO:rm3ec<w]׃ k[HGG򃟗t.Ebx1;[R4<$|9b؞h8,x\kS3z##@r`l3PqQntP>ٝ8% g#Ƀ } X\%x8BboB!p-réۈVNNMUu{szӓ&SQoy!޻Wy9jX RTVav] 16_k0aƅ# Y3c&BmDUB%؅!K7[+x+Ɂ)Ьht#j}:t^kre v%X$VF@]>4V{*Ya+ ѱ|"RpD+v,x뒳62.rOٓCjr0% y"j7EF(ZMp8[< 9)pNiG3Hc h>'7ɷ,Ai |e*[#>`nn: fZ]nUԿDQ¥&<;nJFGߋ5g(šɝVPZ«FAZ: "p5 8Wv3 ;8/t# ( L@U|& %XE8"009SQf| ÈYϥ8-" @K#SM{Z(-O Ѷm̡,ɏ-F[?/eVZBP/v45AA.HeNup *͠ǥzͣ%Dkc"wpffkhBb_'b0+Ě= S/Wj wy=%,  >USV/!\V\}q5I -ڹz+F HltTU6X\1G֮5_KfJSfG1(J׆} ij\geiA/?-zB%v3}.zk\pZ R U9Wߡ>MFY8)O<Ƞf劮ZNJ)'cqMᒰ;磩>e~YMDC /b545A:7=ffZFDg(#ԓQ,=So|"Ôfwm3\-Aqn5|ߜ"o@ 1dAkHCNBfH,$G$( JN)+>9.u%|%̛B#C~8 ]'Yi!Yv(n-65QjdBH0 wVqJw7b֧R}fLuliFGXΚPfڈXI=ۚl:} >5aMya#iVnEVŃ-Tx(V >o*̉U!F/t&NU1 ۫Y Gp5n\}849W^^w![[*P&= ewu:7`EΗp\u?\%KO)-lO5>5 pqrEQKb =<^zm{+sMySZϙB+4_B(~}ݯ>`.?1m0c7]mf-ݼʥvsu<|pI~+"uWUdnG!zbī:*:~zFbqϲ,١w[|kĵ*§/?y`l? dGń *7~FĒߔMՍ4l:bp/-,ǓC̏#h뮸\W˝ tˉzK]]Aεn Lzފ?[AB +:]b#Jj)7M!  --m ln?:343JATn7=}#9}mԘ)i4}\gB2Thc($^dmi h$q&v0eƙ,YBKb"gs "f&31JgqgΘL2S2:Aϰ" ' o+h}MͮU,!PL,ߝn&=Pe2FhJ5$ǐl7f^3axdyx8vs9|S_VcLq-{quXְTS6N!D1%3鑴g|YM1QQ G~*gE-W;LTXSIsJBu\4"ȰO}B:y0bI#Dp [8_x#+ݪ㕜?GV:"_%Clʻ2cX*y/w!,JV9Su{l\;R176aDNS5}_1(^ RS_"8Ujs.ǩ==u9^QR[VTӜ,Xʸ8wk(Ny1VK~F:Muyq3g38K@>˾R@iSiE{5EZqѷA-J{I'<a6UF! >> Z8MRm?MҦEˡFMi P/<<#"2tC8mVfru{pe_>I60$[R;{m2( c} :+c?vj'f>pd}4J貣B:X1Numji|[xԍ$ET+=ҳr$Wink8ݽ.I9#7X!nMr#u O1C7w*T5Q_Z(T5zW\iw̅湍;{ӼJ ]il >R:bd#h12FjL i8o+ۋ㮺=eEY]첾y~فMћm2RBT¬0N Me3;S4 4JM"i`4t?(GX?1 sӫC3/n%x.|*e>sʏ waʛ[|ȅڿJQ%;0 ^SC`c+V?8${0k~l#Ƴb /M}?J7%ȑ:vWF%__/XxGsFϧ;֕#~̰+AJS]!oqe|],4O8Oi.\xf}j521*y{svrS7(r[,E3E`gUN\;C@Zޓ/Iz$!'}U0ߵ 6eJ,:|%장(kU@hʏ:RJBtqrrOlQ T:$?Mtir, gzZ教LY\^m߆qRi؆@UK j$|G.(#i$KbUGZY0"grqQZ~P1}5$d9!Z4$=U'b6Ǯͳ(}K&!xYG m!2L Vt'ugXGoc;a._οT>ZpybCU@,h37z2*IV"Vٶ3(`v;( X+EXc_! &;>` KV'r} ڏ>: d(kwV_^7>;xةqQ /f m({%xr2}Fxnx:NhdžPZ z#=އ_iae[`dsD ;#؂ݧTەtMÙkrɷDP5Jw_&8- ԊF8-7SGa TS;w6j<\+%-7=G0ãW3ՄQFҫTuu6ʷ^'RG1tu~03̆Կ_ FMa˂!dY2$ 5_IJ9ס۱QT/Rbdo J"KV-"T @7] } % { nameptr #1 > % { " " * } % 'skip$ % if$ % s nameptr "{vv{ } }{ll{ }}{ f{ }}{ jj{ }}" format.name$ 't := % nameptr numnames = t "others" = and % { "et al" * } % { t sortify * } % if$ % nameptr #1 + 'nameptr := % namesleft #1 - 'namesleft := % } % while$ %} %FUNCTION {sort.format.title} %{ 't := % "A " #2 % "An " #3 % "The " #4 t chop.word % chop.word % chop.word % sortify % #1 global.max$ substring$ %} %FUNCTION {author.sort} %{ author empty$ % { key empty$ % { "to sort, need author or key in " cite$ * warning$ % "" % } % { key sortify } % if$ % } % { author sort.format.names } % if$ %} %FUNCTION {author.editor.sort} %{ author empty$ % { editor empty$ % { key empty$ % { "to sort, need author, editor, or key in " cite$ * warning$ % "" % } % { key sortify } % if$ % } % { editor sort.format.names } % if$ % } % { author sort.format.names } % if$ %} %FUNCTION {author.organization.sort} %{ author empty$ % { organization empty$ % { key empty$ % { "to sort, need author, organization, or key in " cite$ * warning$ % "" % } % { key sortify } % if$ % } % { "The " #4 organization chop.word sortify } % if$ % } % { author sort.format.names } % if$ %} %FUNCTION {editor.organization.sort} %{ editor empty$ % { organization empty$ % { key empty$ % { "to sort, need editor, organization, or key in " cite$ * warning$ % "" % } % { key sortify } % if$ % } % { "The " #4 organization chop.word sortify } % if$ % } % { editor sort.format.names } % if$ %} %FUNCTION {presort} %{ type$ "book" = % type$ "inbook" = % or % 'author.editor.sort % { type$ "proceedings" = % 'editor.organization.sort % { type$ "manual" = % 'author.organization.sort % 'author.sort % if$ % } % if$ % } % if$ % " " % * % year field.or.null sortify % * % " " % * % title field.or.null % sort.format.title % * % #1 entry.max$ substring$ % TeK}zUK_n4D7 {%Yz#9vu)ZKK±R]hXd8"QLys'u$P (kW|9Mk*!Kl-IYH7{9)BR+RZ@we,Ǟ|QBB.:?Esu\u܈h=cTKM<'f#gTdk4 !gC4TArx2wҥf4&o¡\533C#_lgtħ9L_m` gYM“J9w=Җ: -ۋE'|DZfmh2p6K۔H킡U Ս=S-F"zR9XġhܾK"Fi4e|Jcr}HJx\,63_JdejxD-Uݗt)VuAj#WNSF5Pf{+4|ޫM*s#O!~/e]jel&U皎T B37dˡ=Y%ڡq$ͤzJ1h\D{6~\]BDgE@Oұc*a)MQIL b$sz 䃤]xÖsK8d1SaJ^eku%Iۯ~t ~9PbkH7`K-\K-=צZXB /hswYꚸV1{Q48k ;ϱ,ͯ{(o8M_re񙄷 3&Nba'$d[k ,1B zt;;7S3OO%h9`~IW;vz:+_yS`rUFfgIC\19