Lines Matching refs:loverlap_array
361 LOGICAL, ALLOCATABLE, DIMENSION(:) :: loverlap_array local
394 ALLOCATE (loverlap_array(1:nswapmoves))
397 loverlap_array(:) = .FALSE.
433 CALL check_for_overlap(force_env, nchains, nunits, loverlap_array(1), &
435 CALL mp_bcast(loverlap_array(1), source, group)
437 IF (loverlap_array(1)) THEN
505 CALL check_for_overlap(force_env, nchains, nunits, loverlap_array(imove), &
507 IF (loverlap_array(imove)) THEN
538 WRITE (*, *) loverlap_array(1:nswapmoves)
556 IF (loverlap_array(imove)) CYCLE
574 WRITE (*, *) loverlap_array(1:nswapmoves)
586 DEALLOCATE (loverlap_array)
610 DEALLOCATE (loverlap_array)