Minor bug fix

Bug fixing:

#49 Simulation fails when running on GPU

Author: mathinking

chn/+network/@HopfieldNetwork/invsatlin.m

@@ -1,5 +1,10 @@
 function y = invsatlin(x,u0)
-    y = zeros(size(x));
+
+    if isa(x,'gpuArray')
+        y = zeros(size(x), 'gpuArray');
+    else
+        y = zeros(size(x));
+    end
 
     y(x <= 0) = -u0;
     y(x >= 1) = u0;

chn/+network/@HopfieldNetwork/satlin.m

@@ -1,5 +1,11 @@
 function y = satlin(x,u0)
-    y = zeros(size(x));
+
+    if isa(x,'gpuArray')
+        y = zeros(size(x), 'gpuArray');
+    else
+        y = zeros(size(x));
+    end
     y(x>-u0 & x<u0) = 0.5 * (x(x>-u0 & x<u0)./u0 + 1);
     y(x>=u0) = 1;
+
 end

chn/+network/@HopfieldNetworkTSP/sim.m

@@ -80,6 +80,7 @@
     if ~isSaddle
         V = incorporateResults(net,V,iter,timeID);
     end
+    
 
 end
 
@@ -565,7 +566,7 @@
         sumV = sum(sumVcol);
 
         % $E(t + \Delta t) = E(t) - S_{1}\Delta t + \frac{1}{2}S_{2}\Delta t^{2}$
-        if strcmp(net.Setting.ExecutionEnvironment,'GPU')
+        if strcmp(net.Setting.ExecutionEnvironment,'gpu')
             S1 = gather(S1);
             S2 = gather(S2);
             dt = gather(dt);
@@ -589,7 +590,7 @@
         end
     end
 
-    if strcmp(net.Setting.ExecutionEnvironment,'GPU') && nargout > 1
+    if strcmp(net.Setting.ExecutionEnvironment,'gpu') && nargout > 1
         V = gather(V);
         U = gather(U);
         iter = gather(iter);