AMBER Archive (2007)Subject: AMBER: sander bug?
From: Nursultan Bogatov (sunny_mongolia_at_hotmail.com)
Date: Thu Jan 25 2007 - 20:28:53 CST
<------- cut here ------->
--- nonbond_list.f.orig 2007-01-25 20:58:46.000000000 -0500
+++ nonbond_list.f 2007-01-25 21:02:06.000000000 -0500
@@ -142,6 +142,8 @@
REQUIRE (allocate_error == 0)
allint=allint+natom + (maxnptrs+1)*nucgmax
+ bckptr(1:natom) = 0
+
allocate (nummask(1:natom),maskptr(1:natom), lstmask(1:mxlstmsk), &
stat=allocate_error)
REQUIRE (allocate_error == 0)
@@ -2092,6 +2094,7 @@
if(periodic == 0)then
do i=1,natom
j = bckptr(i)
+ if (j.eq.0) cycle
imagcrds(1,i) = crd(1,j)
imagcrds(2,i) = crd(2,j)
imagcrds(3,i) = crd(3,j)
<------- cut here ------->
P.S. Warning: FORTRAN of SANDER is so strong that
it can cause prolongated vomiting even in individuals
having strong stomach.
_________________________________________________________________
Get Hilary Duff’s homepage with her photos, music, and more.
http://celebrities.live.com&ocid=T001MSN30A0701
-----------------------------------------------------------------------
The AMBER Mail Reflector
To post, send mail to amber_at_scripps.edu
To unsubscribe, send "unsubscribe amber" to majordomo_at_scripps.edu
|