fitpack_sphere_domains_c Module Reference

C interface to fitpack_sphere. More...

Data Types
interface	f_associated
	Pointer-identity check (Fortran-side wrapper of the bind(C) function). More...
interface	f_pointer
	Get pointer to embedded Fortran object. More...
interface	fitpack_sphere_c
	Construct from Fortran object. More...

Functions/Subroutines
logical(c_bool) function, public	fitpack_sphere_c_is_same (this, that)
	Pointer-identity check: true iff both wrappers point to the same underlying Fortran object (and that object is allocated).
type(fitpack_sphere) function, pointer	fitpack_sphere_c_get_pointer (this)
	Get pointer to embedded Fortran object (non-allocating)
logical function	fitpack_sphere_c_pointer (this, fthis)
	Get/allocate embedded Fortran object (internal, not bind(C)) Returns .true. on success, .false. on allocation failure.
subroutine, public	fitpack_sphere_c_allocate (this, status)
	[bind(C)] Allocate new object
subroutine, public	fitpack_sphere_c_destroy (this, status)
	[bind(C)] Deallocate object
subroutine, public	fitpack_sphere_c_copy (this, that, deep_copy, status)
	[bind(C)] Copy. By default, mirrors source ownership: a view source yields a view (shallow handle copy); an owned source yields a deep copy via Fortran intrinsic assignment. Pass deep_copy=.true. to force a deep copy regardless of the source's ownership.
subroutine, public	fitpack_sphere_c_associate (this, that, status)
	[bind(C)] Shallow copy (pointer semantics — Fortran "associate" construct)
subroutine, public	fitpack_sphere_c_move_alloc (to, from, status)
	[bind(C)] Move allocation (transfer ownership)
type(fitpack_sphere_c) function	fitpack_sphere_c_f2c (f)
	Create from Fortran object (owns copy)
type(fitpack_sphere_c) function	fitpack_sphere_c_fptr2c (f, want_pointer)
	Create from Fortran object (optionally as pointer)
integer(c_int32_t) function, public	fitpack_sphere_c_fit (this, smoothing, keep_knots)
	fit
integer(c_int32_t) function, public	fitpack_sphere_c_least_squares (this, smoothing, reset_knots)
	least_squares
integer(c_int32_t) function, public	fitpack_sphere_c_interpolate (this, reset_knots)
	interpolate
real(c_double) function, public	fitpack_sphere_c_sphere_eval_one (this, theta, phi, ierr)
	sphere_eval_one
integer(c_int32_t) function, public	fitpack_sphere_c_comm_size (this)
	comm_size
real(c_double) function, public	fitpack_sphere_c_mse (this)
	mse
integer(c_int32_t) function, public	fitpack_sphere_c_core_comm_size (this)
	core_comm_size
subroutine, public	fitpack_sphere_c_destroy_base (this)
	destroy_base
subroutine, public	fitpack_sphere_c_new_points (this, n, theta, phi, r, w)
	new_points
integer(c_int32_t) function, public	fitpack_sphere_c_new_fit (this, n, theta, phi, r, w, smoothing)
	new_fit
subroutine, public	fitpack_sphere_c_sphere_eval_many (this, n, theta, phi, ierr, result, n_result, max_size)
	sphere_eval_many
subroutine, public	fitpack_sphere_c_comm_pack (this, n, buffer)
	comm_pack
subroutine, public	fitpack_sphere_c_comm_expand (this, n, buffer)
	comm_expand
subroutine, public	fitpack_sphere_c_core_comm_pack (this, n, buffer)
	core_comm_pack
subroutine, public	fitpack_sphere_c_core_comm_expand (this, n, buffer)
	core_comm_expand
subroutine, public	fitpack_sphere_c_getcomp_theta (this, ptr, extents)
	Raw view of component 'theta': address of the first element, plus the component's 1 extent(s). Null pointer and zero extents when the object or the component is unallocated; an allocated but zero-sized component still reports its true shape, but has no representable address. Symbol uses the getcomp_ infix (not get_) so it can never collide with a type-bound procedure named get_<component>.
