Searched refs:map_contact (Results 1 – 2 of 2) sorted by relevance
182 DIMENSION(:) :: map_contact local240 ALLOCATE (map_contact(ncontacts))249 atom_map=map_contact(icontact)%atom_map, &