3 ! Test the fix for PR83148.
5 ! Contributed by Neil Carlson <neil.n.carlson@gmail.com>
8 use iso_c_binding
, only
: c_ptr
, c_null_ptr
9 use iso_c_binding
, only
: hypre_obj
=> c_ptr
, hypre_null_obj
=> c_null_ptr
11 public
:: hypre_obj
, hypre_null_obj
14 module hypre_hybrid_type
17 type(hypre_obj
) :: solver
= hypre_null_obj
22 class(hypre_hybrid
), allocatable
:: x