forclust Module

Seyed Ali Ghasemi
509 statements
Source File

Used by

Help

Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.
Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs.

Contents

Derived Types

linux_backlight linux_cpu linux_nodes cluster

Subroutines

find_number_of_nodes select_linux find_number_of_cpus select_node is_cpu_online get_cpu_base_frequency get_cpuinfo_max_frequency get_cpuinfo_min_frequency get_cpu_scaling_cur_frequency get_cpu_scaling_max_frequency get_cpu_scaling_min_frequency get_cpu_scaling_governor get_cpu_energy_performance_preference set_cpu_offline set_cpu_online set_cpu_scaling_max_freq set_cpu_scaling_min_freq set_cpu_scaling_governor set_cpu_energy_performance_preference is_intel_pstate_available get_intel_turbo set_intel_turbo set_cpu_debug_switch set_node_debug_switch print_all_cluster_info select_backlight set_backlight_debug_switch get_backlight_actual_brightness get_backlight_max_brightness set_backlight_brightness deallocate_linux_backlight deallocate_linux_cpu deallocate_linux_nodes deallocate_cluster

Derived Types

type, private :: linux_backlight

Components

Type	Visibility	Attributes		Name		Initial
character(len=:),	public,	allocatable	::	debug
character(len=:),	public,	allocatable	::	path_backlight
integer,	public		::	actual_brightness
integer,	public		::	brightness
integer,	public		::	max_brightness

Type-Bound Procedures

procedure , public , :: set_debug => set_backlight_debug_switch Subroutine
procedure , public , :: select => select_backlight Subroutine
procedure , public , :: get_actual_brightness => get_backlight_actual_brightness Subroutine
procedure , public , :: get_max_brightness => get_backlight_max_brightness Subroutine
procedure , public , :: set_brightness => set_backlight_brightness Subroutine
procedure , public , :: deselect => deallocate_linux_backlight Subroutine

type, private :: linux_cpu

Components

Type	Visibility	Attributes		Name		Initial
character(len=:),	public,	allocatable	::	debug
character(len=:),	public,	allocatable	::	path_cpu
integer,	public		::	online
integer,	public		::	base_frequency
integer,	public		::	cpuinfo_max_freq
integer,	public		::	cpuinfo_min_freq
integer,	public		::	scaling_cur_freq
integer,	public		::	scaling_max_freq
integer,	public		::	scaling_min_freq
character(len=:),	public,	allocatable	::	scaling_governor
character(len=:),	public,	allocatable	::	energy_performance_preference

Type-Bound Procedures

procedure , public , :: set_debug => set_cpu_debug_switch Subroutine
procedure , public , :: is_online => is_cpu_online Subroutine
procedure , public , :: get_base_freq => get_cpu_base_frequency Subroutine
procedure , public , :: get_cpuinfo_max_freq => get_cpuinfo_max_frequency Subroutine
procedure , public , :: get_cpuinfo_min_freq => get_cpuinfo_min_frequency Subroutine
procedure , public , :: get_scaling_cur_freq => get_cpu_scaling_cur_frequency Subroutine
procedure , public , :: get_scaling_max_freq => get_cpu_scaling_max_frequency Subroutine
procedure , public , :: get_scaling_min_freq => get_cpu_scaling_min_frequency Subroutine
procedure , public , :: get_scaling_governor => get_cpu_scaling_governor Subroutine
procedure , public , :: get_energy_performance => get_cpu_energy_performance_preference Subroutine
procedure , public , :: set_offline => set_cpu_offline Subroutine
procedure , public , :: set_online => set_cpu_online Subroutine
procedure , public , :: set_scaling_max_freq => set_cpu_scaling_max_freq Subroutine
procedure , public , :: set_scaling_min_freq => set_cpu_scaling_min_freq Subroutine
procedure , public , :: set_scaling_governor => set_cpu_scaling_governor Subroutine
procedure , public , :: set_energy_performance => set_cpu_energy_performance_preference Subroutine
procedure , public , :: deselect => deallocate_linux_cpu Subroutine

type, private :: linux_nodes

Components

Type	Visibility	Attributes		Name		Initial
character(len=:),	public,	allocatable	::	debug
character(len=:),	public,	allocatable	::	path_node
type(linux_cpu),	public,	dimension(:), allocatable	::	cpu
integer,	public		::	ncpus
character(len=:),	public,	allocatable	::	turbo
integer,	public		::	is_intel_pstate

Type-Bound Procedures

procedure , public , :: set_debug => set_node_debug_switch Subroutine
procedure , public , :: select => select_node Subroutine
procedure , private :: find_number_of_cpus Subroutine
procedure , private :: is_intel_pstate_available Subroutine
procedure , public , :: get_turbo => get_intel_turbo Subroutine
procedure , public , :: set_turbo => set_intel_turbo Subroutine
procedure , public , :: deselect => deallocate_linux_nodes Subroutine

type, public :: cluster

Components

Type	Visibility	Attributes		Name		Initial
type(linux_nodes),	public,	dimension(:), allocatable	::	node
integer,	public		::	nnodes
type(linux_backlight),	public		::	backlight

Type-Bound Procedures

procedure , public , :: select => select_linux Subroutine
procedure , private :: find_number_of_nodes Subroutine
procedure , public , :: print_info => print_all_cluster_info Subroutine
procedure , public , :: deselect => deallocate_cluster Subroutine

Subroutines

