& aksc(maxbondterm,ntyp),abond0(maxbondterm,ntyp),
& distchainmax,nbondterm(ntyp)
C 01/29/15 Lipidic parameters
- double precision pepliptran,liptranene
+ double precision pepliptran,liptranene,
+ &tubetranene, tubetranenepep
common /lipid/ pepliptran,liptranene(ntyp)
+ common /tubepar/ tubetranene(ntyp), tubetranenepep