subroutine, public	fitpack_sphere_c_getcomp_phi (this, ptr, extents)
	Raw view of component 'phi': address of the first element, plus the component's 1 extent(s). Null pointer and zero extents when the object or the component is unallocated; an allocated but zero-sized component still reports its true shape, but has no representable address. Symbol uses the getcomp_ infix (not get_) so it can never collide with a type-bound procedure named get_<component>.
subroutine, public	fitpack_sphere_c_getcomp_r (this, ptr, extents)
	Raw view of component 'r': address of the first element, plus the component's 1 extent(s). Null pointer and zero extents when the object or the component is unallocated; an allocated but zero-sized component still reports its true shape, but has no representable address. Symbol uses the getcomp_ infix (not get_) so it can never collide with a type-bound procedure named get_<component>.
subroutine, public	fitpack_sphere_c_getcomp_w (this, ptr, extents)
	Raw view of component 'w': address of the first element, plus the component's 1 extent(s). Null pointer and zero extents when the object or the component is unallocated; an allocated but zero-sized component still reports its true shape, but has no representable address. Symbol uses the getcomp_ infix (not get_) so it can never collide with a type-bound procedure named get_<component>.
subroutine, public	fitpack_sphere_c_getcomp_wrk2 (this, ptr, extents)
	Raw view of component 'wrk2': address of the first element, plus the component's 1 extent(s). Null pointer and zero extents when the object or the component is unallocated; an allocated but zero-sized component still reports its true shape, but has no representable address. Symbol uses the getcomp_ infix (not get_) so it can never collide with a type-bound procedure named get_<component>.
subroutine, public	fitpack_sphere_c_getcomp_t (this, ptr, extents)
	Raw view of component 't': address of the first element, plus the component's 2 extent(s). Null pointer and zero extents when the object or the component is unallocated; an allocated but zero-sized component still reports its true shape, but has no representable address. Symbol uses the getcomp_ infix (not get_) so it can never collide with a type-bound procedure named get_<component>.
type(c_ptr) function, public	fitpack_sphere_c_ref_m (this)
	Get pointer to scalar property 'm'.
type(c_ptr) function, public	fitpack_sphere_c_ref_lwrk2 (this)
	Get pointer to scalar property 'lwrk2'.
type(c_ptr) function, public	fitpack_sphere_c_ref_nmax (this)
	Get pointer to scalar property 'nmax'.

Detailed Description

C interface to fitpack_sphere.

Function/Subroutine Documentation

fitpack_sphere_c_allocate()

subroutine, public fitpack_sphere_domains_c::fitpack_sphere_c_allocate	(	type(fitpack_sphere_c), intent(inout)	this,
		type(fx_status), intent(out), optional	status )

[bind(C)] Allocate new object

Parameters

status

Optional. If absent, allocation failure triggers error stop.

Here is the call graph for this function:

fitpack_sphere_c_associate()

subroutine, public fitpack_sphere_domains_c::fitpack_sphere_c_associate	(	type(fitpack_sphere_c), intent(inout)	this,
		type(fitpack_sphere_c), intent(in)	that,
		type(fx_status), intent(out), optional	status )

[bind(C)] Shallow copy (pointer semantics — Fortran "associate" construct)

Parameters

status

Optional. If absent, errors trigger error stop.

Here is the call graph for this function:

fitpack_sphere_c_comm_expand()

subroutine, public fitpack_sphere_domains_c::fitpack_sphere_c_comm_expand	(	type(fitpack_sphere_c), intent(inout)	this,
		integer(c_int32_t), intent(in), value	n,
		real(c_double), dimension(n), intent(in)	buffer )

comm_expand

fitpack_sphere_c_comm_pack()

subroutine, public fitpack_sphere_domains_c::fitpack_sphere_c_comm_pack	(	type(fitpack_sphere_c), intent(inout)	this,
		integer(c_int32_t), intent(in), value	n,
		real(c_double), dimension(n), intent(inout)	buffer )

comm_pack

fitpack_sphere_c_comm_size()

integer(c_int32_t) function, public fitpack_sphere_domains_c::fitpack_sphere_c_comm_size

(

type(fitpack_sphere_c), intent(in)

this

)

comm_size

Here is the call graph for this function:

