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

Comparing trunk/nano_mpi/src/main.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 184 | Line 184 | program nano
184   #endif
185  
186  
187 <     if(checktemp.or.(ensemble == 'NVT')) then
187 >     if(command == 'setup') then
188          call randomize_velocities(target_temp)
189       end if
190  
191  
192 +
193       call run_dynamics()
194  
195       call write_final_config()

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines