ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/OpenMD/branches/development/src/minimizers/PRCG.cpp
Revision: 1627
Committed: Tue Sep 13 22:05:04 2011 UTC (13 years, 7 months ago) by gezelter
File size: 3528 byte(s)
Log Message:
Splitting out ifstrstream into a header and an implementation.  This
means that much of the code that depends on it can be compiled only
once and the parallel I/O is concentrated into a few files.  To do
this, a number of files that relied on basic_ifstrstream to load the
mpi header had to be modified to manage their own headers.


File Contents

# User Rev Content
1 gezelter 507 /*
2 gezelter 246 * Copyright (c) 2005 The University of Notre Dame. All Rights Reserved.
3     *
4     * The University of Notre Dame grants you ("Licensee") a
5     * non-exclusive, royalty free, license to use, modify and
6     * redistribute this software in source and binary code form, provided
7     * that the following conditions are met:
8     *
9 gezelter 1390 * 1. Redistributions of source code must retain the above copyright
10 gezelter 246 * notice, this list of conditions and the following disclaimer.
11     *
12 gezelter 1390 * 2. Redistributions in binary form must reproduce the above copyright
13 gezelter 246 * notice, this list of conditions and the following disclaimer in the
14     * documentation and/or other materials provided with the
15     * distribution.
16     *
17     * This software is provided "AS IS," without a warranty of any
18     * kind. All express or implied conditions, representations and
19     * warranties, including any implied warranty of merchantability,
20     * fitness for a particular purpose or non-infringement, are hereby
21     * excluded. The University of Notre Dame and its licensors shall not
22     * be liable for any damages suffered by licensee as a result of
23     * using, modifying or distributing the software or its
24     * derivatives. In no event will the University of Notre Dame or its
25     * licensors be liable for any lost revenue, profit or data, or for
26     * direct, indirect, special, consequential, incidental or punitive
27     * damages, however caused and regardless of the theory of liability,
28     * arising out of the use of or inability to use software, even if the
29     * University of Notre Dame has been advised of the possibility of
30     * such damages.
31 gezelter 1390 *
32     * SUPPORT OPEN SCIENCE! If you use OpenMD or its source code in your
33     * research, please cite the appropriate papers when you publish your
34     * work. Good starting points are:
35     *
36     * [1] Meineke, et al., J. Comp. Chem. 26, 252-271 (2005).
37     * [2] Fennell & Gezelter, J. Chem. Phys. 124, 234104 (2006).
38     * [3] Sun, Lin & Gezelter, J. Chem. Phys. 128, 24107 (2008).
39     * [4] Vardeman & Gezelter, in progress (2009).
40 gezelter 246 */
41    
42     #include "minimizers/PRCG.hpp"
43 gezelter 1627 #ifdef IS_MPI
44     #include <mpi.h>
45     #endif
46    
47 gezelter 1390 namespace OpenMD {
48 tim 324
49 gezelter 507 void PRCGMinimizer::init(){
50 gezelter 2
51 gezelter 507 calcG();
52 gezelter 2
53 gezelter 507 for(int i = 0; i < direction.size(); i++){
54     direction[i] = -curG[i];
55     }
56    
57 gezelter 2 }
58    
59 gezelter 507 int PRCGMinimizer::step(){
60     int lsStatus;
61 gezelter 2
62 gezelter 507 prevF = curF;
63     prevG = curG;
64     prevX = curX;
65 gezelter 2
66 gezelter 507 //optimize along the search direction and reset minimum point value
67 gezelter 2 lsStatus = doLineSearch(direction, stepSize);
68    
69 gezelter 507 if (lsStatus < 0)
70     return -1;
71     else
72     return 1;
73     }
74 gezelter 2
75 gezelter 507 void PRCGMinimizer::prepareStep(){
76 tim 963 std::vector<RealType> deltaGrad;
77     RealType beta;
78 gezelter 507 size_t i;
79 gezelter 2
80 gezelter 507 deltaGrad.resize(ndim);
81 gezelter 2
82 gezelter 507 //calculate the new direction using Polak-Ribiere Conjugate Gradient
83 gezelter 2
84 gezelter 507 for(i = 0; i < curG.size(); i++)
85     deltaGrad[i] = curG[i] - prevG[i];
86 gezelter 2
87     #ifndef IS_MPI
88 gezelter 507 beta = dotProduct(deltaGrad, curG) / dotProduct(prevG, prevG);
89 gezelter 2 #else
90 tim 963 RealType localDP1;
91     RealType localDP2;
92     RealType globalDP1;
93     RealType globalDP2;
94 gezelter 2
95 gezelter 507 localDP1 = dotProduct(deltaGrad, curG);
96     localDP2 = dotProduct(prevG, prevG);
97 gezelter 2
98 tim 963 MPI_Allreduce(&localDP1, &globalDP1, 1, MPI_REALTYPE,MPI_SUM, MPI_COMM_WORLD);
99     MPI_Allreduce(&localDP2, &globalDP2, 1, MPI_REALTYPE,MPI_SUM, MPI_COMM_WORLD);
100 gezelter 2
101 gezelter 507 beta = globalDP1 / globalDP2;
102 gezelter 2 #endif
103    
104 gezelter 507 for(i = 0; i < direction.size(); i++)
105     direction[i] = -curG[i] + beta * direction[i];
106 gezelter 2
107 gezelter 507 }
108 tim 324
109     }

Properties

Name Value
svn:executable *
svn:keywords Author Id Revision Date