********> bugfix.6
Author: Mike Kotelyanski
Date:   4/15/95

Programs: sander

Severity: moderate

Problem:  rs6000 crashing on open of unit 7 (mdinfo)

Affects:  MD runs

Cause:    extra open of unit 7 in prntmd()


Fix:  Make the following change to dynlib.f
-----------------------------------------------------------------------
*** OLD dynlib.f
--- NEW dynlib.f
***************
*** 678,684
  C
  C       ----- OUTPUT THE INFO FILE if requested -----
  C
-       call opinfo(7)
        rewind(7)
        WRITE(7,9018) NSTEP,TIME,TEMP,PRESS
        WRITE(7,9028) ETOT,EKTOT,EPOT

--- 678,683 -----
  C
  C       ----- OUTPUT THE INFO FILE if requested -----
  C
        rewind(7)
        WRITE(7,9018) NSTEP,TIME,TEMP,PRESS
        WRITE(7,9028) ETOT,EKTOT,EPOT
-----------------------------------------------------------------------

Temporary workarounds: none

Routines affected: prntmd()