centroid Interface

public interface centroid

Contents

Module Procedures


Module Procedures

private pure function centroid3l(a, b, c) result(cen)

Centroid of a triangle
三角形形心

Arguments

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

Return Value real(kind=sk_real_kind), (3)

private pure function centroid4l(a, b, c, d) result(cen)

Centroid of a quadrilateral
四边形形心

Arguments

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

Return Value real(kind=sk_real_kind), (3)