You are an expert in writing code in many different languages. Your goal is to perform code completion for the following code, keeping in mind the rest of the code and the file meta data.
    Metadata details:
    filename: emboss.m
    path of file: ./repos/gptoolbox/mesh
    
    the code of the file until where you have to start completion: function [VV,FF,J,P,M,AO,TV,TF,r,i,ni,R] = emboss(V,F,str,varargin)
  % EMBOSS Find a spot on a mesh to emboss with given text
  %
  % [VV,FF] = emboss(V,F,str)
  % [VV,FF,J] = emboss(V,F,str,'ParameterName',ParameterValue, ...)
  %
  % Inputs:
  %   V  #V by 3 list of mesh vertex positions
  %   F  #F by 3 list of triangle indices into V
  %   str  string to emboss
  % Outputs:
  %   VV  #VV by 3 list of mesh vertex positions
  %   FF  #FF by 3 list of triangle indices into VV
  %   J  #FF list of indices into 1:size(F,1)+size(EF,1) where EF are the faces
  %     of the embossed letters: J<=size(F,1) indicates an original birth face
  %

  th = normrow(max(V)-min(V))/(100/3);

    
function [VV,FF,J,P,M,AO,TV,TF,r,i,ni,R] = emboss(V,F,str,varargin)
  % EMBOSS Find a spot on a mesh to emboss with given text
  %
  % [VV,FF] = emboss(V,F,str)
  % [VV,FF,J] = emboss(V,F,str,'ParameterName',ParameterValue, ...)
  %
  % Inputs:
  %   V  #V by 3 list of mesh vertex positions
  %   F  #F by 3 list of triangle indices into V
  %   str  string to emboss
  % Outputs:
  %   VV  #VV by 3 list of mesh vertex positions
  %   FF  #FF by 3 list of triangle indices into VV
  %   J  #FF list of indices into 1:size(F,1)+size(EF,1) where EF are the faces
  %     of the embossed letters: J<=size(F,1) indicates an original birth face
  %

  th = normrow(max(V)-min(V))/(100/3);
  fontname = [];
  engrave = false;
  max_r = inf;
  black_list = [];

  % Map of parameter names to variable names
  params_to_variables = containers.Map( ...
    {'BlackList','Engrave','Height','FontName','MaxRadius'}, ...
    {'black_list','engrave','th','fontname','max_r'});
  v = 1;
  while v <= numel(varargin)
    param_name = varargin{v};
    if isKey(params_to_variables,param_name)
      assert(v+1<=numel(varargin));
      v = v+1;
      % Trick: use feval on anonymous function to use assignin to this workspace
      feval(@()assignin('caller',params_to_variables(param_name),varargin{v}));
    else
      error('Unsupported parameter: %s',varargin{v});
    end