rectangle Derived Type
type, public :: rectangle
Components
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| real(kind=rp), | public, | dimension(2,4) | :: | Vertices | |||
| real(kind=rp), | public, | dimension(2) | :: | Center | |||
| real(kind=rp), | public, | dimension(NDIM) | :: | normal | |||
| real(kind=rp), | public, | dimension(NDIM) | :: | t1 | |||
| real(kind=rp), | public, | dimension(NDIM) | :: | t2 | |||
| real(kind=rp), | public | :: | Length | ||||
| real(kind=rp), | public | :: | Width | ||||
| real(kind=rp), | public | :: | Angle |
Type-Bound Procedures
procedure, public :: ComputeVertices
-
public subroutine ComputeVertices(this)
Arguments
Type Intent Optional Attributes Name class(rectangle), intent(inout) :: this