*** src/sander/ambmask.f	2006-04-04 02:35:54.000000000 +0300
--- src/sander/ambmask.f	2006-07-10 16:15:48.000000000 +0300
***************
*** 262,268 ****
     type = 'CHARGE'
     call nxtsec(nf,  6,  0,fmtin,  type,  fmt,  iok)
     read(nf,fmt) (chg(i), i=1,natom)
!    chg(1:i) = chg(1:i)*INV_AMBER_ELECTROSTATIC
  
     if( iok.eq.-1 ) then   ! this is an old-style prmtop file
        ! old style prmtop has to be read sequentially, even though
--- 262,268 ----
     type = 'CHARGE'
     call nxtsec(nf,  6,  0,fmtin,  type,  fmt,  iok)
     read(nf,fmt) (chg(i), i=1,natom)
!    chg(1:natom) = chg(1:natom)*INV_AMBER_ELECTROSTATIC
  
     if( iok.eq.-1 ) then   ! this is an old-style prmtop file
        ! old style prmtop has to be read sequentially, even though