-- -*- M2-comint -*- hash: 11232525600415098276

i1 : D = makeWeylAlgebra(QQ[x,y]);

i2 : I = ideal(x*dx^2-y*dy^2+2*dx-2*dy, x*dx+y*dy+1);

o2 : Ideal of D

i3 : A = connectionMatrices I;

i4 : M = matrix {{x,0}, {0,y}};

             2      2
o4 : Matrix D  <-- D

i5 : gaugeTransform(M, A, D)

o5 = {| 0 -1 |, | 0 x/y  |}
      | 0 0  |  | 0 -1/y |

o5 : List

i6 : 
