readFVals Subroutine

    subroutine readFVals(fvals, ndets, initial)
        implicit none
        real(dp), intent(in) :: fvals(2 * inum_runs, ndets)
        integer, intent(in) :: ndets
        integer, intent(in), optional :: initial
        integer :: start
        integer :: j
        integer :: run

        def_default(start, initial, 1)

        ! set all values of tot/acc spawns using the read-in values from fvals
        ! this is used in popsfile read-in to get the values from the previous calculation
        do j = 1, ndets
            do run = 1, inum_runs
                global_determinant_data(pos_acc_spawns + run - 1, j + start - 1) = &
                    fvals(run, j)
                global_determinant_data(pos_tot_spawns + run - 1, j + start - 1) = &
                    fvals(inum_runs + run, j)
            end do
        end do
    end subroutine readFVals