Lines Matching refs:loverlap_array
360 LOGICAL, ALLOCATABLE, DIMENSION(:) :: loverlap_array local
393 ALLOCATE (loverlap_array(1:nswapmoves))
396 loverlap_array(:) = .FALSE.
432 CALL check_for_overlap(force_env, nchains, nunits, loverlap_array(1), &
434 CALL mp_bcast(loverlap_array(1), source, group)
436 IF (loverlap_array(1)) THEN
504 CALL check_for_overlap(force_env, nchains, nunits, loverlap_array(imove), &
506 IF (loverlap_array(imove)) THEN
537 WRITE (*, *) loverlap_array(1:nswapmoves)
555 IF (loverlap_array(imove)) CYCLE
573 WRITE (*, *) loverlap_array(1:nswapmoves)
585 DEALLOCATE (loverlap_array)
609 DEALLOCATE (loverlap_array)