Searched refs:qmmm_index_in_range (Results 1 – 2 of 2) sorted by relevance
57 LOGICAL :: qmmm_index_in_range local70 … qmmm_index_in_range = (MAXVAL(qmmm_env%qm_atom_index) <= SIZE(topology%atom_info%id_atmname)) &72 CPASSERT(qmmm_index_in_range)