aboutsummaryrefslogtreecommitdiffstats
path: root/lib/docbuilder/src/docb_html_util_iso.erl
diff options
context:
space:
mode:
authorErlang/OTP <[email protected]>2009-11-20 14:54:40 +0000
committerErlang/OTP <[email protected]>2009-11-20 14:54:40 +0000
commit84adefa331c4159d432d22840663c38f155cd4c1 (patch)
treebff9a9c66adda4df2106dfd0e5c053ab182a12bd /lib/docbuilder/src/docb_html_util_iso.erl
downloadotp-84adefa331c4159d432d22840663c38f155cd4c1.tar.gz
otp-84adefa331c4159d432d22840663c38f155cd4c1.tar.bz2
otp-84adefa331c4159d432d22840663c38f155cd4c1.zip
The R13B03 release.OTP_R13B03
Diffstat (limited to 'lib/docbuilder/src/docb_html_util_iso.erl')
-rw-r--r--lib/docbuilder/src/docb_html_util_iso.erl204
1 files changed, 204 insertions, 0 deletions
diff --git a/lib/docbuilder/src/docb_html_util_iso.erl b/lib/docbuilder/src/docb_html_util_iso.erl
new file mode 100644
index 0000000000..c836805cd2
--- /dev/null
+++ b/lib/docbuilder/src/docb_html_util_iso.erl
@@ -0,0 +1,204 @@
+%% ``The contents of this file are subject to the Erlang Public License,
+%% Version 1.1, (the "License"); you may not use this file except in
+%% compliance with the License. You should have received a copy of the
+%% Erlang Public License along with this software. If not, it can be
+%% retrieved via the world wide web at http://www.erlang.org/.
+%%
+%% Software distributed under the License is distributed on an "AS IS"
+%% basis, WITHOUT WARRANTY OF ANY KIND, either expressed or implied. See
+%% the License for the specific language governing rights and limitations
+%% under the License.
+%%
+%% The Initial Developer of the Original Code is Ericsson Utvecklings AB.
+%% Portions created by Ericsson are Copyright 1999-2000, Ericsson
+%% Utvecklings AB. All Rights Reserved.''
+%%
+%% $Id$
+%%
+-module(docb_html_util_iso).
+-export([entity_to_html/1]).
+
+%% Encodes ISOtech, ISOnum and ISOgrk3.
+%%
+%% All entities are of the form "[abcdef]".
+%%
+entity_to_html(Entity) when is_list(Entity), hd(Entity) =/= $[ ->
+ Entity;
+entity_to_html(Entity) ->
+ case (catch enc(Entity)) of
+ {'EXIT', _} ->
+ Entity;
+ Enc ->
+ "<font face=symbol>" ++ Enc ++ "</font>"
+ end.
+
+enc("[Delta ]") -> "&#68;";
+%% enc("[Dot ]") -> "&#0;";
+%% enc("[DotDot]") -> "&#0;";
+enc("[Gamma ]") -> "&#71;";
+enc("[Lambda]") -> "&#76;";
+enc("[Omega ]") -> "&#87;";
+enc("[Phi ]") -> "&#70;";
+enc("[Pi ]") -> "&#80;";
+enc("[Prime ]") -> "&#178;";
+enc("[Psi ]") -> "&#89;";
+enc("[Sigma ]") -> "&#83;";
+enc("[Theta ]") -> "&#81;";
+enc("[Upsi ]") -> "&#161;";
+%% enc("[Verbar]") -> "&#0;";
+enc("[Xi ]") -> "&#88;";
+
+enc("[aleph ]") -> "&#192;";
+enc("[alpha ]") -> "&#97;";
+enc("[amp ]") -> "&#38;";
+enc("[and ]") -> "&#217;";
+enc("[ang ]") -> "&#208;";
+%% enc("[ang90 ]") -> "&#0;";
+%% enc("[angsph]") -> "&#0;";
+%% enc("[angst ]") -> "&#0;";
+enc("[ap ]") -> "&#187;";
+
+%% enc("[becaus]") -> "&#0;";
+%% enc("[bernou]") -> "&#0;";
+enc("[bepsi ]") -> "&#39;";
+enc("[beta ]") -> "&#98;";
+enc("[bottom]") -> "&#94;";
+enc("[bull ]") -> "&#183;";
+
+enc("[cap ]") -> "&#199;";
+enc("[chi ]") -> "&#99;";
+enc("[clubs ]") -> "&#167;";
+%% enc("[compfn]") -> "&#0;";
+enc("[cong ]") -> "&#64;";
+enc("[copy ]") -> "&#211;";
+%% enc("[conint]") -> "&#0;";
+enc("[cup ]") -> "&#200;";
+
+enc("[dArr ]") -> "&#223;";
+enc("[darr ]") -> "&#175;";
+enc("[deg ]") -> "&#176;";
+enc("[delta ]") -> "&#100;";
+enc("[diam ]") -> "&#224;";
+enc("[diams ]") -> "&#168;";
+enc("[divide]") -> "&#184;";
+
+enc("[empty ]") -> "&#198;";
+%% enc("[epsi ]") -> "&#0;";
+%% enc("[epsis ]") -> "&#0;";
+enc("[epsiv ]") -> "&#101;";
+enc("[equiv ]") -> "&#186;";
+enc("[eta ]") -> "&#104;";
+enc("[exist ]") -> "&#36;";
+
+enc("[fnof ]") -> "&#166;";
+enc("[forall]") -> "&#34;";
+
+enc("[gamma ]") -> "&#103;";
+%% enc("[gammad]") -> "&#0;";
+enc("[ge ]") -> "&#179;";
+enc("[gt ]") -> "&#62;";
+
+%% enc("[hamilt]") -> "&#0;";
+enc("[hArr ]") -> "&#219;";
+enc("[harr ]") -> "&#171;";
+enc("[hearts]") -> "&#169;";
+enc("[horbar]") -> "&#190;";
+
+enc("[iff ]") -> "&#219;";
+enc("[image ]") -> "&#193;";
+enc("[infin ]") -> "&#165;";
+enc("[int ]") -> "&#242;";
+enc("[iota ]") -> "&#105;";
+enc("[isin ]") -> "&#206;";
+
+enc("[kappa ]") -> "&#107;";
+%%enc("[kappav]") -> "&#0;";
+
+enc("[lArr ]") -> "&#220;";
+%% enc("[lagran]") -> "&#0;";
+enc("[lambda]") -> "&#108;";
+enc("[lang ]") -> "&#225;";
+enc("[larr ]") -> "&#172;";
+enc("[le ]") -> "&#163;";
+%% enc("[lowast]") -> "&#0;";
+enc("[lowbar]") -> "&#95;";
+enc("[lt ]") -> "&#60;";
+
+enc("[middot]") -> "&#215;";
+enc("[minus ]") -> "&#45;";
+%% enc("[mnplus]") -> "&#0;";
+enc("[mu ]") -> "&#109;";
+
+enc("[nabla ]") -> "&#209;";
+enc("[ne ]") -> "&#185;";
+enc("[ni ]") -> "&#39;";
+enc("[nsub ]") -> "&#203;";
+enc("[not ]") -> "&#216;";
+enc("[notin ]") -> "&#207;";
+enc("[nu ]") -> "&#110;";
+
+enc("[omega ]") -> "&#119;";
+enc("[or ]") -> "&#218;";
+%% enc("[order ]") -> "&#0;";
+enc("[oplus ]") -> "&#197;";
+enc("[otimes]") -> "&#196;";
+
+%% enc("[par ]") -> "&#0;";
+enc("[part ]") -> "&#182;";
+%% enc("[permil]") -> "&#0;";
+enc("[perp ]") -> "&#94;"; % bottom
+enc("[phis ]") -> "&#102;";
+enc("[phiv ]") -> "&#106;";
+%% enc("[phmmat]") -> "&#0;";
+enc("[pi ]") -> "&#112;";
+enc("[piv ]") -> "&#118;";
+enc("[plus ]") -> "&#43;";
+enc("[plusmn]") -> "&#177;";
+enc("[prime ]") -> "&#162;";
+enc("[prod ]") -> "&#213;";
+enc("[prop ]") -> "&#181;";
+enc("[psi ]") -> "&#121;";
+
+enc("[radic ]") -> "&#214;";
+enc("[rang ]") -> "&#241;";
+enc("[rArr ]") -> "&#222;";
+enc("[rarr ]") -> "&#174;";
+enc("[real ]") -> "&#194;";
+enc("[reg ]") -> "&#210;";
+enc("[rho ]") -> "&#114;";
+%% enc("[rhov ]") -> "&#0;";
+
+enc("[sigma ]") -> "&#115;";
+enc("[sigmav]") -> "&#86;";
+enc("[sim ]") -> "&#126;";
+%% enc("[sime ]") -> "&#0;";
+%% enc("[square]") -> "&#0;";
+enc("[sol ]") -> "&#164;";
+enc("[spades]") -> "&#170;";
+enc("[sub ]") -> "&#204;";
+enc("[sube ]") -> "&#205;";
+enc("[sup ]") -> "&#201;";
+enc("[supe ]") -> "&#202;";
+enc("[sum ]") -> "&#229;";
+
+enc("[tau ]") -> "&#116;";
+enc("[tdot ]") -> "&#188;";
+enc("[there4]") -> "&#92;";
+enc("[thetas]") -> "&#113;";
+enc("[thetav]") -> "&#74;";
+enc("[times ]") -> "&#180;";
+%% enc("[tprime]") -> "&#0;";
+enc("[trade ]") -> "&#212;";
+
+enc("[uArr ]") -> "&#221;";
+enc("[uarr ]") -> "&#173;";
+enc("[upsi ]") -> "&#117;";
+
+enc("[verbar]") -> "&#189;";
+
+%% enc("[wedgeq]") -> "&#0;";
+enc("[weierp]") -> "&#195;";
+
+enc("[xi ]") -> "&#120;";
+
+enc("[zeta ]") -> "&#122;".