print summary of symmetry information THIS IS NO USER FUNCTION
0001 function printSymmetrySummary(cdef, P) 0002 % print summary of symmetry information 0003 % 0004 % THIS IS NO USER FUNCTION 0005 0006 % The elk-library: convex geometry applied to crystallization modeling. 0007 % Copyright (C) 2013 Alexander Reinhold 0008 % 0009 % This program is free software: you can redistribute it and/or modify it 0010 % under the terms of the GNU General Public License as published by the 0011 % Free Software Foundation, either version 3 of the License, or (at your 0012 % option) any later version. 0013 % 0014 % This program is distributed in the hope that it will be useful, but 0015 % WITHOUT ANY WARRANTY; without even the implied warranty of 0016 % MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 0017 % General Public License for more details. 0018 % 0019 % You should have received a copy of the GNU General Public License along 0020 % with this program. If not, see <http://www.gnu.org/licenses/>. 0021 0022 0023 disp(' '); 0024 if isfield(cdef, 'sym') 0025 disp('The crystal symmetry is defined by:'); 0026 if isfield(cdef.sym, 'defined') 0027 disp([' Schönflies Notation : ' P{1, cdef.sym.defined}]); 0028 disp([' Hermann-Mauguin Notation : ' P{2, cdef.sym.defined}]); 0029 %disp([' All symmetry elements : ' P{3, cdef.sym.defined}]); 0030 disp([' Laue Class : ' P{4, cdef.sym.defined}]); 0031 disp([' Crystal system : ' P{5, cdef.sym.defined}]); 0032 disp([' Trivialname (German) : ' P{7, cdef.sym.defined}]); 0033 elseif isfield(cdef.sym, 'system') 0034 disp([' Crystal system: ' cdef.sym.system]); 0035 disp(['Please extend the definition of crystal symmetry' ... 0036 ' using crystal family is not sufficient, but let''s' ... 0037 ' you define the lattice parameters']); 0038 end 0039 else 0040 disp('Crystal symmetry is not undefined'); 0041 end