ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/group/trunk/nano_mpi/src/simulation_module.F90
(Generate patch)

Comparing trunk/nano_mpi/src/simulation_module.F90 (file contents):
Revision 4 by chuckv, Mon Jun 10 17:18:36 2002 UTC vs.
Revision 9 by chuckv, Mon Jul 1 15:27:33 2002 UTC

# Line 17 | Line 17 | module simulation
17    integer, allocatable, dimension(:)              :: ident
18    integer, allocatable, dimension(:)              :: present_atypes
19    integer                                         :: n_atypes_present
20 +
21 +  real( kind = DP )                               :: nzeta=0.0_DP
22    real( kind = DP )                               :: temp
23    real( kind = DP )                               :: total_mass
24    real( kind = DP )                               :: mass_local

Diff Legend

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