--- loncom/interface/entities.pm	2008/11/21 20:17:11	1.18
+++ loncom/interface/entities.pm	2019/02/23 20:05:50	1.23
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # entity -> tex.
 #
-# $Id: entities.pm,v 1.18 2008/11/21 20:17:11 jms Exp $
+# $Id: entities.pm,v 1.23 2019/02/23 20:05:50 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -87,7 +87,7 @@ use strict;
 
     The general punctuation set
 
-=item (8472-8501)
+=item (8462-8501)
 
     Letter like symbols
 
@@ -637,7 +637,11 @@ my %entities = (
     'euro'   => '\texteuro',
 
     # Letter like symbols
-    
+ 
+    8462     => '\ensuremath{h}',
+    'planckh' => '\ensuremath{h}',
+    8463     => '\ensuremath{\hbar}',
+    'hbar'   => '\ensuremath{\hbar}',   
     8472     => '\ensuremath{\wp}',
     'weierp' => '\ensuremath{\wp}',
     8465     => '\ensuremath{\Im}',
@@ -646,19 +650,22 @@ my %entities = (
     'real'   => '\ensuremath{\Re}',
     8482     => '\texttrademark',
     'trade'  => '\texttrademark',
+    8496     => '\ensuremath{\mathcal{E}}',
+    'expectation' => '\ensuremath{\mathcal{E}}',
     8501     => '\ensuremath{\aleph}',
     'alefsym'=> '\ensuremath{\aleph}',
 
     # Arrows and then some (harpoons from Hon Kie).
 
-    8592     => '\textleftarrow',
-    'larr'   => '\textleftarrow',
-    8593     => '\textuparrow',
-    'uarr'   => '\textuparrow',
-    8594     => '\textrightarrow',
-    'rarr'   => '\textrightarrow',
-    8595     => '\textdownarrow',
-    'darr'   => '\textdownarrow',
+    8592     => '\ensuremath{\leftarrow}',
+    'larr'   => '\ensuremath{\leftarrow}',
+    8593     => '\ensuremath{\uparrow}',
+    'uarr'   => '\ensuremath{\uparrow}',
+    8594     => '\ensuremath{\rightarrow}',
+    'rarr'   => '\ensuremath{\rightarrow}',
+    'rightarrow' => '\ensuremath{\rightarrow}',
+    8595     => '\ensuremath{\downarrow}',
+    'darr'   => '\ensuremath{\downarrow}',
     8596     => '\ensuremath{\leftrightarrow}',
     'harr'   => '\ensuremath{\leftrightarrow}',
     8598     => '\ensuremath{\nwarrow}',
@@ -788,7 +795,10 @@ my %entities = (
     'cong'   => '\ensuremath{\cong}',
     8773     => '\ensuremath{\cong}',
     8775     => '\ensuremath{\ncong}',
+    8776     => '\ensuremath{\approx}',
+    'approx' => '\ensuremath{\approx}', 
     8778     => '\ensuremath{\approxeq}',
+    'approxeq' => '\ensuremath{\approxeq}',
     8784     => '\ensuremath{\doteq}',
     8785     => '\ensuremath{\doteqdot}',
     8786     => '\ensuremath{\fallingdotseq}',