Develop and Download Open Source Software

Browse Subversion Repository

Diff of /Conograph/trunk/src/lattice_symmetry/ReducedLatticeToCheckBravais.cc

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 3 by rtomiyasu, Fri Feb 22 04:51:31 2013 UTC revision 17 by rtomiyasu, Tue Apr 30 05:04:41 2013 UTC
# Line 34  THE SOFTWARE. Line 34  THE SOFTWARE.
34  #include "../utility_lattice_reduction/super_basis3.hh"  #include "../utility_lattice_reduction/super_basis3.hh"
35  #include "../utility_func/lattice_constant.hh"  #include "../utility_func/lattice_constant.hh"
36  #include "../utility_func/zmath.hh"  #include "../utility_func/zmath.hh"
37    #include "../utility_data_structure/FracMat.hh"
38  #include "../utility_data_structure/Node3.hh"  #include "../utility_data_structure/Node3.hh"
39  #include "../utility_data_structure/FracMat.hh"  #include "../utility_data_structure/FracMat.hh"
40    
# Line 745  void ReducedLatticeToCheckBravais::put_S Line 746  void ReducedLatticeToCheckBravais::put_S
746                  S2_red0 = transform_sym_matrix(inv_mat.mat, put_sym_matrix_size4to3(S_super_obtuse) ) / (inv_mat.denom*inv_mat.denom);                  S2_red0 = transform_sym_matrix(inv_mat.mat, put_sym_matrix_size4to3(S_super_obtuse) ) / (inv_mat.denom*inv_mat.denom);
747                  S2_red = S2_red0;                  S2_red = S2_red0;
748    
749                  cal_average_crystal_system(rhombohedral_type.enumPointGroup(), S2_red);                  cal_average_crystal_system(rhombohedral_type.enumLaueGroup(), S2_red);
750                  if( !check_equiv_m(S2_red0, S2_red, cv2) ) continue;                  if( !check_equiv_m(S2_red0, S2_red, cv2) ) continue;
751    
752                  tmat = put_transform_matrix_row3to4(it->first);                  tmat = put_transform_matrix_row3to4(it->first);
# Line 777  void ReducedLatticeToCheckBravais::put_S Line 778  void ReducedLatticeToCheckBravais::put_S
778                  S2_red0 = transform_sym_matrix(inv_mat.mat, put_sym_matrix_size4to3(S_super_obtuse) ) / (inv_mat.denom*inv_mat.denom);                  S2_red0 = transform_sym_matrix(inv_mat.mat, put_sym_matrix_size4to3(S_super_obtuse) ) / (inv_mat.denom*inv_mat.denom);
779                  S2_red = S2_red0;                  S2_red = S2_red0;
780    
781                  cal_average_crystal_system(monoclinic_b_type.enumPointGroup(), S2_red);                  cal_average_crystal_system(monoclinic_b_type.enumLaueGroup(), S2_red);
782    
783                  if( !check_equiv_m(S2_red0, S2_red, cv2) ) continue;                  if( !check_equiv_m(S2_red0, S2_red, cv2) ) continue;
784    

Legend:
Removed from v.3  
changed lines
  Added in v.17

Back to OSDN">Back to OSDN
ViewVC Help
Powered by ViewVC 1.1.26