main Program

Uses

Variables

Type Attributes Name Initial
type(Triangle_) :: tri
integer(kind=int32) :: i