rename_type.m

Contents

Version

2.11

Contact

Please report problems/bugs to michael.holmboe@umu.se

Examples

  1. atom=rename_type(atom,'NA','Na') % Basic input arguments
  2. atom=rename_type(atom,'NA','Na',30) % Renames the 30 last entries
function atom=rename_type(atom,atomtype,new_atomtype,varargin)

% Find all original atomtypes to replace
ind_atomtype=find(ismember([atom.type],atomtype));

% Duplicate the atomtype entries into a new In_atom struct
if nargin == 4
    % Uses the num last entries...
    num=cell2mat(varargin(1));
    ind_atomtype=ind_atomtype(1:num);
end

% Rename
[atom(ind_atomtype).type]=deal({new_atomtype});
[atom(ind_atomtype).fftype]=deal({new_atomtype});

end


Published with MATLAB® R2022a