Ones/Zeros array creation functions: added support for forcing the class

Signed-off-by: Nicola Vigano <nicola.vigano@esrf.fr>

zUtil_Maths/gtMathsGetSameSizeOnes.m

-function ones_vol = gtMathsGetSameSizeOnes(vol)
-% FUNCTION ones_vol = gtMathsGetSameSizeOnes(vol)
+function ones_vol = gtMathsGetSameSizeOnes(vol, data_type)
+% FUNCTION ones_vol = gtMathsGetSameSizeOnes(vol, data_type)
 %
 
+    if (~exist('data_type', 'var'))
+        data_type = [];
+    end
+
     if (iscell(vol))
         ones_vol = cell(size(vol));
         for n = 1:numel(vol)
-            ones_vol{n} = gtMathsGetSameSizeOnes(vol{n});
+            ones_vol{n} = gtMathsGetSameSizeOnes(vol{n}, data_type);
         end
     else
-        ones_vol = ones(size(vol), class(vol));
+        if (isempty(data_type))
+            data_type = class(vol);
+        end
+        ones_vol = ones(size(vol), data_type);
     end
 end
\ No newline at end of file

zUtil_Maths/gtMathsGetSameSizeZeros.m

-function zeros_vol = gtMathsGetSameSizeZeros(vol)
-% FUNCTION zeros_vol = gtMathsGetSameSizeZeros(vol)
+function zeros_vol = gtMathsGetSameSizeZeros(vol, data_type)
+% FUNCTION zeros_vol = gtMathsGetSameSizeZeros(vol, data_type)
 %
 
+    if (~exist('data_type', 'var'))
+        data_type = [];
+    end
+
     if (iscell(vol))
         zeros_vol = cell(size(vol));
         for n = 1:numel(vol)
-            zeros_vol{n} = gtMathsGetSameSizeZeros(vol{n});
+            zeros_vol{n} = gtMathsGetSameSizeZeros(vol{n}, data_type);
         end
     else
-        zeros_vol = zeros(size(vol), 'like', vol);
+        if (isempty(data_type))
+            data_type = class(vol);
+        end
+        zeros_vol = zeros(size(vol), data_type);
     end
 end
\ No newline at end of file