to_ptr_arr0d Function

public function to_ptr_arr0d(arr) result(ptr_arr)

Arguments

Type IntentOptional Attributes Name
real(kind=dp), intent(in), target :: arr

Return Value type(dbl_pointer_t), (1)


Called by

proc~~to_ptr_arr0d~~CalledByGraph proc~to_ptr_arr0d to_ptr_arr0d interface~to_ptr_arr to_ptr_arr interface~to_ptr_arr->proc~to_ptr_arr0d proc~circulator_init_part2 circulator_init_part2 proc~circulator_init_part2->interface~to_ptr_arr proc~ffsrclink_init_part2 FFsrcLink_init_part2 proc~ffsrclink_init_part2->interface~to_ptr_arr proc~fslink_init_part2 FSlink_init_part2 proc~fslink_init_part2->interface~to_ptr_arr proc~junction_init_part2 junction_init_part2 proc~junction_init_part2->interface~to_ptr_arr proc~ssfluxlink_init_part2 SSfluxLink_init_part2 proc~ssfluxlink_init_part2->interface~to_ptr_arr proc~sssrclink_init_part2 SSsrcLink_init_part2 proc~sssrclink_init_part2->interface~to_ptr_arr program~reims_p reims_p program~reims_p->proc~circulator_init_part2 program~reims_p->proc~ffsrclink_init_part2 program~reims_p->proc~fslink_init_part2 program~reims_p->proc~junction_init_part2 program~reims_p->proc~ssfluxlink_init_part2 program~reims_p->proc~sssrclink_init_part2

Source Code

function to_ptr_arr0d(arr) result(ptr_arr)
    real(dp), target, intent(in) :: arr
    type(dbl_pointer_t) :: ptr_arr(1)
    ptr_arr(1)%p => arr
end function to_ptr_arr0d