ptr_abuse_scalar_logical Subroutine

private subroutine ptr_abuse_scalar_logical(elem, ptr)

Arguments

Type IntentOptional Attributes Name
logical, intent(in), target :: elem
integer(kind=int32), intent(inout), pointer :: ptr

Contents