function test_zero(varargin)if nargin == 0 [conn, username] = mysql_connect('localhost', 'ltpda_test');else conn = varargin{1}; username = varargin{2};end%% Submit a timeformatp = zero(1,2.3);sinfo.conn = conn;sinfo.username = username;sinfo.experiment_title = 'submit zero';sinfo.experiment_description = 'this is just a test of the whole thing';sinfo.reference_ids = '';sinfo.additional_comments = 'none';sinfo.additional_authors = 'no one';[ids, cid] = ltpda_obj_submit(p, sinfo);%% Retrieve the objectq = ltpda_obj_retrieve(conn, cid);%% Close connectionif nargin == 0 close(conn);end%% Testif p ~= q error('### zero objects are not the same.')end