%------------------------------------------------------------------------
% This file is part of the
% All Scale Tomographic Reconstruction Antwerp Toolbox ("ASTRA-Toolbox")
%
% Copyright: iMinds-Vision Lab, University of Antwerp
% License: Open Source under GPLv3
% Contact: mailto:astra@ua.ac.be
% Website: http://astra.ua.ac.be
%------------------------------------------------------------------------

vol_geom = astra_create_vol_geom(256, 256);

proj_geom = astra_create_proj_geom('parallel', 1.0, 384, linspace2(0,pi,180));


% Create volumes

% initialized to zero
v0 = astra_mex_data2d('create', '-vol', vol_geom);

% initialized to 3.0
v1 = astra_mex_data2d('create', '-vol', vol_geom, 3.0);

% initialized to a matrix. A may be a single, double or logical (0/1) array.
A = phantom(256);
v2 = astra_mex_data2d('create', '-vol', vol_geom, A);


% Projection data
s0 = astra_mex_data2d('create', '-sino', proj_geom);
% Initialization to a scalar or a matrix also works, exactly as with a volume.


% Update data

% set to zero
astra_mex_data2d('store', v0, 0);

% set to a matrix
astra_mex_data2d('store', v2, A);



% Retrieve data

R = astra_mex_data2d('get', v2);
imshow(R, []);


% Retrieve data as a single array. Since astra internally stores
% data as single precision, this is more efficient:

R = astra_mex_data2d('get_single', v2);


% Free memory
astra_mex_data2d('delete', v0);
astra_mex_data2d('delete', v1);
astra_mex_data2d('delete', v2);
astra_mex_data2d('delete', s0);