********>Bugfix 21:
Author: Dave Case (reported by Karen Haskell at NEC)
Date: 08/13/2004

Programs: sander, pbsa

Description: The rdparm.f files in sander and pbsa have empty statements
             in them.  NEC compilers (and maybe others) won't accept such
             constructs

Fix:  apply the following patch to amber8/src/sander/rdparm.f

------------------------------------------------------------------------------
*** rdparm.f	2004/07/29 21:25:07	7.76
--- rdparm.f	2004/08/14 00:09:35
***************
*** 66,72 ****
           nhparm,nparm,nnb,nres,nbona,ntheta,nphia,numbnd, &
           numang,nptra,natyp,nphb,ifbox,nmxrs,ifcap,numextra &
           ,ncopy
-    ; ! line terminator for free-form version
     8118 format(t2, &
           'NATOM  = ',i7,' NTYPES = ',i7,' NBONH = ',i7,' MBONA  = ',i7, &
           /' NTHETH = ',i7,' MTHETA = ',i7,' NPHIH = ',i7,' MPHIA  = ',i7, &
--- 66,71 ----

------------------------------------------------------------------------------

Also  apply the following patch to amber8/src/pbsa/rdparm.f

------------------------------------------------------------------------------
*** rdparm.f	2004/03/08 16:31:58	1.2
--- rdparm.f	2004/08/14 00:10:12
***************
*** 51,57 ****
           nhparm,nparm,nnb,nres,nbona,ntheta,nphia,numbnd, &
           numang,nptra,natyp,nphb,ifbox,nmxrs,ifcap,numextra &
           ,ncopy
-    ; ! line terminator for free-form version
     8118 format(t2, &
           'NATOM  = ',i7,' NTYPES = ',i7,' NBONH = ',i7,' MBONA  = ',i7, &
           /' NTHETH = ',i7,' MTHETA = ',i7,' NPHIH = ',i7,' MPHIA  = ',i7, &
--- 51,56 ----

------------------------------------------------------------------------------

Temporary workarounds: none.