fstr_setup_util.f90 File Reference

Go to the source code of this file.

Data Types
type	fstr_setup_util::fstr_str_arr
	container of character array pointer, because of gfortran's bug More...

Modules
module	fstr_setup_util
	This module contains auxiliary functions in calculation setup.

Functions/Subroutines
logical function	fstr_setup_util::fstr_str2index (s, x)
subroutine	fstr_setup_util::fstr_strupr (s)
logical function	fstr_setup_util::fstr_streqr (s1, s2)
subroutine	fstr_setup_util::fstr_ctrl_err_stop
subroutine	fstr_setup_util::fstr_setup_util_err_stop (msg)
subroutine	fstr_setup_util::backset_group_pointers (hecMESH, grp_type_name)
integer(kind=kint) function	fstr_setup_util::node_global_to_local (hecMESH, list, n)
integer(kind=kint) function	fstr_setup_util::elem_global_to_local (hecMESH, list, n)
subroutine	fstr_setup_util::append_new_group (hecMESH, grp_type_name, name, count, list, grp_id)
subroutine	fstr_setup_util::append_node_grp_from_surf_grp (hecMESH, sgrp_id, ngrp_id)
subroutine	fstr_setup_util::append_intersection_node_grp (hecMESH, ngrp_id1, ngrp_id2)
integer(kind=kint) function	fstr_setup_util::get_grp_member_n (hecMESH, grp_type_name, name)
integer(kind=kint) function	fstr_setup_util::get_grp_id (hecMESH, grp_type_name, name)
integer(kind=kint) function	fstr_setup_util::get_grp_member (hecMESH, grp_type_name, name, member1, member2)
integer(kind=kint) function	fstr_setup_util::get_local_member_index (hecMESH, type_name, name, local_id)
integer(kind=kint) function	fstr_setup_util::get_sorted_local_member_index (hecMESH, hecPARAM, type_name, name, local_id)
subroutine	fstr_setup_util::bsearch_int_array (array, istart, iend, val, idx)
recursive subroutine	fstr_setup_util::qsort_int_array (array, istart, iend)
subroutine	fstr_setup_util::uniq_int_array (array, len, newlen)
subroutine	fstr_setup_util::node_grp_name_to_id (hecMESH, header_name, n, grp_id_name, grp_ID)
subroutine	fstr_setup_util::elem_grp_name_to_id (hecMESH, header_name, n, grp_id_name, grp_ID)
subroutine	fstr_setup_util::node_grp_name_to_id_ex (hecMESH, header_name, n, grp_id_name, grp_ID)
subroutine	fstr_setup_util::nodesurf_grp_name_to_id_ex (hecMESH, header_name, n, grp_id_name, grp_ID, grp_TYPE)
subroutine	fstr_setup_util::elem_grp_name_to_id_ex (hecMESH, header_name, n, grp_id_name, grp_ID)
subroutine	fstr_setup_util::surf_grp_name_to_id_ex (hecMESH, header_name, n, grp_id_name, grp_ID)
subroutine	fstr_setup_util::dload_grp_name_to_id_ex (hecMESH, n, grp_id_name, fg_surface, grp_ID)
subroutine	fstr_setup_util::append_new_amplitude (amp, name, type_def, type_time, type_val, np, val, table)
	Append new amplitude table at the end of existing amplitude tables. More...
subroutine	fstr_setup_util::amp_name_to_id (hecMESH, header_name, aname, id)
subroutine	fstr_setup_util::get_amp_id (hecMESH, aname, id)
integer(kind=kint) function	fstr_setup_util::get_node_grp_member_n (hecMESH, grp_name_array, n)
subroutine	fstr_setup_util::fstr_expand_index_array (array, old_size, new_size)
subroutine	fstr_setup_util::fstr_expand_char_array (array, old_size, new_size)
subroutine	fstr_setup_util::fstr_expand_integer_array (array, old_size, new_size)
subroutine	fstr_setup_util::fstr_expand_real_array (array, old_size, new_size)
subroutine	fstr_setup_util::fstr_expand_integer_array2 (array, column, old_size, new_size)
subroutine	fstr_setup_util::fstr_expand_real_array2 (array, column, old_size, new_size)
subroutine	fstr_setup_util::fstr_expand_name_array (array, old_size, new_size)
subroutine	fstr_setup_util::fstr_delete_index_array (array, old_size, nindex)
subroutine	fstr_setup_util::fstr_delete_integer_array (array, old_size, nitem)
subroutine	fstr_setup_util::fstr_delete_real_array (array, old_size, nitem)
subroutine	fstr_setup_util::reallocate_integer (array, n)
subroutine	fstr_setup_util::reallocate_real (array, n)
subroutine	fstr_setup_util::fstr_setup_visualize (ctrl, hecMESH)
subroutine	fstr_setup_util::fstr_setup_visualize_main (ctrl, vis_filename)