function display (x)
  global in_name;
  in_name = inputname (1);
endfunction