fitpack_sphere_c_copy()

subroutine, public fitpack_sphere_domains_c::fitpack_sphere_c_copy	(	type(fitpack_sphere_c), intent(inout)	this,
		type(fitpack_sphere_c), intent(in)	that,
		logical(c_bool), intent(in), value	deep_copy,
		type(fx_status), intent(out), optional	status )

[bind(C)] Copy. By default, mirrors source ownership: a view source yields a view (shallow handle copy); an owned source yields a deep copy via Fortran intrinsic assignment. Pass deep_copy=.true. to force a deep copy regardless of the source's ownership.

Parameters

deep_copy	When .true., always allocate a fresh Fortran object and deep-copy data, even if the source is a view.
status	Optional. If absent, errors trigger error stop.

Here is the call graph for this function:

fitpack_sphere_c_core_comm_expand()

subroutine, public fitpack_sphere_domains_c::fitpack_sphere_c_core_comm_expand	(	type(fitpack_sphere_c), intent(inout)	this,
		integer(c_int32_t), intent(in), value	n,
		real(c_double), dimension(n), intent(in)	buffer )

core_comm_expand

fitpack_sphere_c_core_comm_pack()

subroutine, public fitpack_sphere_domains_c::fitpack_sphere_c_core_comm_pack	(	type(fitpack_sphere_c), intent(inout)	this,
		integer(c_int32_t), intent(in), value	n,
		real(c_double), dimension(n), intent(inout)	buffer )

core_comm_pack

fitpack_sphere_c_core_comm_size()

integer(c_int32_t) function, public fitpack_sphere_domains_c::fitpack_sphere_c_core_comm_size

(

type(fitpack_sphere_c), intent(in)

this

)

core_comm_size

Here is the call graph for this function:

fitpack_sphere_c_destroy()

subroutine, public fitpack_sphere_domains_c::fitpack_sphere_c_destroy	(	type(fitpack_sphere_c), intent(inout)	this,
		type(fx_status), intent(out), optional	status )

[bind(C)] Deallocate object

Parameters

status

Optional. If absent, deallocation failure triggers error stop.

Here is the call graph for this function:

fitpack_sphere_c_destroy_base()

subroutine, public fitpack_sphere_domains_c::fitpack_sphere_c_destroy_base

(

type(fitpack_sphere_c), intent(inout)

this

)

destroy_base

fitpack_sphere_c_f2c()

type(fitpack_sphere_c) function fitpack_sphere_domains_c::fitpack_sphere_c_f2c ( type(fitpack_sphere), intent(in) f )

private

Create from Fortran object (owns copy)

fitpack_sphere_c_fit()

integer(c_int32_t) function, public fitpack_sphere_domains_c::fitpack_sphere_c_fit	(	type(fitpack_sphere_c), intent(in)	this,
		real(c_double), intent(in), optional	smoothing,
		logical(c_bool), intent(in), optional	keep_knots )

fit

Here is the call graph for this function:

fitpack_sphere_c_fptr2c()

type(fitpack_sphere_c) function fitpack_sphere_domains_c::fitpack_sphere_c_fptr2c ( type(fitpack_sphere), intent(inout), target f, logical, intent(in) want_pointer )

private

Create from Fortran object (optionally as pointer)

fitpack_sphere_c_get_pointer()

type(fitpack_sphere) function, pointer fitpack_sphere_domains_c::fitpack_sphere_c_get_pointer ( type(fitpack_sphere_c), intent(in) this )

private

Get pointer to embedded Fortran object (non-allocating)

fitpack_sphere_c_getcomp_phi()

subroutine, public fitpack_sphere_domains_c::fitpack_sphere_c_getcomp_phi	(	type(fitpack_sphere_c), intent(in)	this,
		type(c_ptr), intent(out)	ptr,
		integer(c_int64_t), dimension(1), intent(out)	extents )

Raw view of component 'phi': address of the first element, plus the component's 1 extent(s). Null pointer and zero extents when the object or the component is unallocated; an allocated but zero-sized component still reports its true shape, but has no representable address. Symbol uses the getcomp_ infix (not get_) so it can never collide with a type-bound procedure named get_<component>.

