#elif (defined G77)
open(isecpred,file=secpred,status='old')
#else
- open(isecpred,file=secpred,status='old',readonly)
+ open(isecpred,file=secpred,status='old',action='read')
#endif
C read secondary structure prediction from JPRED here!
! read(isecpred,'(A80)',err=100,end=100) line