#![allow(non_snake_case, unused_imports, unused_must_use)]
use std::io::{self, prelude::*};
use std::str;

fn main() {
    let (stdin, stdout) = (io::stdin(), io::stdout());
    let mut scan = Scanner::new(stdin.lock());
    let mut out = io::BufWriter::new(stdout.lock());

    macro_rules! input {
        ($T: ty) => {
            scan.token::<$T>()
        };
        ($T: ty, $N: expr) => {
            (0..$N).map(|_| scan.token::<$T>()).collect::<Vec<_>>()
        };
    }

    let N = input!(usize);
    let M = input!(usize);
    let K = input!(usize);

    let S = input!(usize, K + 1);

    let mut S = (0..=K).map(|i| S[i] - 1).collect::<Vec<_>>();

    let edges = (0..M)
        .map(|_| (input!(usize) - 1, input!(usize) - 1, input!(usize)))
        .collect::<Vec<_>>();

    let mut dist = vec![vec![usize::MAX; N]; N];

    for (u, v, w) in edges {
        dist[u][v] = w;
        dist[v][u] = w;
    }

    for k in 0..N {
        for i in 0..N {
            for j in 0..N {
                if dist[i][k] == usize::MAX {
                    continue;
                }

                if dist[k][j] == usize::MAX {
                    continue;
                }

                if dist[i][j] > dist[i][k] + dist[k][j] {
                    dist[i][j] = dist[i][k] + dist[k][j];
                }
            }
        }
    }

    let mut stree = direct_segtree::SegmentTree::new(K + 1, |x, y| x + y, 0);

    for i in 0..K {
        stree.insert(i, dist[S[i]][S[i + 1]]);
    }

    let Q = input!(usize);

    for _ in 0..Q {
        let t = input!(usize);
        let X = input!(usize);
        let Y = input!(usize);

        if t == 1 {
            S[X] = Y - 1;

            if X > 0 {
                stree.insert(X - 1, dist[S[X - 1]][S[X]]);
            }

            if X + 1 <= K {
                stree.insert(X, dist[S[X]][S[X + 1]]);
            }
        } else {
            let ans = stree.prod(X..Y);
            writeln!(out, "{}", ans);
        }
    }
}

pub mod direct_segtree {
    pub struct SegmentTree<M> {
        size: usize,
        tree: Vec<M>,
        op: fn(&M, &M) -> M,
        id: M,
    }

    impl<M: Copy + PartialEq> SegmentTree<M> {
        /// self = [id; size], self.op = op, self.id = id
        pub fn new(size: usize, op: fn(&M, &M) -> M, id: M) -> Self {
            return Self {
                size: size,
                tree: vec![id; 2 * size],
                op: op,
                id: id,
            };
        }

        /// self = arr, self.op = op, self.id = id
        pub fn from(arr: &[M], op: fn(&M, &M) -> M, id: M) -> Self {
            let size = arr.len();
            let mut tree = vec![id; 2 * size];

            for i in 0..size {
                tree[i + size] = arr[i];

                assert!(
                    op(&id, &arr[i]) == arr[i],
                    "id is not the identity element of given operator"
                );
            }

            for i in (1..size).rev() {
                tree[i] = op(&tree[i << 1], &tree[i << 1 | 1]);
            }

            return Self {
                size: size,
                tree: tree,
                op: op,
                id: id,
            };
        }

        /// self[pos] <- value
        pub fn insert(&mut self, mut pos: usize, value: M) -> () {
            pos += self.size;
            self.tree[pos] = value;

            while pos > 1 {
                pos >>= 1;
                self.tree[pos] = (self.op)(&self.tree[pos << 1], &self.tree[pos << 1 | 1]);
            }
        }

        /// return self[pos]
        pub fn get_point(&self, pos: usize) -> M {
            return self[pos];
        }

        /// return Π_{i ∈ [left, right)} self[i]
        pub fn get(&self, left: usize, right: usize) -> M {
            let (mut l, mut r) = (left + self.size, right + self.size);
            let (mut vl, mut vr) = (self.id, self.id);

            while l < r {
                if l & 1 == 1 {
                    vl = (self.op)(&vl, &self.tree[l]);
                    l += 1;
                }

                if r & 1 == 1 {
                    r -= 1;
                    vr = (self.op)(&self.tree[r], &vr);
                }

                l >>= 1;
                r >>= 1;
            }

            return (self.op)(&vl, &vr);
        }

        /// return Π_{i ∈ range} self[i]
        pub fn prod<R: std::ops::RangeBounds<usize>>(&self, range: R) -> M {
            let left = match range.start_bound() {
                std::ops::Bound::Included(&l) => l,
                std::ops::Bound::Excluded(&l) => l + 1,
                std::ops::Bound::Unbounded => 0,
            };

            let right = match range.end_bound() {
                std::ops::Bound::Included(&r) => r + 1,
                std::ops::Bound::Excluded(&r) => r,
                std::ops::Bound::Unbounded => self.size,
            };

            return self.get(left, right);
        }
    }

    impl<M> std::ops::Index<usize> for SegmentTree<M> {
        type Output = M;
        fn index(&self, index: usize) -> &Self::Output {
            &self.tree[index + self.size]
        }
    }

    impl<M: std::fmt::Display> std::fmt::Display for SegmentTree<M> {
        fn fmt(&self, f: &mut std::fmt::Formatter<'_>) -> std::fmt::Result {
            write!(
                f,
                "{}",
                self.tree[self.size..]
                    .iter()
                    .map(|x| x.to_string())
                    .collect::<Vec<_>>()
                    .join(" ")
            )
        }
    }
}

struct Scanner<R> {
    reader: R,
    buf_str: Vec<u8>,
    buf_iter: str::SplitWhitespace<'static>,
}
impl<R: BufRead> Scanner<R> {
    fn new(reader: R) -> Self {
        Self {
            reader,
            buf_str: vec![],
            buf_iter: "".split_whitespace(),
        }
    }
    fn token<T: str::FromStr>(&mut self) -> T {
        loop {
            if let Some(token) = self.buf_iter.next() {
                return token.parse().ok().expect("Failed parse");
            }
            self.buf_str.clear();
            self.reader
                .read_until(b'\n', &mut self.buf_str)
                .expect("Failed read");
            self.buf_iter = unsafe {
                let slice = str::from_utf8_unchecked(&self.buf_str);
                std::mem::transmute(slice.split_whitespace())
            }
        }
    }
}