From 10d3c167f435a9b7e6aa7b34d3a833c28acc53ce Mon Sep 17 00:00:00 2001 From: Magnus Lundborg Date: Fri, 11 Jan 2013 11:43:38 +0100 Subject: Fix text output diff --git a/src/tests/md_openmp.f b/src/tests/md_openmp.f index 22f53c9..82be0eb 100644 --- a/src/tests/md_openmp.f +++ b/src/tests/md_openmp.f @@ -224,9 +224,9 @@ c c c This is the main time stepping loop. c - write ( *, '(a,i16)' ) ' Every', step_save, + write ( *, '(a,i4,a)' ) ' Every', step_save, & ' steps particle positions, velocities and forces are' - write ( *, '(a)' ) 'saved to a TNG trajectory file.' + write ( *, '(a)' ) ' saved to a TNG trajectory file.' write ( *, '(a)' ) write ( *, '(a)' ) & ' At each step, we report the potential and kinetic energies.' -- cgit v0.10.1