set_title

'set_title': defines the 'TITLE' of a projection object
-----------------------------------------------------------
 function TITLE=set_title(Style,ProjMode)
 OUTPUT:
    TITLE: char string defining the title

 INPUT:
    Style: char string defining the style of the projection opbject
    ProjMode:  char string defining the projection mode 
------------------------------------------------
------------------------------------------------

0001 %'set_title': defines the 'TITLE' of a projection object
0002 %-----------------------------------------------------------
0003 % function TITLE=set_title(Style,ProjMode)
0004 % OUTPUT:
0005 %    TITLE: char string defining the title
0006 %
0007 % INPUT:
0008 %    Style: char string defining the style of the projection opbject
0009 %    ProjMode:  char string defining the projection mode
0010 %------------------------------------------------
0011 function TITLE=set_title(Style,ProjMode)
0012 %------------------------------------------------
0013 TITLE=[]; %default
0014 if isequal(Style,'points')
0015     TITLE='POINTS';
0016 elseif isequal(Style,'line')|isequal(Style,'polyline')
0017     TITLE='LINE';
0018 elseif isequal(Style,'plane')
0019     TITLE='PLANE';
0020 elseif isequal(Style,'volume')
0021     TITLE='VOLUME';
0022 elseif isequal(Style,'polygon')|isequal(Style,'rectangle')|isequal(Style,'ellipse')
0023     if isequal(ProjMode,'inside')|isequal(ProjMode,'outside')
0024         TITLE='PATCH';
0025     elseif isequal(ProjMode,'mask_inside')|isequal(ProjMode,'mask_outside')
0026         TITLE='MASK';
0027     else
0028         TITLE='LINE';
0029     end
0030 end