--- src/sander/getcor.f.orig 2006-10-23 09:17:34.000000000 -0700 +++ src/sander/getcor.f 2006-11-07 18:56:46.000000000 -0800 @@ -96,7 +96,7 @@ call amopen(lun,inpcrd,'O','U','R') if(ntx == 2)then read(lun) title1 - read(lun) natom + read(lun) natom,tt if(natom /= nr) then write(6,9118) call mexit(6, 1)