s3_product Interface

public interface s3_product

Module Procedures

private function s3_product_d(a, b, c) result(s3)

Arguments

Type IntentOptional Attributes Name
real(kind=8), intent(in), dimension(3) :: a
real(kind=8), intent(in), dimension(3) :: b
real(kind=8), intent(in), dimension(3) :: c

Return Value real(kind=8)

private function s3_product_c(a, b, c) result(s3)

Arguments

Type IntentOptional Attributes Name
complex(kind=8), intent(in), dimension(3) :: a
complex(kind=8), intent(in), dimension(3) :: b
complex(kind=8), intent(in), dimension(3) :: c

Return Value real(kind=8)