summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/bibtex/bst/base/siam.bst
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/bibtex/bst/base/siam.bst')
-rw-r--r--Master/texmf-dist/bibtex/bst/base/siam.bst310
1 files changed, 158 insertions, 152 deletions
diff --git a/Master/texmf-dist/bibtex/bst/base/siam.bst b/Master/texmf-dist/bibtex/bst/base/siam.bst
index 86b86d984f8..ce88b41e416 100644
--- a/Master/texmf-dist/bibtex/bst/base/siam.bst
+++ b/Master/texmf-dist/bibtex/bst/base/siam.bst
@@ -1,13 +1,19 @@
-% SIAM bibliography style (29-Jan-88 version)
+% Copyright (C) 1986, 1987, 1988, 2010 Howard Trickey and Oren Patashnik.
+% Unlimited copying and redistribution of this file are permitted as long as
+% it is unmodified. Modifications (and redistribution of modified versions)
+% are also permitted, but only if the resulting file is renamed.
+%
+% SIAM bibliography style (8-Dec-10 version)
% numeric labels, alphabetic order, Mathematical Reviews abbreviations,
% names in \sc, titles in italics, book titles mixed upper-lower and article
% titles lowercase, commas separate all fields except before "notes".
%
% History
-% 1/30/86 (HWT) Original version, by Howard Trickey.
-% 6/15/87 (HWT) Fix format.editors---Martin Costabel.
-% 1/29/88 (OP&HWT) Updated for BibTeX version 0.99a, Oren Patashnik;
-% THIS `siam' VERSION DOES NOT WORK WITH BIBTEX 0.98i.
+% 1/30/86 (HWT) Original version, by Howard Trickey.
+% 6/15/87 (HWT) Fix format.editors---Martin Costabel.
+% 1/29/88 (OP&HWT) Updated for BibTeX version 0.99a, Oren Patashnik;
+% THIS `siam' VERSION DOES NOT WORK WITH BIBTEX 0.98i.
+% 12/ 8/10 (OP&HWT) Clarify license.
ENTRY
{ address
@@ -51,11 +57,11 @@ FUNCTION {output.nonnull}
output.state mid.sentence =
{ ", " * write$ }
{ output.state after.block =
- { add.period$ write$
- newline$
- "\newblock " write$
- }
- 'write$
+ { add.period$ write$
+ newline$
+ "\newblock " write$
+ }
+ 'write$
if$
mid.sentence 'output.state :=
}
@@ -157,20 +163,20 @@ FUNCTION {format.names}
{ namesleft #0 > }
{ s nameptr "{f.~}{vv~}{ll}{, jj}" format.name$ 't :=
nameptr #1 >
- { namesleft #1 >
- { ", " * t * }
- { numnames #2 >
- { "," * }
- 'skip$
- if$
- t "others" =
- { " et~al." * }
- { " and " * t * }
- if$
- }
- if$
- }
- 't
+ { namesleft #1 >
+ { ", " * t * }
+ { numnames #2 >
+ { "," * }
+ 'skip$
+ if$
+ t "others" =
+ { " et~al." * }
+ { " and " * t * }
+ if$
+ }
+ if$
+ }
+ 't
if$
nameptr #1 + 'nameptr :=
namesleft #1 - 'namesleft :=
@@ -219,11 +225,11 @@ FUNCTION {format.editors}
}
{ editor last.authors =
{ "\leavevmode\vrule height 2pt depth -1.6pt width 23pt" }
- { editor format.names scapify }
+ { editor format.names scapify }
if$
editor num.names$ #1 >
{ ", eds." * }
- { ", ed." * }
+ { ", ed." * }
if$
editor 'last.authors :=
}
@@ -235,8 +241,8 @@ FUNCTION {format.ineditors}
{ "" }
{ editor format.names
editor num.names$ #1 >
- { ", eds." * }
- { ", ed." * }
+ { ", eds." * }
+ { ", ed." * }
if$
}
if$
@@ -254,21 +260,21 @@ FUNCTION {n.dashify}
""
{ t empty$ not }
{ t #1 #1 substring$ "-" =
- { t #1 #2 substring$ "--" = not
- { "--" *
- t #2 global.max$ substring$ 't :=
- }
- { { t #1 #1 substring$ "-" = }
- { "-" *
- t #2 global.max$ substring$ 't :=
- }
- while$
- }
- if$
- }
- { t #1 #1 substring$ *
- t #2 global.max$ substring$ 't :=
- }
+ { t #1 #2 substring$ "--" = not
+ { "--" *
+ t #2 global.max$ substring$ 't :=
+ }
+ { { t #1 #1 substring$ "-" = }
+ { "-" *
+ t #2 global.max$ substring$ 't :=
+ }
+ while$
+ }
+ if$
+ }
+ { t #1 #1 substring$ *
+ t #2 global.max$ substring$ 't :=
+ }
if$
}
while$
@@ -277,15 +283,15 @@ FUNCTION {n.dashify}
FUNCTION {format.date}
{ year empty$
{ month empty$
- { "" }
- { "there's a month but no year in " cite$ * warning$
- month
- }
+ { "" }
+ { "there's a month but no year in " cite$ * warning$
+ month
+ }
if$
}
{ month empty$
- 'year
- { month " " * year * }
+ 'year
+ { month " " * year * }
if$
}
if$
@@ -315,8 +321,8 @@ FUNCTION {format.bvolume}
{ "" }
{ "vol.~" volume *
series empty$
- 'skip$
- { " of " * series * }
+ 'skip$
+ { " of " * series * }
if$
"volume and number" number either.or.check
}
@@ -326,13 +332,13 @@ FUNCTION {format.bvolume}
FUNCTION {format.number.series}
{ volume empty$
{ number empty$
- { series field.or.null }
- { "no.~" number *
- series empty$
- { "there's a number but no series in " cite$ * warning$ }
- { " in " * series * }
- if$
- }
+ { series field.or.null }
+ { "no.~" number *
+ series empty$
+ { "there's a number but no series in " cite$ * warning$ }
+ { " in " * series * }
+ if$
+ }
if$
}
{ "" }
@@ -360,8 +366,8 @@ FUNCTION {multi.page.check}
swap$ duplicate$ "," =
swap$ "+" =
or or
- { #1 'multiresult := }
- { t #2 global.max$ substring$ 't := }
+ { #1 'multiresult := }
+ { t #2 global.max$ substring$ 't := }
if$
}
while$
@@ -372,8 +378,8 @@ FUNCTION {format.pages}
{ pages empty$
{ "" }
{ pages multi.page.check
- { "pp.~" pages n.dashify * }
- { "p.~" pages * }
+ { "pp.~" pages n.dashify * }
+ { "p.~" pages * }
if$
}
if$
@@ -391,12 +397,12 @@ FUNCTION {format.chapter.pages}
{ chapter empty$
'format.pages
{ type empty$
- { "ch.~" chapter * }
- { type "l" change.case$ chapter tie.or.space.connect }
+ { "ch.~" chapter * }
+ { type "l" change.case$ chapter tie.or.space.connect }
if$
pages empty$
- 'skip$
- { ", " * format.pages * }
+ 'skip$
+ { ", " * format.pages * }
if$
}
if$
@@ -406,8 +412,8 @@ FUNCTION {format.in.ed.booktitle}
{ booktitle empty$
{ "" }
{ editor empty$
- { "in " booktitle * }
- { "in " booktitle * ", " * format.ineditors * }
+ { "in " booktitle * }
+ { "in " booktitle * ", " * format.ineditors * }
if$
}
if$
@@ -446,11 +452,11 @@ FUNCTION {format.tr.number}
FUNCTION {format.article.crossref}
{ key empty$
{ journal empty$
- { "need key or journal for " cite$ * " to crossref " * crossref *
- warning$
- ""
- }
- { "in " journal * }
+ { "need key or journal for " cite$ * " to crossref " * crossref *
+ warning$
+ ""
+ }
+ { "in " journal * }
if$
}
{ "in " key * }
@@ -464,12 +470,12 @@ FUNCTION {format.crossref.editor}
#2 >
{ pop$ " et~al." * }
{ #2 <
- 'skip$
- { editor #2 "{ff }{vv }{ll}{ jj}" format.name$ "others" =
- { " et~al." * }
- { " and " * editor #2 "{vv~}{ll}" format.name$ * }
- if$
- }
+ 'skip$
+ { editor #2 "{ff }{vv }{ll}{ jj}" format.name$ "others" =
+ { " et~al." * }
+ { " and " * editor #2 "{vv~}{ll}" format.name$ * }
+ if$
+ }
if$
}
if$
@@ -488,15 +494,15 @@ FUNCTION {format.book.crossref}
editor field.or.null author field.or.null =
or
{ key empty$
- { series empty$
- { "need editor, key, or series for " cite$ * " to crossref " *
- crossref * warning$
- "" *
- }
- { series * }
- if$
- }
- { key * }
+ { series empty$
+ { "need editor, key, or series for " cite$ * " to crossref " *
+ crossref * warning$
+ "" *
+ }
+ { series * }
+ if$
+ }
+ { key * }
if$
}
{ format.crossref.editor * }
@@ -509,15 +515,15 @@ FUNCTION {format.incoll.inproc.crossref}
editor field.or.null author field.or.null =
or
{ key empty$
- { booktitle empty$
- { "need editor, key, or booktitle for " cite$ * " to crossref " *
- crossref * warning$
- ""
- }
- { "in " booktitle * }
- if$
- }
- { "in " key * }
+ { booktitle empty$
+ { "need editor, key, or booktitle for " cite$ * " to crossref " *
+ crossref * warning$
+ ""
+ }
+ { "in " booktitle * }
+ if$
+ }
+ { "in " key * }
if$
}
{ "in " format.crossref.editor * }
@@ -547,8 +553,8 @@ FUNCTION {book}
{ format.editors "author and editor" output.check }
{ format.authors output.nonnull
crossref missing$
- { "author and editor" editor either.or.check }
- 'skip$
+ { "author and editor" editor either.or.check }
+ 'skip$
if$
}
if$
@@ -587,8 +593,8 @@ FUNCTION {inbook}
{ format.editors "author and editor" output.check }
{ format.authors output.nonnull
crossref missing$
- { "author and editor" editor either.or.check }
- 'skip$
+ { "author and editor" editor either.or.check }
+ 'skip$
if$
}
if$
@@ -639,15 +645,15 @@ FUNCTION {inproceedings}
format.bvolume output
format.number.series output
address empty$
- { organization output
- publisher output
- format.date "year" output.check
- }
- { address output.nonnull
- format.date "year" output.check
- organization output
- publisher output
- }
+ { organization output
+ publisher output
+ format.date "year" output.check
+ }
+ { address output.nonnull
+ format.date "year" output.check
+ organization output
+ publisher output
+ }
if$
}
{ format.incoll.inproc.crossref output.nonnull }
@@ -729,8 +735,8 @@ FUNCTION {proceedings}
format.number.series output
address empty$
{ editor empty$
- 'skip$
- { organization output }
+ 'skip$
+ { organization output }
if$
publisher output
format.date "year" output.check
@@ -738,8 +744,8 @@ FUNCTION {proceedings}
{ address output.nonnull
format.date "year" output.check
editor empty$
- 'skip$
- { organization output }
+ 'skip$
+ { organization output }
if$
publisher output
}
@@ -865,13 +871,13 @@ FUNCTION {sort.format.names}
numnames 'namesleft :=
{ namesleft #0 > }
{ nameptr #1 >
- { " " * }
- 'skip$
+ { " " * }
+ 'skip$
if$
s nameptr "{vv{ } }{ll{ }}{ f{ }}{ jj{ }}" format.name$ 't :=
nameptr numnames = t "others" = and
- { "et al" * }
- { t sortify * }
+ { "et al" * }
+ { t sortify * }
if$
nameptr #1 + 'nameptr :=
namesleft #1 - 'namesleft :=
@@ -893,10 +899,10 @@ FUNCTION {sort.format.title}
FUNCTION {author.sort}
{ author empty$
{ key empty$
- { "to sort, need author or key in " cite$ * warning$
- ""
- }
- { key sortify }
+ { "to sort, need author or key in " cite$ * warning$
+ ""
+ }
+ { key sortify }
if$
}
{ author sort.format.names }
@@ -906,14 +912,14 @@ FUNCTION {author.sort}
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 }
+ { key empty$
+ { "to sort, need author, editor, or key in " cite$ * warning$
+ ""
+ }
+ { key sortify }
+ if$
+ }
+ { editor sort.format.names }
if$
}
{ author sort.format.names }
@@ -923,14 +929,14 @@ FUNCTION {author.editor.sort}
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 }
+ { 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 }
@@ -940,14 +946,14 @@ FUNCTION {author.organization.sort}
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 }
+ { 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 }
@@ -960,12 +966,12 @@ FUNCTION {presort}
or
'author.editor.sort
{ type$ "proceedings" =
- 'editor.organization.sort
- { type$ "manual" =
- 'author.organization.sort
- 'author.sort
- if$
- }
+ 'editor.organization.sort
+ { type$ "manual" =
+ 'author.organization.sort
+ 'author.sort
+ if$
+ }
if$
}
if$