Fix y parameter derivative

ACCA-Imperial · Jun 22, 2016 · 33e3d46 · 33e3d46
1 parent 4ad4d6a
commit 33e3d46
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/@greensC0Dpxy/greensC0Dpxy.m b/@greensC0Dpxy/greensC0Dpxy.m
@@ -49,8 +49,8 @@
                 case 'y'
                     singPart = @(z) (1./(alpha - z) ...
                         - 1./(conj(alpha) - z*conj(alpha)^2))/2/pi;
-                    singDz = @(z) (1./(alpha - z).^2 ...
-                        - 1./(1 - z*conj(alpha)).^2)/2i/pi;
+                    singDz = @(z) 1.0/(2*pi)*(1./(z-alpha).^2 ...
+                        - 1./(conj(alpha).*(z-1./conj(alpha))).^2);
 
                 otherwise
                     error('SKPrime:InvalidParameter', ...