Home > marsbar > @mardo_5 > private > my_design.m

my_design

PURPOSE

returns 1 if design looks like it is of SPM5 / 8 type

SYNOPSIS

function tf = my_design(des)

DESCRIPTION

 returns 1 if design looks like it is of SPM5 / 8 type
 
 $Id: my_design.m 328 2004-03-03 01:56:03Z matthewbrett $

CROSS-REFERENCE INFORMATION

This function calls:

isempty overloaded isempty method for mardo object
isfield method to overload isfield for mardo objects

This function is called by:

mardo_2 class constructor for SPM2 MarsBaR design object
mardo_5 class constructor for SPM5 MarsBaR design object
mardo_99 class constructor for SPM99 MarsBaR design object

SOURCE CODE

0001 function tf = my_design(des)
0002 % returns 1 if design looks like it is of SPM5 / 8 type
0003 %
0004 % $Id: my_design.m 328 2004-03-03 01:56:03Z matthewbrett $
0005   
0006 tf = 0;
0007 if isfield(des, 'SPM'), des = des.SPM; end
0008 if isfield(des, 'SPMid')
0009   tf = ~isempty(strmatch('SPM5', des.SPMid)) | ...
0010        ~isempty(strmatch('SPM8', des.SPMid)) | ...
0011        ~isempty(strmatch('SPM12', des.SPMid));
0012 end