lat_contract_type Subroutine

public subroutine lat_contract_type(Tout, T1, T2, G1, G2)

Arguments

Type IntentOptional AttributesName
type(tensor), intent(inout) :: Tout
type(tensor), intent(inout) :: T1
type(tensor), intent(inout) :: T2
type(group), intent(inout) :: G1
type(group), intent(inout) :: G2

Contents

None