Develop and Download Open Source Software

Browse Subversion Repository

Contents of /Conograph/trunk/src/qc/gather_qcal2.cc

Parent Directory Parent Directory | Revision Log Revision Log


Revision 33 - (show annotations) (download) (as text)
Wed Sep 7 04:38:51 2016 UTC (7 years, 6 months ago) by rtomiyasu
File MIME type: text/x-c++src
File size: 1017 byte(s)
The output format for base-centered monoclinic cells was corrected.
1 #include "reflection_conditions.hh"
2 #include "gather_qcal2.hh"
3 #include "../lattice_symmetry/gather_q_of_Ndim_lattice.hh"
4
5 void gatherQcal(const SymMat<Double>& S_super,
6 const Double& maxQ,
7 const NRMat<Int4>& transform_hkl,
8 const BravaisType& brav_type,
9 const Int4& irc_type,
10 vector<HKL_Q>& qcal_tray)
11 {
12 // First call gatherQcal
13 gatherQcal(S_super, maxQ, transform_hkl, qcal_tray);
14 if( irc_type < 0 ) return;
15
16 // Next, erase entries of qcal_tray, according to ebrav_type and erc_type.
17 const DataReflectionConditions& data = putInformationOnReflectionConditions(brav_type, irc_type);
18 Int4 index = 0;
19 for(vector<HKL_Q>::const_iterator it=qcal_tray.begin(); it!=qcal_tray.end(); it++)
20 {
21 const VecDat3<Int4>& hkl = it->HKL();
22 if( (data.isNotExtinct(hkl[0], hkl[1], hkl[2]) ) )
23 {
24 qcal_tray[index++] = *it;
25 }
26 }
27 qcal_tray.erase(qcal_tray.begin()+index, qcal_tray.end());
28 }

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