[Nek5000-users] A small bug

[nek5000-users at lists.mcs.anl.gov]

Hi,

in the subroutine prepost.f, line 1156 (the sixth in the following piece
of code) the format for the last item in the list (i.e. " 4 NELT,NX,NY,N")
should be A15 and not A12 because of the additional spaces in the string
corresponding to " 4 ". Is this correct?.

            WRITE(24,'(4I4,1pe14.7,I5,1X,30A1,1X,A12)')
     $           NELGT,NX1,NY1,NZ1,TIME,ikstep,(EXCODE1(I),I=1,30),
     $           'NELT,NX,NY,N'
         else
            if (nelgt.lt.10000) then
               WRITE(fhdfle,'(4I4,1pe14.7,I5,1X,30A1,1X,A12)')
     $              NELGT,NX1,NY1,NZ1,TIME,ikstep,(EXCODE1(I),I=1,30),
     $              ' 4 NELT,NX,NY,N'


Post-doctoral fellow
University of Ottawa
Department of Mechanical Engineering