********>Bugfix.36:
Author: Dave Case (reported by Adriano Martinelli)
Date: 02/24/2005
Programs: nmode
Description: When we converted the code to free-format, some data statements
for keywords for "rgroup" were converted from upper to lower case
Fix: apply the following patch to amber8/src/nmode/rgroup.f
------------------------------------------------------------------------------
*** rgroup.f 2003/12/10 22:16:29 7.2
--- rgroup.f 2005/02/24 16:24:15
***************
*** 34,45 ****
data ifld/ 2*0, 13*2 , 5*0 /
data jfld/ 4*1, 16*0 /
! data infin /4hnfin/
! data ifind /4hfind/
! data iatom /4hatom/
! data ires /4hres /
! data iiend /4hend /
! data ksear /4hsear/
ngrp = 0
if (konst) then
--- 34,45 ----
data ifld/ 2*0, 13*2 , 5*0 /
data jfld/ 4*1, 16*0 /
! data infin /4HNFIN/
! data ifind /4HFIND/
! data iatom /4HATOM/
! data ires /4HRES /
! data iiend /4HEND /
! data ksear /4HSEAR/
ngrp = 0
if (konst) then
------------------------------------------------------------------------------
Workarounds: Use the lower case keywords in your input file