better support of propagation of image name during processing

Author: dlegland

src/@Image/Image.m

@@ -108,6 +108,8 @@
 methods(Access = protected)
 
     se = defaultStructuringElement(obj, varargin)
+    
+    name = createNewName(obj, pattern)
 end
 
 %% Constructor declaration

src/@Image/abs.m

@@ -12,8 +12,9 @@
 
 % ------
 % Author: David Legland
-% e-mail: david.legland@inra.fr
+% e-mail: david.legland@inrae.fr
 % Created: 2010-12-02,    using Matlab 7.9.0.529 (R2009b)
 % Copyright 2010 INRA - Cepia Software Platform.
 
-res = Image('data', abs(obj.Data), 'parent', obj);
+name = createNewName(obj, '%s-abs');
+res = Image('Data', abs(obj.Data), 'Parent', obj, 'Name', name);

src/@Image/adjustDynamic.m

@@ -93,7 +93,8 @@
 res = cast(res, outputClass);
 
 % create resulting Image
-res = Image('data', res, 'parent', obj);
+name = createNewName(obj, '%s-adjDyn');
+res = Image('Data', res, 'Parent', obj, 'Name', name);
 
 
 function [mini, maxi] = computeExtremeValues(data) %#ok<DEFNU>

src/@Image/angle.m

@@ -1,5 +1,5 @@
-function ang = angle(this)
-%Returns the phase angles, in radians, of an image with complex elements.
+function ang = angle(obj)
+% Return the phase angles, in radians, of an image with complex elements.
 %
 %   PHASE = angle(I)
 %
@@ -15,7 +15,10 @@
 % Created: 2017-09-29,    using Matlab 9.3.0.713579 (R2017b)
 % Copyright 2017 INRA - Cepia Software Platform.
 
-real = getBuffer(channel(this, 1));
-imag = getBuffer(channel(this, 2));
+% retrieve components
+imgA = channel(obj, 1);
+imgB = channel(obj, 2);
 
-ang = Image(atan2(imag, real));
+% create result image
+name = createNewName(obj, '%s-angle');
+ang = Image('Data', atan2(imgA.Data, imgB.Data), 'Parent', obj, 'Name', name);

src/@Image/blackTopHat.m

@@ -25,4 +25,5 @@
 dat = imbothat(obj.Data, varargin{1});
 
 % create result image
-res = Image('data', dat, 'parent', obj);
+name = createNewName(obj, '%s-BTH');
+res = Image('Data', dat, 'Parent', obj, 'Name', name);

src/@Image/boundary.m

@@ -97,4 +97,8 @@
 %% Process
 
 % erode the structure and compare with original
-bnd = Image('data', op(obj.Data, se) ~= obj.Data, 'parent', obj);
+newData = op(obj.Data, se) ~= obj.Data;
+
+% create result image
+name = createNewName(obj, '%s-bnd');
+bnd = Image('Data', newData, 'Parent', obj, 'Name', name);

src/@Image/boxFilter.m

@@ -40,4 +40,5 @@
 end
 
 % create result image
-res = Image('data', data, 'parent', obj);
+name = createNewName(obj, '%s-boxFilt');
+res = Image('Data', data, 'Parent', obj, 'Name', name);

src/@Image/cat.m

@@ -26,4 +26,5 @@
     data = cat(dim, data, var.Data);
 end
 
-res = Image('data', data, 'Parent', obj);
+name = createNewName(obj, '%s-cat');
+res = Image('data', data, 'Parent', obj, 'Name', name);

src/@Image/circshift.m

@@ -9,16 +9,17 @@
 %     show(res)
 %
 %   See also
-%
+%     fftshift
 
 % ------
 % Author: David Legland
-% e-mail: david.legland@inra.fr
+% e-mail: david.legland@inrae.fr
 % Created: 2011-12-18,    using Matlab 7.9.0.529 (R2009b)
 % Copyright 2011 INRA - Cepia Software Platform.
 
 % process data buffer, using Matlab Image processing Toolbox
 data = circshift(obj.Data, varargin{:});
 
 % create new image object for storing result
-res = Image.create('data', data, 'parent', obj);
+name = createNewName(obj, '%s-circshift');
+res = Image('Data', data, 'Parent', obj, 'Name', name);

src/@Image/closing.m

@@ -18,4 +18,5 @@
 data = imclose(getBuffer(obj), varargin{:});
 
 % create new image object for storing result
-res = Image(data, 'parent', obj);
+name = createNewName(obj, '%s-clo');
+res = Image(data, 'Parent', obj, 'Name', name);