src/tmc/tmc_master.F

140             WRITE (tmc_env%m_env%io_unit, *) &
356          WRITE (tmc_env%m_env%io_unit, *) "TMC|first_global_tree_rnd_nr_X= ", &
399                   WRITE (tmc_env%m_env%io_unit, *) &
413                WRITE (tmc_env%m_env%io_unit, *) &
586                   WRITE (tmc_env%m_env%io_unit, *) &
618             WRITE (tmc_env%m_env%io_unit, *) &
640             WRITE (tmc_env%m_env%io_unit, FMT="(/,T2,A)") REPEAT("=", 79)
644                WRITE (tmc_env%m_env%io_unit, *) "Walltime exceeded.", &
650                   WRITE (tmc_env%m_env%io_unit, *) "Total energy: ", &
664                WRITE (tmc_env%m_env%io_unit, *) &
688             WRITE (tmc_env%m_env%io_unit, *) "all workers are busy"
692                WRITE (tmc_env%m_env%io_unit, *) &
724                WRITE (tmc_env%m_env%io_unit, *) &
792                WRITE (tmc_env%m_env%io_unit, FMT="(/,T2,A)") REPEAT("-", 79)
793                WRITE (tmc_env%m_env%io_unit, *) &
795                WRITE (tmc_env%m_env%io_unit, *) &
797                WRITE (tmc_env%m_env%io_unit, *) &
801                CALL print_move_types(init=.FALSE., file_io=tmc_env%m_env%io_unit, &
808                WRITE (tmc_env%m_env%io_unit, *) "nodes in trees", tree_elem_counters(:)
809                WRITE (tmc_env%m_env%io_unit, *) "tree heads    ", tree_elem_heads(:)
813                   WRITE (tmc_env%m_env%io_unit, FMT=*) &
817                   WRITE (tmc_env%m_env%io_unit, *) &
823                WRITE (tmc_env%m_env%io_unit, FMT='(A,2F10.2)') &
827                   WRITE (tmc_env%m_env%io_unit, FMT='(A,2F10.2)') &
831                   WRITE (tmc_env%m_env%io_unit, *) &
837                WRITE (tmc_env%m_env%io_unit, *) &
842                WRITE (tmc_env%m_env%io_unit, *) &
844                CALL m_flush(tmc_env%m_env%io_unit)
861       WRITE (tmc_env%m_env%io_unit, FMT="(/,T2,A)") REPEAT("=", 79)
862       WRITE (UNIT=tmc_env%m_env%io_unit, FMT="(T2,A,T35,A,T80,A)") "=", &
864       WRITE (tmc_env%m_env%io_unit, *) "acceptance rates:"
865       CALL print_move_types(init=.FALSE., file_io=tmc_env%m_env%io_unit, &
867       WRITE (tmc_env%m_env%io_unit, FMT="(/,T2,A)") REPEAT("-", 79)
871       WRITE (tmc_env%m_env%io_unit, *) "Efficiencies:"
872       WRITE (tmc_env%m_env%io_unit, FMT="(A,F5.2,A,1000F5.2)") &
877          WRITE (tmc_env%m_env%io_unit, FMT="(A,1000F5.2)") &
880       WRITE (tmc_env%m_env%io_unit, FMT="(A,1000F5.2)") &
884          WRITE (tmc_env%m_env%io_unit, *) &
887          WRITE (tmc_env%m_env%io_unit, *) &
889          WRITE (tmc_env%m_env%io_unit, *) &
892       WRITE (tmc_env%m_env%io_unit, FMT="(A,F10.2)") &
896 … WRITE (tmc_env%m_env%io_unit, FMT="(A,F10.2)") " TMC run time[s]: ", m_walltime() - run_time_start
897       WRITE (tmc_env%m_env%io_unit, FMT="(/,T2,A)") REPEAT("=", 79)
900       WRITE (tmc_env%m_env%io_unit, *) "stopping workers"
919       WRITE (tmc_env%m_env%io_unit, *) "TMC master: all work done."