#include <vector>
#include <utility>
#include <map>
#include <algorithm>
#include <iostream>
#include <cstdint>
#include <queue>
#include <limits>
#include <execution>
using namespace std;
using LLi = long long int;
static const LLi MAX_DIST = std::numeric_limits<LLi>::max();
auto solve(const vector<vector<pair<int32_t, int32_t>>>& edges, const vector<int16_t> node_types, size_t n) -> size_t
{
    priority_queue<pair<int32_t, int32_t>, std::vector<pair<int32_t, int32_t>>, std::greater<pair<int32_t, int32_t>>> distances;
    vector<bool> is_processed(n + 1, false); 
    vector<pair<int32_t, int32_t>> vertex_attributes(n + 1, make_pair(MAX_DIST, 0));
    for (size_t i = 0; i < node_types.size(); i++) {
        int16_t curr = node_types[i];
        if (curr == 0) {
            vertex_attributes[i] = make_pair(0, i);
            distances.push( vertex_attributes[i]);
        }
    }
    
    auto Relax = [&vertex_attributes]( const pair<int32_t, int32_t>& curr, const int32_t a_neighbour, size_t weight ) -> void
    {
        if ( curr.first + weight < vertex_attributes[a_neighbour].first )  {
            vertex_attributes[a_neighbour].first = curr.first + weight;
            vertex_attributes[a_neighbour].second = curr.second;
        }
    };
    while ( !(distances.empty()) ) {
        pair<int32_t, int32_t> curr = distances.top();
        distances.pop();
        for ( const pair<int32_t, int32_t>& a_node : edges[curr.second] ) {
            if ( !is_processed[a_node.second] && (node_types[a_node.second] == 1) ) {
                Relax(curr, a_node.second, a_node.first);
                distances.emplace( vertex_attributes[a_node.second].first, a_node.second );
            }
        }
    }
    return reduce(execution::par, vertex_attributes.begin(), vertex_attributes.end(), 0LL, 
    [](size_t total, pair<int32_t, int32_t> curr)
    {
        return total + curr.second;
    });
}
int main()
{
    size_t n = 0;
    
    cin >> n;
    vector<int16_t> node_types(n + 1);
    vector<vector<pair<int32_t, int32_t>>> edges(n + 1);
    for (size_t i = 1; i <= n; i++) {
        edges[i].reserve(n / 10);
    }
    for (size_t i = 1; i <= n; i++) {
        cin >> node_types[i];
    }
    int32_t a = 0;
    int32_t b = 0;
    int32_t dist = 0;
    for (size_t i = 0; i < n - 1; i++) {
        cin >> a >> b >> dist;
        edges[a].push_back(make_pair(dist, b));
        edges[b].push_back(make_pair(dist, a));
        
    }
    cout << solve(edges, node_types, n) << endl;
    return EXIT_SUCCESS;
}