Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(aim), | intent(in) | :: | this | |||
integer, | intent(in), | optional | :: | dimen |
logical pure function is_periodic_aim(this, dimen)
class(aim), intent(in) :: this
integer, intent(in), optional :: dimen
unused_var(this)
if (present(dimen)) then
unused_var(dimen)
end if
unused_var(this)
unused_var(dimen)
! this function should never get called with dimension input or?
is_periodic_aim = .false.
end function is_periodic_aim