returns 1 if design looks like it is of SPM99 type $Id$
0001 function tf = my_design(des) 0002 % returns 1 if design looks like it is of SPM99 type 0003 % 0004 % $Id$ 0005 0006 tf = 0; 0007 if isfield(des, 'SPM'), des = des.SPM; end 0008 if isfield(des, 'SPMid') 0009 tf = ~isempty(strmatch('SPM2', des.SPMid)); 0010 end