src-HCD-5D/include_unres/COMMON.CONTACTS

   1 C Change 12/1/95 - common block CONTACTS1 included.
   2       integer ncont,ncont_ref,icont,icont_ref,num_cont,jcont
   3       double precision facont,gacont
   4       common /contacts/ ncont,ncont_ref,icont(2,maxcont),
   5      &                  icont_ref(2,maxcont)