File: amsbook.perl

package info (click to toggle)
latex2html 2023-debian1-1
  • links: PTS, VCS
  • area: main
  • in suites: bookworm
  • size: 6,924 kB
  • sloc: perl: 34,024; makefile: 437; sh: 32
file content (137 lines) | stat: -rw-r--r-- 3,695 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
131
132
133
134
135
136
137
# amsbook.perl by Ross Moore <ross@mpce.mq.edu.au>  09-30-97
#
# Extension to LaTeX2HTML V97.1 to support the "AMS book" 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_amsbook_10pt{}
sub do_amsbook_11pt{}
sub do_amsbook_12pt{}
sub do_amsbook_8pt{}
sub do_amsbook_9pt{}
sub do_amsbook_a4paper{}
sub do_amsbook_a5paper{}
sub do_amsbook_b5paper{}
sub do_amsbook_legalpaper{}
sub do_amsbook_letterpaper{}
sub do_amsbook_executivepaper{}
sub do_amsbook_landscape{}
sub do_amsbook_portrait{}
sub do_amsbook_final{}
sub do_amsbook_draft{}
sub do_amsbook_oneside{}
sub do_amsbook_twoside{}
sub do_amsbook_openright{}
sub do_amsbook_openany{}
sub do_amsbook_onecolumn{}
sub do_amsbook_twocolumn{}
sub do_amsbook_notitlepage{}
sub do_amsbook_titlepage{}
sub do_amsbook_openbib{}

sub do_amsbook_nomath{}

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

sub do_amsbook_psamsfonts{
    &do_amsfonts_psamsfonts() if (defined &do_amsfonts_psamsfonts);
    $styles_loaded{'noamsfonts'} = 1; }

sub do_amsbook_centertags{&do_amstex_centertags()}
sub do_amsbook_tbtags{&do_amstex_tbtags()}
sub do_amsbook_leqno{&do_amstex_leqno()}
sub do_amsbook_reqno{&do_amstex_reqno()}
sub do_amsbook_fleqno{&do_amstex_fleqno()}

sub do_amsbook_makeidx{ &do_require_package('makeidx') }


sub do_cmd_thechapter {
    local($_) = @_;
    join('', &do_cmd_arabic('<<0>>chapter<<0>>'), $_);
}
sub do_cmd_thesection {
    local($_) = @_; 
    join('', &translate_commands("\\thechapter")
	,".", &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>>'), $_);
}


&addto_dependents('chapter','equation');
&addto_dependents('chapter','footnote');

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

sub do_cmd_thefootnote {
    local($_) = @_;
    join('',&translate_commands("\\thechapter")
        ,"." , &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