From ceeb85a99ab15516016553a738a8d0ecf0b761f1 Mon Sep 17 00:00:00 2001 From: Magnus Lundborg Date: Thu, 10 Jan 2013 16:52:56 +0100 Subject: Improved comments diff --git a/src/tests/md_openmp.f b/src/tests/md_openmp.f index e89b93f..22f53c9 100644 --- a/src/tests/md_openmp.f +++ b/src/tests/md_openmp.f @@ -296,6 +296,9 @@ c end if +c +c Output to TNG file at regular intervals, specified by step_save +c if ( step_save .EQ. 0 .OR. mod(step, step_save) .EQ. 0 ) then call tng_frame_particle_data_write(traj, frames_saved_cnt, & TNG_TRAJ_POSITIONS, int(0, 8), tng_n_particles, pos, -- cgit v0.10.1