Changeset 99593f for src/vector.cpp


Ignore:
Timestamp:
Nov 4, 2009, 5:34:05 PM (16 years ago)
Author:
Frederik Heber <heber@…>
Branches:
Action_Thermostats, Add_AtomRandomPerturbation, Add_FitFragmentPartialChargesAction, Add_RotateAroundBondAction, Add_SelectAtomByNameAction, Added_ParseSaveFragmentResults, AddingActions_SaveParseParticleParameters, Adding_Graph_to_ChangeBondActions, Adding_MD_integration_tests, Adding_ParticleName_to_Atom, Adding_StructOpt_integration_tests, AtomFragments, Automaking_mpqc_open, AutomationFragmentation_failures, Candidate_v1.5.4, Candidate_v1.6.0, Candidate_v1.6.1, Candidate_v1.7.0, ChangeBugEmailaddress, ChangingTestPorts, ChemicalSpaceEvaluator, CombiningParticlePotentialParsing, Combining_Subpackages, Debian_Package_split, Debian_package_split_molecuildergui_only, Disabling_MemDebug, Docu_Python_wait, EmpiricalPotential_contain_HomologyGraph, EmpiricalPotential_contain_HomologyGraph_documentation, Enable_parallel_make_install, Enhance_userguide, Enhanced_StructuralOptimization, Enhanced_StructuralOptimization_continued, Example_ManyWaysToTranslateAtom, Exclude_Hydrogens_annealWithBondGraph, FitPartialCharges_GlobalError, Fix_BoundInBox_CenterInBox_MoleculeActions, Fix_ChargeSampling_PBC, Fix_ChronosMutex, Fix_FitPartialCharges, Fix_FitPotential_needs_atomicnumbers, Fix_ForceAnnealing, Fix_IndependentFragmentGrids, Fix_ParseParticles, Fix_ParseParticles_split_forward_backward_Actions, Fix_PopActions, Fix_QtFragmentList_sorted_selection, Fix_Restrictedkeyset_FragmentMolecule, Fix_StatusMsg, Fix_StepWorldTime_single_argument, Fix_Verbose_Codepatterns, Fix_fitting_potentials, Fixes, ForceAnnealing_goodresults, ForceAnnealing_oldresults, ForceAnnealing_tocheck, ForceAnnealing_with_BondGraph, ForceAnnealing_with_BondGraph_continued, ForceAnnealing_with_BondGraph_continued_betteresults, ForceAnnealing_with_BondGraph_contraction-expansion, FragmentAction_writes_AtomFragments, FragmentMolecule_checks_bonddegrees, GeometryObjects, Gui_Fixes, Gui_displays_atomic_force_velocity, ImplicitCharges, IndependentFragmentGrids, IndependentFragmentGrids_IndividualZeroInstances, IndependentFragmentGrids_IntegrationTest, IndependentFragmentGrids_Sole_NN_Calculation, JobMarket_RobustOnKillsSegFaults, JobMarket_StableWorkerPool, JobMarket_unresolvable_hostname_fix, MoreRobust_FragmentAutomation, ODR_violation_mpqc_open, PartialCharges_OrthogonalSummation, PdbParser_setsAtomName, PythonUI_with_named_parameters, QtGui_reactivate_TimeChanged_changes, Recreated_GuiChecks, Rewrite_FitPartialCharges, RotateToPrincipalAxisSystem_UndoRedo, SaturateAtoms_findBestMatching, SaturateAtoms_singleDegree, StoppableMakroAction, Subpackage_CodePatterns, Subpackage_JobMarket, Subpackage_LinearAlgebra, Subpackage_levmar, Subpackage_mpqc_open, Subpackage_vmg, Switchable_LogView, ThirdParty_MPQC_rebuilt_buildsystem, TrajectoryDependenant_MaxOrder, TremoloParser_IncreasedPrecision, TremoloParser_MultipleTimesteps, TremoloParser_setsAtomName, Ubuntu_1604_changes, stable
Children:
7ea9e6
Parents:
c9bce3e
Message:

Extension to the periodic boundary case for analysis_correlation.cpp

other stuff:

File:
1 edited

Legend:

Unmodified
Added
Removed
  • src/vector.cpp

    rc9bce3e r99593f  
    275275  temp.AddVector(this);
    276276  temp.SubtractVector(PlaneOffset);
    277 
    278   return temp.Norm();
     277  double sign = temp.ScalarProduct(PlaneNormal);
     278  sign /= fabs(sign);
     279
     280  return (temp.Norm()*sign);
    279281};
    280282
     
    713715  for (int i=NDIM;i--;)
    714716    x[i] = C.x[i];
    715 };
    716 
    717 /** Calculate the inverse of a 3x3 matrix.
    718  * \param *matrix NDIM_NDIM array
    719  */
    720 double * Vector::InverseMatrix( const double * const A)
    721 {
    722   double *B = Malloc<double>(NDIM * NDIM, "Vector::InverseMatrix: *B");
    723   double detA = RDET3(A);
    724   double detAReci;
    725 
    726   for (int i=0;i<NDIM*NDIM;++i)
    727     B[i] = 0.;
    728   // calculate the inverse B
    729   if (fabs(detA) > MYEPSILON) {;  // RDET3(A) yields precisely zero if A irregular
    730     detAReci = 1./detA;
    731     B[0] =  detAReci*RDET2(A[4],A[5],A[7],A[8]);    // A_11
    732     B[1] = -detAReci*RDET2(A[1],A[2],A[7],A[8]);    // A_12
    733     B[2] =  detAReci*RDET2(A[1],A[2],A[4],A[5]);    // A_13
    734     B[3] = -detAReci*RDET2(A[3],A[5],A[6],A[8]);    // A_21
    735     B[4] =  detAReci*RDET2(A[0],A[2],A[6],A[8]);    // A_22
    736     B[5] = -detAReci*RDET2(A[0],A[2],A[3],A[5]);    // A_23
    737     B[6] =  detAReci*RDET2(A[3],A[4],A[6],A[7]);    // A_31
    738     B[7] = -detAReci*RDET2(A[0],A[1],A[6],A[7]);    // A_32
    739     B[8] =  detAReci*RDET2(A[0],A[1],A[3],A[4]);    // A_33
    740   }
    741   return B;
    742717};
    743718
Note: See TracChangeset for help on using the changeset viewer.