File mtt/bin/trans/m/mtt_type_name.m artifact 6cb1565552 part of check-in a8cce33cfa

function NewType = mtt_type_name (OldType)

  ## usage:  NewType = mtt_type_name (OldType)
  ##
  ## 

  if OldType=="0";
    NewType = "Zero";
  elseif OldType=="1";
    NewType = "One";
  else
    NewType = OldType;
  endif

endfunction