--- loncom/xml/algebra/AlgParser.pm	2005/02/24 09:37:05	1.10
+++ loncom/xml/algebra/AlgParser.pm	2005/02/25 06:42:35	1.12
@@ -603,10 +603,14 @@ sub tolatex {
 
       if ($args[0] =~ /$specialfunc/) {
 	  if (defined($1)) {
-	      return ('\mbox{log}_{10}'. $p1 . $args[1]->tolatex() . $p2);
+	      return ('\log_{10}'. $p1 . $args[1]->tolatex() . $p2);
 	  }
 	  elsif (defined($2)) {
-	      return ('\mbox{' . $2.$3 .'}^{-1}'. $p1 . $args[1]->tolatex() . $p2);
+	      if (defined($3) && ($2 eq 'sec' || $2 eq 'csc' || $2 eq 'cot')) {
+		  return ('\mathrm{' . $2.$3 .'}^{-1}'. $p1 . $args[1]->tolatex() . $p2);
+	      } else {
+		  return ('\\' . $2.$3 .'^{-1}'. $p1 . $args[1]->tolatex() . $p2);
+	      }
 	  }
 	  elsif (defined($4)) {
 	      return ('|' . $args[1]->tolatex() . '|');
@@ -616,7 +620,11 @@ sub tolatex {
 	  }
       }
       else {
-        return ('\\' . $args[0] . $p1 . $args[1]->tolatex() . $p2);
+	  if ($args[0] =~/(sec|csc|cot)h/) {
+	      return ('\mathrm{' . $args[0] . '}' . $p1 . $args[1]->tolatex() . $p2);
+	  } else {
+	      return ('\\' . $args[0] . $p1 . $args[1]->tolatex() . $p2);
+	  }
       }
   };
   /special/ && do {