fitpack_sphere_c_getcomp_r()

subroutine, public fitpack_sphere_domains_c::fitpack_sphere_c_getcomp_r	(	type(fitpack_sphere_c), intent(in)	this,
		type(c_ptr), intent(out)	ptr,
		integer(c_int64_t), dimension(1), intent(out)	extents )

Raw view of component 'r': address of the first element, plus the component's 1 extent(s). Null pointer and zero extents when the object or the component is unallocated; an allocated but zero-sized component still reports its true shape, but has no representable address. Symbol uses the getcomp_ infix (not get_) so it can never collide with a type-bound procedure named get_<component>.

fitpack_sphere_c_getcomp_t()

subroutine, public fitpack_sphere_domains_c::fitpack_sphere_c_getcomp_t	(	type(fitpack_sphere_c), intent(in)	this,
		type(c_ptr), intent(out)	ptr,
		integer(c_int64_t), dimension(2), intent(out)	extents )

Raw view of component 't': address of the first element, plus the component's 2 extent(s). Null pointer and zero extents when the object or the component is unallocated; an allocated but zero-sized component still reports its true shape, but has no representable address. Symbol uses the getcomp_ infix (not get_) so it can never collide with a type-bound procedure named get_<component>.

fitpack_sphere_c_getcomp_theta()

subroutine, public fitpack_sphere_domains_c::fitpack_sphere_c_getcomp_theta	(	type(fitpack_sphere_c), intent(in)	this,
		type(c_ptr), intent(out)	ptr,
		integer(c_int64_t), dimension(1), intent(out)	extents )

Raw view of component 'theta': address of the first element, plus the component's 1 extent(s). Null pointer and zero extents when the object or the component is unallocated; an allocated but zero-sized component still reports its true shape, but has no representable address. Symbol uses the getcomp_ infix (not get_) so it can never collide with a type-bound procedure named get_<component>.

fitpack_sphere_c_getcomp_w()

subroutine, public fitpack_sphere_domains_c::fitpack_sphere_c_getcomp_w	(	type(fitpack_sphere_c), intent(in)	this,
		type(c_ptr), intent(out)	ptr,
		integer(c_int64_t), dimension(1), intent(out)	extents )

Raw view of component 'w': address of the first element, plus the component's 1 extent(s). Null pointer and zero extents when the object or the component is unallocated; an allocated but zero-sized component still reports its true shape, but has no representable address. Symbol uses the getcomp_ infix (not get_) so it can never collide with a type-bound procedure named get_<component>.

fitpack_sphere_c_getcomp_wrk2()

subroutine, public fitpack_sphere_domains_c::fitpack_sphere_c_getcomp_wrk2	(	type(fitpack_sphere_c), intent(in)	this,
		type(c_ptr), intent(out)	ptr,
		integer(c_int64_t), dimension(1), intent(out)	extents )

Raw view of component 'wrk2': address of the first element, plus the component's 1 extent(s). Null pointer and zero extents when the object or the component is unallocated; an allocated but zero-sized component still reports its true shape, but has no representable address. Symbol uses the getcomp_ infix (not get_) so it can never collide with a type-bound procedure named get_<component>.

fitpack_sphere_c_interpolate()

integer(c_int32_t) function, public fitpack_sphere_domains_c::fitpack_sphere_c_interpolate	(	type(fitpack_sphere_c), intent(in)	this,
		logical(c_bool), intent(in), optional	reset_knots )

interpolate

Here is the call graph for this function:

fitpack_sphere_c_is_same()

logical(c_bool) function, public fitpack_sphere_domains_c::fitpack_sphere_c_is_same	(	type(fitpack_sphere_c), intent(in)	this,
		type(fitpack_sphere_c), intent(in)	that )

Pointer-identity check: true iff both wrappers point to the same underlying Fortran object (and that object is allocated).

fitpack_sphere_c_least_squares()

integer(c_int32_t) function, public fitpack_sphere_domains_c::fitpack_sphere_c_least_squares	(	type(fitpack_sphere_c), intent(in)	this,
		real(c_double), intent(in), optional	smoothing,
		logical(c_bool), intent(in), optional	reset_knots )