private impure elemental subroutine find_number_of_nodes(this)

Author: Seyed Ali Ghasemi

Arguments

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

private impure elemental subroutine select_linux(this)

Author: Seyed Ali Ghasemi

Arguments

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

private impure elemental subroutine find_number_of_cpus(this)

Author: Seyed Ali Ghasemi

Arguments

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

private impure elemental subroutine select_node(this)

Author: Seyed Ali Ghasemi

Arguments

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

private impure elemental subroutine is_cpu_online(this, online)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(linux_cpu),	intent(inout)			::	this
integer,	intent(out),	optional		::	online

private impure elemental subroutine get_cpu_base_frequency(this, base_frequency)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(linux_cpu),	intent(inout)			::	this
integer,	intent(out),	optional		::	base_frequency

private impure elemental subroutine get_cpuinfo_max_frequency(this, cpuinfo_max_freq)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(linux_cpu),	intent(inout)			::	this
integer,	intent(out),	optional		::	cpuinfo_max_freq

private impure elemental subroutine get_cpuinfo_min_frequency(this, cpuinfo_min_freq)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(linux_cpu),	intent(inout)			::	this
integer,	intent(out),	optional		::	cpuinfo_min_freq

private impure elemental subroutine get_cpu_scaling_cur_frequency(this, scaling_cur_freq)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(linux_cpu),	intent(inout)			::	this
integer,	intent(out),	optional		::	scaling_cur_freq

private impure elemental subroutine get_cpu_scaling_max_frequency(this, scaling_max_freq)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(linux_cpu),	intent(inout)			::	this
integer,	intent(out),	optional		::	scaling_max_freq

private impure elemental subroutine get_cpu_scaling_min_frequency(this, scaling_min_freq)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(linux_cpu),	intent(inout)			::	this
integer,	intent(out),	optional		::	scaling_min_freq

private impure elemental subroutine get_cpu_scaling_governor(this, scaling_governor)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(linux_cpu),	intent(inout)			::	this
character(len=*),	intent(out),	optional		::	scaling_governor

private impure elemental subroutine get_cpu_energy_performance_preference(this, energy_performance_preference)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(linux_cpu),	intent(inout)			::	this
character(len=*),	intent(out),	optional		::	energy_performance_preference

private impure elemental subroutine set_cpu_offline(this)

Author: Seyed Ali Ghasemi

Arguments

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

private impure elemental subroutine set_cpu_online(this)

Author: Seyed Ali Ghasemi

Arguments

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

private impure elemental subroutine set_cpu_scaling_max_freq(this, max_freq)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(linux_cpu),	intent(inout)			::	this
integer,	intent(in)			::	max_freq

private impure elemental subroutine set_cpu_scaling_min_freq(this, min_freq)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(linux_cpu),	intent(inout)			::	this
integer,	intent(in)			::	min_freq

private impure elemental subroutine set_cpu_scaling_governor(this, scaling_governor)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(linux_cpu),	intent(inout)			::	this
character(len=*),	intent(in)			::	scaling_governor

private impure elemental subroutine set_cpu_energy_performance_preference(this, energy_performance_preference)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(linux_cpu),	intent(inout)			::	this
character(len=*),	intent(in)			::	energy_performance_preference

private impure elemental subroutine is_intel_pstate_available(this)

Author: Seyed Ali Ghasemi

Arguments

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

private impure elemental subroutine get_intel_turbo(this, turbo)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(linux_nodes),	intent(inout)			::	this
character(len=*),	intent(out),	optional		::	turbo

private impure elemental subroutine set_intel_turbo(this, turbo)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(linux_nodes),	intent(inout)			::	this
character(len=*),	intent(in)			::	turbo

private pure elemental subroutine set_cpu_debug_switch(this, debug)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(linux_cpu),	intent(inout)			::	this
character(len=*),	intent(in)			::	debug

private pure elemental subroutine set_node_debug_switch(this, debug)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(linux_nodes),	intent(inout)			::	this
character(len=*),	intent(in)			::	debug

private impure elemental subroutine print_all_cluster_info(this)

Author: Seyed Ali Ghasemi

Arguments

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

private impure elemental subroutine select_backlight(this)

Author: Seyed Ali Ghasemi

Arguments

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

private pure elemental subroutine set_backlight_debug_switch(this, debug)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(linux_backlight),	intent(inout)			::	this
character(len=*),	intent(in)			::	debug

private impure elemental subroutine get_backlight_actual_brightness(this, actual_brightness)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(linux_backlight),	intent(inout)			::	this
integer,	intent(out),	optional		::	actual_brightness

private impure elemental subroutine get_backlight_max_brightness(this, max_brightness)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(linux_backlight),	intent(inout)			::	this
integer,	intent(out),	optional		::	max_brightness

private impure elemental subroutine set_backlight_brightness(this, brightness)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(linux_backlight),	intent(inout)			::	this
integer,	intent(in)			::	brightness

private pure elemental subroutine deallocate_linux_backlight(this)

Author: Seyed Ali Ghasemi

Arguments

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

private pure elemental subroutine deallocate_linux_cpu(this)

Author: Seyed Ali Ghasemi

Arguments

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

private pure elemental subroutine deallocate_linux_nodes(this)

Author: Seyed Ali Ghasemi

Arguments

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

private pure elemental subroutine deallocate_cluster(this)

Author: Seyed Ali Ghasemi

Arguments

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