ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/group/trunk/OOPSE-4/src/UseTheForce/doForces_interface.h
(Generate patch)

Comparing trunk/OOPSE-4/src/UseTheForce/doForces_interface.h (file contents):
Revision 1610 by gezelter, Wed Oct 20 04:19:55 2004 UTC vs.
Revision 1617 by chuckv, Wed Oct 20 20:46:20 2004 UTC

# Line 11 | Line 11 | extern "C"{
11  
12   #define __C
13   #include "config.h"
14 +
15 + #define initFortranFF F90_FUNC(initfortranff, INITFORTRANFF)
16 + #define doForceLoop F90_FUNC(doforceloop, DOFORCELOOP)
17 +
18   extern "C"{
19    
20 <  void F90_FUNC(initFortranff,INITFORTRANFF)( int* LJ_mix_policy,
21 <                                              int* useReactionField,
22 <                                              int *isError );        
23 <  void (initFortranFF)( int* LJ_mix_policy,
20 <                        int* useReactionField,
21 <                        int *isError ){          
22 <    F90_FUNC(initFortranff,INITFORTRANFF)( LJ_mix_policy,
23 <                                           useReactionField,
24 <                                           isError
25 <                                           );
26 <  }
20 >  void initFortranFF( int* LJ_mix_policy,
21 >                      int* useReactionField,
22 >                      int *isError );        
23 >
24    
25 <  void F90_FUNC(doforceloop,DOFORCELOOP)( double* positionArray,
26 <                                          double* rcArray,
27 <                                          double* RotationMatrixArray,
28 <                                          double* unitVectorArray_l,
29 <                                          double* forceArray,
30 <                                          double *torqueArray,
31 <                                          double* StressTensor,
32 <                                          double* potentialEnergy,
33 <                                          short int* doPotentialCalc,
34 <                                          short int* doStressCalc,
35 <                                          int* isError );
39 <  
40 <  void (doForceLoop)( double* positionArray,
41 <                      double* rcArray,
42 <                      double* RotationMatrixArray,
43 <                      double* unitVectorArray_l,
44 <                      double* forceArray,
45 <                      double *torqueArray,
46 <                      double* StressTensor,
47 <                      double* potentialEnergy,
48 <                      short int* doPotentialCalc,
49 <                      short int* doStressCalc,
50 <                      int* isError ){
51 <    F90_FUNC(doforceloop,DOFORCELOOP)( positionArray,
52 <                                       rcArray,
53 <                                       RotationMatrixArray,
54 <                                       unitVectorArray_l,
55 <                                       forceArray,
56 <                                       torqueArray,
57 <                                       StressTensor,
58 <                                       potentialEnergy,
59 <                                       doPotentialCalc,
60 <                                       doStressCalc,
61 <                                       isError );
62 <  }
63 <  
64 <  
25 >  void doForceLoop( double* positionArray,
26 >                    double* rcArray,
27 >                    double* RotationMatrixArray,
28 >                    double* unitVectorArray_l,
29 >                    double* forceArray,
30 >                    double *torqueArray,
31 >                    double* StressTensor,
32 >                    double* potentialEnergy,
33 >                    short int* doPotentialCalc,
34 >                    short int* doStressCalc,
35 >                    int* isError );
36   }
66 –
37   #endif

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines