0.6.0
Loading...
Searching...
No Matches
type_node_type.f90 File Reference

Data Types

type  type_node_type::t_node_type
 Node type. More...
 
interface  type_node_type::operator(==)
 
interface  type_node_type::operator(/=)
 

Modules

module  type_node_type
 Node type handy tools.
 

Functions/Subroutines

pure logical function type_node_type::are_node_types_equal (node_type_1, node_type_2)
 
pure logical function type_node_type::are_node_types_different (node_type_1, node_type_2)
 
type(t_node_type) function, public type_node_type::get_dual_node_type (primal_node_type)
 
type(t_node_type) function, public type_node_type::get_two_d_node_type (primal_node_type)
 
character(len=15) function, public type_node_type::get_node_type_name (node_type)
 

Variables

type(t_node_type), parameter, public type_node_type::cell_centered = t_node_type([0_1, 0_1, 0_1], 0)
 
type(t_node_type), parameter, public type_node_type::x_face_centered = t_node_type([1_1, 0_1, 0_1], 1)
 
type(t_node_type), parameter, public type_node_type::y_face_centered = t_node_type([0_1, 1_1, 0_1], 2)
 
type(t_node_type), parameter, public type_node_type::z_face_centered = t_node_type([0_1, 0_1, 1_1], 4)
 
type(t_node_type), parameter, public type_node_type::x_edge_centered = t_node_type([1_1, 1_1, 0_1], 3)
 
type(t_node_type), parameter, public type_node_type::y_edge_centered = t_node_type([1_1, 0_1, 1_1], 5)
 
type(t_node_type), parameter, public type_node_type::z_edge_centered = t_node_type([0_1, 1_1, 1_1], 6)
 
type(t_node_type), parameter, public type_node_type::vertex_centered = t_node_type([1_1, 1_1, 1_1], 7)
 
type(t_node_type), parameter, public type_node_type::error_node_type = t_node_type([2_1, 1_1, 1_1], 8)
 
character(len=15), dimension(0:8), parameter type_node_type::node_type_name = ["cell-centered ", "u-face-centered", "v-face-centered", "u-edge-centered", "w-face-centered", "v-edge-centered", "w-edge-centered", "vertex-centered", "error-node-type"]
 Names of different node types for fancy output.