|
|||||||||||||||||||||||||||||||||
AMBER Archive (2006)Subject: AMBER: source code
From: Yannick Bomble (ybomble_at_mail.utexas.edu)
Dear Amber users,
I recently had trouble compiling amber 10 with G95 on my machine and noticed
1. In src/addles/addspace_atm1st.f
Line 252:
if(ipick(iph(i))>1.or.ipick(jph(i))>1.or.ipick(kph(i))>1
& .or.ipick(lph(i))) then
Should be changed to
if(ipick(iph(i))>1.or.ipick(jph(i))>1.or.ipick(kph(i))>1
& .or.ipick(lph(i))>1) then
And line 305
if(ipick(ip(i))>1.or.ipick(jp(i))>1.or.ipick(kp(i))>1
& .or.ipick(lp(i))) then
Should be changed to
if(ipick(ip(i))>1.or.ipick(jp(i))>1.or.ipick(kp(i))>1
& .or.ipick(lp(i))>1) then
2. In src/sander/ rcbond_anal2num.f
Line 26: _REAL_ , external :: bond_umb can be commented out as bond_umb
Yannick Bomble
-----------------------------------------------------------------------
| |||||||||||||||||||||||||||||||||
|