hecmw_util_f.F90 File Reference

Go to the source code of this file.

Data Types
type	hecmw_util::hecmwst_section
type	hecmw_util::hecmwst_material
type	hecmw_util::hecmwst_mpc
type	hecmw_util::hecmwst_amplitude
type	hecmw_util::hecmwst_node_grp
type	hecmw_util::hecmwst_elem_grp
type	hecmw_util::hecmwst_surf_grp
type	hecmw_util::hecmwst_contact_pair
type	hecmw_util::hecmwst_refine_origin
type	hecmw_util::hecmwst_local_mesh
type	hecmw_util::hecmwst_matrix_comm
type	hecmw_util::hecmwst_index_value_pair
type	hecmw_util::hecmwst_matrix_lagrange
	Structure for Lagrange multiplier-related part of stiffness matrix (Lagrange multiplier-related matrix) More...
type	hecmw_util::hecmwst_matrix

Modules
module	hecmw_util
	I/O and Utility.

Functions/Subroutines
subroutine	hecmw_util::hecmw_init
subroutine	hecmw_util::hecmw_init_ex (ctrlfile)
subroutine	hecmw_util::hecmw_finalize
subroutine	hecmw_util::hecmw_abort (comm)
real(kind=kreal) function	hecmw_util::hecmw_wtime ()
real(kind=kreal) function	hecmw_util::hecmw_wtick ()
integer(kind=kint) function	hecmw_util::hecmw_comm_get_comm ()
integer(kind=kint) function	hecmw_util::hecmw_comm_get_rank ()
integer(kind=kint) function	hecmw_util::hecmw_comm_get_size ()
subroutine	hecmw_util::hecmw_nullify_section (P)
subroutine	hecmw_util::hecmw_nullify_material (P)
subroutine	hecmw_util::hecmw_nullify_mpc (P)
subroutine	hecmw_util::hecmw_initialize_mpc (mpc, n_mpc, n_item)
subroutine	hecmw_util::hecmw_finalize_mpc (P)
subroutine	hecmw_util::hecmw_nullify_amplitude (P)
subroutine	hecmw_util::hecmw_nullify_node_grp (P)
subroutine	hecmw_util::hecmw_nullify_elem_grp (P)
subroutine	hecmw_util::hecmw_nullify_surf_grp (P)
subroutine	hecmw_util::hecmw_nullify_contact_pair (P)
subroutine	hecmw_util::hecmw_nullify_refine_origin (P)
subroutine	hecmw_util::hecmw_nullify_mesh (P)
subroutine	hecmw_util::hecmw_nullify_matrix_comm (P)
subroutine	hecmw_util::hecmw_nullify_matrix (P)
subroutine	hecmw_util::hecmw_print_matrix (fname, P)
subroutine	hecmw_util::hecmw_read_matrix (fname, P)
subroutine	hecmw_util::hecmw_clone_matrix (hecMATorig, hecMAT)
subroutine	hecmw_util::hecmw_copy_matrix (hecMATorig, hecMAT)
subroutine	hecmw_util::hecmw_blockmatrix_expand (hecMATorig, hecMAT, NDOF)
subroutine	hecmw_util::hecmw_vector_contract (hecMATorig, hecMAT, NDOF)

Variables
integer(kind=4), parameter	hecmw_util::kint = 4
integer(kind=4), parameter	hecmw_util::kreal = 8
integer(kind=kint), parameter	hecmw_util::hecmw_name_len = 63
integer(kind=kint), parameter	hecmw_util::hecmw_header_len = 127
integer(kind=kint), parameter	hecmw_util::hecmw_msg_len = 255
integer(kind=kint), parameter	hecmw_util::hecmw_filename_len = 1023
integer(kind=kint), parameter	hecmw_util::hecmw_sum = 46801
integer(kind=kint), parameter	hecmw_util::hecmw_prod = 46802
integer(kind=kint), parameter	hecmw_util::hecmw_max = 46803
integer(kind=kint), parameter	hecmw_util::hecmw_min = 46804
integer(kind=kint), parameter	hecmw_util::hecmw_integer = 53951
integer(kind=kint), parameter	hecmw_util::hecmw_single_precision = 53952
integer(kind=kint), parameter	hecmw_util::hecmw_double_precision = 53953
integer(kind=kint), parameter	hecmw_util::hecmw_character = 53954
integer(kind=kint), parameter	hecmw_util::hecmw_status_size = MPI_STATUS_SIZE
integer(kind=kint), parameter	hecmw_util::hecmw_sect_type_solid = 1
integer(kind=kint), parameter	hecmw_util::hecmw_sect_type_shell = 2
integer(kind=kint), parameter	hecmw_util::hecmw_sect_type_beam = 3
integer(kind=kint), parameter	hecmw_util::hecmw_sect_type_interface = 4
integer(kind=kint), parameter	hecmw_util::hecmw_sect_opt_pstress = 0
integer(kind=kint), parameter	hecmw_util::hecmw_sect_opt_pstrain = 1
integer(kind=kint), parameter	hecmw_util::hecmw_sect_opt_asymmetry = 2
integer(kind=kint), parameter	hecmw_util::hecmw_sect_opt_pstress_ri = 10
integer(kind=kint), parameter	hecmw_util::hecmw_sect_opt_pstrain_ri = 11
integer(kind=kint), parameter	hecmw_util::hecmw_sect_opt_asymmetry_ri = 12
integer(kind=kint), parameter	hecmw_util::hecmw_amp_typedef_tabular = 1
integer(kind=kint), parameter	hecmw_util::hecmw_amp_typetime_step = 1
integer(kind=kint), parameter	hecmw_util::hecmw_amp_typeval_relative = 1
integer(kind=kint), parameter	hecmw_util::hecmw_amp_typeval_absolute = 2
integer(kind=kint), parameter	hecmw_util::hecmw_bcgrptype_desplacement = 1
integer(kind=kint), parameter	hecmw_util::hecmw_bcgrptype_flux = 2
integer(kind=kint), parameter	hecmw_util::hecmw_contact_type_node_surf = 1
integer(kind=kint), parameter	hecmw_util::hecmw_contact_type_surf_surf = 2
integer(kind=kint), parameter	hecmw_util::hecmw_contact_type_node_elem = 3
integer(kind=kint), parameter	hecmw_util::hecmw_flag_parttype_unknown = 0
integer(kind=kint), parameter	hecmw_util::hecmw_flag_parttype_nodebased = 1
integer(kind=kint), parameter	hecmw_util::hecmw_flag_parttype_elembased = 2
integer(kind=kint), parameter	hecmw_util::hecmw_flag_partcontact_unknown = 0
integer(kind=kint), parameter	hecmw_util::hecmw_flag_partcontact_aggregate = 1
integer(kind=kint), parameter	hecmw_util::hecmw_flag_partcontact_distribute = 2
integer(kind=kint), parameter	hecmw_util::hecmw_flag_partcontact_simple = 3