%
% 12.03.2001, c
%
function plotField( h, in, field )
global errmsg;

if (~isstr( field ))
  disp( errmsg{4} );
  return
end

arg2 = fieldnames( in );
if (sum( strcmp( field, arg2 ) ) ~= 1)
  disp( errmsg{3} );
  disp( field );
  disp( 'possible names are:' );
  disp( arg2 );
  return
end

ff = [getfield( in, field )];

figure( h );
plot( ff );