Searched refs:c_associated_c_ptr (Results 1 – 1 of 1) sorted by relevance
81 module procedure c_associated_c_ptr84 private :: c_associated_c_ptr, c_associated_c_funptr93 pure logical function c_associated_c_ptr(c_ptr_1, c_ptr_2) function97 c_associated_c_ptr = .false.99 c_associated_c_ptr = c_ptr_1%__address == c_ptr_2%__address101 c_associated_c_ptr = .true.103 end function c_associated_c_ptr