File: amsart.perl

package info (click to toggle)
latex2html 2015-debian1-1
  • links: PTS
  • area: main
  • in suites: stretch
  • size: 7,652 kB
  • ctags: 3,386
  • sloc: perl: 30,941; makefile: 429; sh: 155
file content (130 lines) | stat: -rw-r--r-- 3,363 bytes parent folder | download | duplicates (13)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
# amsart.perl by Ross Moore <ross@mpce.mq.edu.au>  10-01-97
#
# Extension to LaTeX2HTML V97.1 to support the "AMS article" document class
# and standard LaTeX2e class options.
#
# Change Log:
# ===========

package main;

&do_require_package('amstex');

&do_require_package('amsfonts');

# Suppress option-warning messages:

sub do_amsart_10pt{}
sub do_amsart_11pt{}
sub do_amsart_12pt{}
sub do_amsart_8pt{}
sub do_amsart_9pt{}
sub do_amsart_a4paper{}
sub do_amsart_a5paper{}
sub do_amsart_b5paper{}
sub do_amsart_legalpaper{}
sub do_amsart_letterpaper{}
sub do_amsart_executivepaper{}
sub do_amsart_landscape{}
sub do_amsart_portrait{}
sub do_amsart_final{}
sub do_amsart_draft{}
sub do_amsart_e_only{}
sub do_amsart_oneside{}
sub do_amsart_twoside{}
sub do_amsart_openright{}
sub do_amsart_openany{}
sub do_amsart_onecolumn{}
sub do_amsart_twocolumn{}
sub do_amsart_notitlepage{}
sub do_amsart_titlepage{}
sub do_amsart_openbib{}

sub do_amsart_nomath{}

sub do_amsart_noamsfonts{
    &do_amsfonts_noamsfonts() if (defined &do_amsfonts_noamsfonts);
    $styles_loaded{'noamsfonts'} = 1; };

sub do_amsart_psamsfonts{
    &do_amsfonts_psamsfonts() if (defined &do_amsfonts_psamsfonts);
    $styles_loaded{'psamsfonts'} = 1; };

sub do_amsart_centertags{&do_amstex_centertags()}
sub do_amsart_tbtags{&do_amstex_tbtags()}
sub do_amsart_leqno{&do_amstex_leqno()}
sub do_amsart_reqno{&do_amstex_reqno()}
sub do_amsart_fleqno{&do_amstex_fleqno()}

sub do_amsart_makeidx{ &do_require_package('makeidx') }


sub do_cmd_thesection {
    local($_) = @_;
    join('', &do_cmd_arabic('<<0>>section<<0>>'), $_);
}
sub do_cmd_thesubsection {
    local($_) = @_;
    join('',&translate_commands("\\thesection")
	,"." , &do_cmd_arabic('<<0>>subsection<<0>>'), $_);
}
sub do_cmd_thesubsubsection {
    local($_) = @_;
    join('',&translate_commands("\\thesubsection")
	,"." , &do_cmd_arabic('<<0>>subsubsection<<0>>'), $_);
}
sub do_cmd_theparagraph {
    local($_) = @_;
    join('',&translate_commands("\\thesubsubsection")
	,"." , &do_cmd_arabic('<<0>>paragraph<<0>>'), $_);
}



sub do_cmd_theequation {
    local($_) = @_;
    join('', &do_cmd_arabic('<<0>>equation<<0>>'), $_);
}

sub do_cmd_thefootnote {
    local($_) = @_;
    join('', &do_cmd_arabic('<<0>>footnote<<0>>'), $_);
}

sub do_cmd_textprime {
    local($_) = @_;
    local($this) = &process_in_latex("\$\\scriptsize{\\prime}\$");
    "<SUP>".$this."</SUP>".$_;
}

sub do_cmd_partname { $part_name . @_[0] }
sub do_cmd_indexname { $idx_title . @_[0] }
sub do_cmd_appendixname { $app_title . @_[0] }
sub do_cmd_abstractname { $abs_title . @_[0] }
sub do_cmd_refname { $ref_title . @_[0] }
sub do_cmd_bibname { $bib_title . @_[0] }
sub do_cmd_figurename { $fig_name . @_[0] }
sub do_cmd_tablename { $tab_name . @_[0] }
sub do_cmd_proofname { $prf_name . @_[0] }
sub do_cmd_contentsname { $toc_title . @_[0] }
sub do_cmd_listfigurename { $lof_title . @_[0] }
sub do_cmd_listtablename { $lot_title . @_[0] }

$key_title = "Key words and phrases";
$sbj_title = "1991 Mathematics Subject Classification";

sub do_cmd_keywordsname { $key_title . @_[0] }
sub do_cmd_subjclasssname { $sbj_title . @_[0] }
    
%section_commands = (
	'indexchap' , '2'
	,'specialsection' , '3'
	, %section_commands);

%section_headings = (
	'indexchap' , 'H1'
	,'specialsection' , 'H1'
	, %section_headings);


1;	# Must be last line