ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/group/trunk/mdtools/md_code/SimInfo.cpp
Revision: 249
Committed: Mon Jan 27 21:28:19 2003 UTC (21 years, 5 months ago) by chuckv
File size: 793 byte(s)
Log Message:
For some unknown reason the Single processor builds. Has not been tested!

File Contents

# User Rev Content
1 mmeineke 243 #include <cstdlib>
2    
3     #include "SimInfo.hpp"
4    
5     extern "C"{
6     void wrapsimmod_( void (*wrapFunction)(void (*fSub)( int*, double*,
7     double*, double*)));
8     }
9    
10 chuckv 249 void wrapSimInfo(void (*fSub)( int*, double*, double*, double*));
11 mmeineke 243
12     SimInfo* currentInfo;
13    
14     SimInfo::SimInfo(){
15     excludes = NULL;
16     n_constraints = 0;
17     n_oriented = 0;
18     n_dipoles = 0;
19     longRange = NULL;
20     the_integrator = NULL;
21     setTemp = 0;
22     thermalTime = 0.0;
23    
24     currentInfo = this;
25     wrapMe();
26     }
27    
28    
29     void SimInfo::wrapMe(){
30    
31     wrapsimmod_( wrapSimInfo );
32     }
33    
34 mmeineke 245
35 mmeineke 243 void SimInfo::refreshSim(){
36    
37     double box[3];
38    
39     box[0] = box_x;
40     box[1] = box_y;
41     box[2] = box_z;
42    
43     setFsimulation( &n_atoms, box, &rList, &rCut );
44     }
45    
46    
47 chuckv 249 void wrapSimInfo(void (*fSub)( int*, double*, double*, double*)){
48 mmeineke 243
49     currentInfo->setInternal(fSub);
50     }