least_squares

Here is the call graph for this function:

fitpack_sphere_c_move_alloc()

subroutine, public fitpack_sphere_domains_c::fitpack_sphere_c_move_alloc	(	type(fitpack_sphere_c), intent(inout)	to,
		type(fitpack_sphere_c), intent(inout)	from,
		type(fx_status), intent(out), optional	status )

[bind(C)] Move allocation (transfer ownership)

Parameters

status

Optional. If absent, errors trigger error stop.

Here is the call graph for this function:

fitpack_sphere_c_mse()

real(c_double) function, public fitpack_sphere_domains_c::fitpack_sphere_c_mse

(

type(fitpack_sphere_c), intent(in)

this

)

mse

Here is the call graph for this function:

fitpack_sphere_c_new_fit()

integer(c_int32_t) function, public fitpack_sphere_domains_c::fitpack_sphere_c_new_fit	(	type(fitpack_sphere_c), intent(in)	this,
		integer(c_int32_t), intent(in), value	n,
		real(c_double), dimension(n), intent(in)	theta,
		real(c_double), dimension(n), intent(in)	phi,
		real(c_double), dimension(n), intent(in)	r,
		real(c_double), dimension(n), intent(in), optional	w,
		real(c_double), intent(in), optional	smoothing )

new_fit

Here is the call graph for this function:

fitpack_sphere_c_new_points()

subroutine, public fitpack_sphere_domains_c::fitpack_sphere_c_new_points	(	type(fitpack_sphere_c), intent(inout)	this,
		integer(c_int32_t), intent(in), value	n,
		real(c_double), dimension(n), intent(in)	theta,
		real(c_double), dimension(n), intent(in)	phi,
		real(c_double), dimension(n), intent(in)	r,
		real(c_double), dimension(n), intent(in), optional	w )

new_points

fitpack_sphere_c_pointer()

logical function fitpack_sphere_domains_c::fitpack_sphere_c_pointer ( type(fitpack_sphere_c), intent(inout) this, type(fitpack_sphere), intent(inout), pointer fthis )

private

Get/allocate embedded Fortran object (internal, not bind(C)) Returns .true. on success, .false. on allocation failure.

fitpack_sphere_c_ref_lwrk2()

type(c_ptr) function, public fitpack_sphere_domains_c::fitpack_sphere_c_ref_lwrk2

(

type(fitpack_sphere_c), intent(in)

this

)

Get pointer to scalar property 'lwrk2'.

Here is the call graph for this function:

fitpack_sphere_c_ref_m()

type(c_ptr) function, public fitpack_sphere_domains_c::fitpack_sphere_c_ref_m

(

type(fitpack_sphere_c), intent(in)

this

)

Get pointer to scalar property 'm'.

Here is the call graph for this function:

fitpack_sphere_c_ref_nmax()

type(c_ptr) function, public fitpack_sphere_domains_c::fitpack_sphere_c_ref_nmax

(

type(fitpack_sphere_c), intent(in)

this

)

Get pointer to scalar property 'nmax'.

Here is the call graph for this function:

fitpack_sphere_c_sphere_eval_many()

subroutine, public fitpack_sphere_domains_c::fitpack_sphere_c_sphere_eval_many	(	type(fitpack_sphere_c), intent(inout)	this,
		integer(c_int32_t), intent(in), value	n,
		real(c_double), dimension(n), intent(in)	theta,
		real(c_double), dimension(n), intent(in)	phi,
		integer(c_int32_t), intent(out), optional	ierr,
		real(c_double), dimension(*), intent(inout)	result,
		integer(c_int32_t), intent(out)	n_result,
		integer(c_int32_t), intent(in), value	max_size )

sphere_eval_many

fitpack_sphere_c_sphere_eval_one()

real(c_double) function, public fitpack_sphere_domains_c::fitpack_sphere_c_sphere_eval_one	(	type(fitpack_sphere_c), intent(in)	this,
		real(c_double), intent(in), value	theta,
		real(c_double), intent(in), value	phi,
		integer(c_int32_t), intent(out), optional	ierr )

sphere_eval_one

Here is the call graph for this function: