From 5e0478831f8acd3f9be61593764afd16911c2edb Mon Sep 17 00:00:00 2001
From: Deyan Ginev <deyan.ginev@gmail.com>
Date: Tue, 2 Apr 2024 00:12:21 -0400
Subject: [PATCH] adjust reversions of \braket to use | separators (#2340)

---
 lib/LaTeXML/Package/braket.sty.ltxml | 64 ++++++++++++++--------------
 1 file changed, 32 insertions(+), 32 deletions(-)

diff --git a/lib/LaTeXML/Package/braket.sty.ltxml b/lib/LaTeXML/Package/braket.sty.ltxml
index 9d91e9669..81fd093ae 100644
--- a/lib/LaTeXML/Package/braket.sty.ltxml
+++ b/lib/LaTeXML/Package/braket.sty.ltxml
@@ -55,13 +55,13 @@ sub splitBraketArg {
 
 #======================================================================
 DefMacro('\braket{}', sub {
-    my ($gullet, $arg) = @_;
-    my ($codes, @args) = splitBraketArg($arg, 2);
+    my ($gullet, $arg)  = @_;
+    my ($codes,  @args) = splitBraketArg($arg, 2);
     my $n = scalar(@args);
     return Invocation(T_CS('\lx@braket@' . $codes), @args)->unlist; });
 DefMacro('\Braket{}', sub {
-    my ($gullet, $arg) = @_;
-    my ($codes, @args) = splitBraketArg($arg, 2);
+    my ($gullet, $arg)  = @_;
+    my ($codes,  @args) = splitBraketArg($arg, 2);
     my $n = scalar(@args);
     return Invocation(T_CS('\lx@Braket@' . $codes), @args)->unlist; });
 
@@ -75,53 +75,53 @@ DefMath('\lx@Braket@{}', '\left\langle#1\right\rangle',
 # seperate macros since single vs double bars could have different meanings?
 #(but we assume the same for now)
 DefMath('\lx@braket@V{}{}', '\langle#1\,|\,#2\rangle',
-  meaning => 'inner-product',
-  alias   => '\braket');
+  meaning   => 'inner-product',
+  reversion => '\braket{#1|#2}');
 DefMath('\lx@braket@D{}{}', '\langle#1\,\|\,#2\rangle',
-  meaning => 'inner-product',
-  alias   => '\braket');
+  meaning   => 'inner-product',
+  reversion => '\braket{#1\|#2}');
 DefMath('\lx@Braket@V{}{}', '\left\langle#1\,\middle|\,#2\right\rangle',
-  meaning => 'inner-product',
-  alias   => '\Braket');
+  meaning   => 'inner-product',
+  reversion => '\Braket{#1|#2}');
 DefMath('\lx@Braket@D{}{}', '\left\langle#1\,\middle\|\,#2\right\rangle',
-  meaning => 'inner-product',
-  alias   => '\Braket');
+  meaning   => 'inner-product',
+  reversion => '\Braket{#1\|#2}');
 
 DefMath('\lx@braket@VV{}{}{}', '\langle#1\,|#2\,|\,#3\rangle',
-  meaning => 'quantum-operator-product',
-  alias   => '\braket');
+  meaning   => 'quantum-operator-product',
+  reversion => '\braket{#1|#2|#3}');
 DefMath('\lx@braket@VD{}{}{}', '\langle#1\,|\,#2\,\|\,#3\rangle',
-  meaning => 'quantum-operator-product',
-  alias   => '\braket');
+  meaning   => 'quantum-operator-product',
+  reversion => '\braket{#1|#2\|#3}');
 DefMath('\lx@braket@DV{}{}{}', '\langle#1\,\|\,#2\,|\,#3\rangle',
-  meaning => 'quantum-operator-product',
-  alias   => '\braket');
+  meaning   => 'quantum-operator-product',
+  reversion => '\braket{#1\|#2|#3}');
 DefMath('\lx@braket@DD{}{}{}', '\langle#1\,\|\,#2\,\|\,#3\rangle',
-  meaning => 'quantum-operator-product',
-  alias   => '\braket');
+  meaning   => 'quantum-operator-product',
+  reversion => '\braket{#1\|#2\|#3}');
 
 DefMath('\lx@Braket@VV{}{}{}', '\left\langle#1\,\middle|\,#2\,\middle|\,#3\right\rangle',
-  meaning => 'quantum-operator-product',
-  alias   => '\Braket');
+  meaning   => 'quantum-operator-product',
+  reversion => '\Braket{#1|#2|#3}');
 DefMath('\lx@Braket@VD{}{}{}', '\left\langle#1\,\middle|\,#2\,\middle\|\,#3\right\rangle',
-  meaning => 'quantum-operator-product',
-  alias   => '\Braket');
+  meaning   => 'quantum-operator-product',
+  reversion => '\Braket{#1|#2\|#3}');
 DefMath('\lx@Braket@DV{}{}{}', '\left\langle#1\,\middle\|\,#2\,\middle|\,#3\right\rangle',
-  meaning => 'quantum-operator-product',
-  alias   => '\Braket');
+  meaning   => 'quantum-operator-product',
+  reversion => '\Braket{#1\|#2|#3}');
 DefMath('\lx@Braket@DD{}{}{}', '\left\langle#1\,\middle\|\,#2\,\middle\|\,#3\right\rangle',
-  meaning => 'quantum-operator-product',
-  alias   => '\Braket');
+  meaning   => 'quantum-operator-product',
+  reversion => '\Braket{#1\|#2\|#3}');
 
 #======================================================================
 DefMacro('\set{}', sub {
-    my ($gullet, $arg) = @_;
-    my ($codes, @args) = splitBraketArg($arg, 1);
+    my ($gullet, $arg)  = @_;
+    my ($codes,  @args) = splitBraketArg($arg, 1);
     my $n = scalar(@args);
     return Invocation(T_CS('\lx@set@' . $codes), @args)->unlist; });
 DefMacro('\Set{}', sub {
-    my ($gullet, $arg) = @_;
-    my ($codes, @args) = splitBraketArg($arg, 1);
+    my ($gullet, $arg)  = @_;
+    my ($codes,  @args) = splitBraketArg($arg, 1);
     my $n = scalar(@args);
     return Invocation(T_CS('\lx@Set@' . $codes), @args)->unlist; });