A=[((Subscript[Thr, 1])α00000…00(Subscript[(OverTilde[γ]), 1h])00000…000⋱0000…00⋱0⋱000…00…00(Subscript[Thr, iv])α0…00…000(Subscript[(OverTilde[γ]), 1v])0000…0000⋱000…00000⋱00…000000(Subscript[γ, r]))]=[((Subscript[T, H])0000(Subscript[D, H])0000(Subscript[T, V])0000(Subscript[D, V]))]