ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/group/trunk/mdtools/md_code/wrappers.F90
(Generate patch)

Comparing trunk/mdtools/md_code/wrappers.F90 (file contents):
Revision 243 by mmeineke, Thu Jan 23 16:21:09 2003 UTC vs.
Revision 249 by chuckv, Mon Jan 27 21:28:19 2003 UTC

# Line 3 | Line 3 | subroutine wrapSimMod(infoWrapper)
3    
4    external infoWrapper
5  
6 <  infoWrapper( setSimulation )
6 >  call infoWrapper( setSimulation )
7  
8   end subroutine wrapSimMod
9  
10  
11 +
12 + #ifdef IS_MPI
13 +
14 + subroutine wrapSimParallelMod(infoWrapper)
15 +  use mpiSimulation
16 +  
17 +  external infoWrapper
18 +  
19 +  call infoWrapper( setupSimParallel )
20 +
21 + end subroutine wrapSimParallelMod
22 +
23 + #endif

Diff Legend

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