diff options
Diffstat (limited to 'Master/texmf-dist/bibtex/bst/ams/amsrn.bst')
-rw-r--r-- | Master/texmf-dist/bibtex/bst/ams/amsrn.bst | 38 |
1 files changed, 15 insertions, 23 deletions
diff --git a/Master/texmf-dist/bibtex/bst/ams/amsrn.bst b/Master/texmf-dist/bibtex/bst/ams/amsrn.bst index 505f15b6d2d..f6ef540f1a3 100644 --- a/Master/texmf-dist/bibtex/bst/ams/amsrn.bst +++ b/Master/texmf-dist/bibtex/bst/ams/amsrn.bst @@ -9,9 +9,9 @@ %%% ==================================================================== %%% @BibTeX-source-file{ %%% filename = "amsxport.dtx", -%%% version = "2.00", -%%% date = "2004/06/28", -%%% time = "14:50:12 EDT", +%%% version = "2.01", +%%% date = "2007/10/01", +%%% time = "16:20:24 EDT", %%% author = "Michael J Downes", %%% address = "American Mathematical Society, %%% Publications Technical Group, @@ -24,7 +24,13 @@ %%% entries where most of the database structure is %%% retained. This is intended for processing by a smart %%% bibliography package such as the amsrefs package.", -%%% checksum = "40425 1822 6396 51551", +%%% copyright = "Copyright 2001, 2004 American Mathematical Society.", +%%% license = "Unlimited copying and redistribution of this file +%%% are permitted as long as this file is not +%%% modified. Modifications, and distribution of +%%% modified versions, are permitted, but only if +%%% the resulting file is renamed.", +%%% checksum = "09610 1810 6390 51580", %%% docstring = "The checksum field, produced by Robert Solovay's %%% checksum utility, gives CRC-16 checksum, lines, %%% words, and characters.", @@ -128,18 +134,6 @@ FUNCTION {sortify} { purify$ "l" change.case$ } -FUNCTION {rpad} { - swap$ - 'l := - l text.length$ - 'len := - { len #0 > } - { - l " " * 'l := - len #1 - 'len := - } - while$ - l -} FUNCTION {lpad} { swap$ 'l := @@ -522,15 +516,15 @@ FUNCTION {sort.format.names} { numnames 'namesleft := { namesleft #0 > } { ptr #1 > - { " " * } + { " " * } 'skip$ if$ - s ptr "{ll}{ ff}{ jj}" format.name$ 't := + s ptr "{vv{ } }{ll{ }}{ ff{ }}{ jj{ }}" format.name$ 't := ptr numnames = t "others" = AND { "et al" } { t sortify } if$ - #20 rpad * + * ptr #1 + 'ptr := namesleft #1 - 'namesleft := } @@ -612,7 +606,8 @@ FUNCTION {presort} { if$ } if$ - year field.or.null sortify #12 rpad * " " * + " " * + year field.or.null sortify * " " * title field.or.null sort.format.title * #1 entry.max$ substring$ 'sort.key$ := @@ -655,6 +650,3 @@ EXECUTE {begin.bib} ITERATE {call.type$} EXECUTE {end.bib} -%% -%% -%% End of file `amsrn.bst'. |