function c = mchar(s)
  c = cell(s);
  c = c{1};  
end
