mod_gravity_settings Module

Contents

Derived Types

gravity_settings_t

Functions

new_gravity_settings is_enabled

Subroutines

enable disable

Derived Types

type, public :: gravity_settings_t

Components

Type	Visibility	Attributes		Name		Initial
logical,	private		::	has_external_gravity

Type-Bound Procedures

procedure, public :: enable
procedure, public :: disable
procedure, public :: is_enabled

Functions

public pure function new_gravity_settings() result(gravity)

Arguments

None

Return Value type(gravity_settings_t)

private pure function is_enabled(this)

Arguments

Type	Intent	Optional	Attributes		Name
class(gravity_settings_t),	intent(in)			::	this

Return Value logical

Subroutines

private pure subroutine enable(this)

Arguments

Type	Intent	Optional	Attributes		Name
class(gravity_settings_t),	intent(inout)			::	this

private pure subroutine disable(this)

Arguments

Type	Intent	Optional	Attributes		Name
class(gravity_settings_t),	intent(inout)			::	this