%****   Medium window in program sic.m
%****


medium_plate = figure('Color',[0.8 0.8 0.8], 'HandleVisibility','on', ...
        'Position',[27 134 254 200], 'Tag','Medium');

inputback  = uicontrol('style','frame','unit','norm','position',[0.0 0.0 1.0 1.0],...
                       'background',colorch);

insartext = uicontrol('style','text','unit','norm','position',[0.3 0.93 0.50 0.05],...
                       'string','Medium Properties:','background',colorch,'hori','left');


%----------------------------------------------------------------------------------------

mutext = uicontrol('style','text', 'unit','norm','position',[0.3 0.75 0.5 0.1],...
                       'string','Shear modulus, GPa', ...
		     'background',colorch,'hori','left');
mubut  = uicontrol('style','edit','unit','norm','position',[0.3 0.6 0.3 0.15],...
		     'string', mudef);
%----------------------------------------------------------------------------------------

nutext = uicontrol('style','text','unit','norm','position',[0.3 0.4 0.5 0.1],...
                       'string','Poisson''s ratio:',...
		     'background',colorch,'hori','left');
nubut  = uicontrol('style','edit','unit','norm','position',[0.3 0.25 0.3 0.15],...
              'string', nudef);

%----------------------------------------------------------------------------------------

