OpenCMISS-Iron Internal API Documentation
field_io_routines Module Reference

Implements lists of Field IO operation. More...

Data Types

interface  checked_deallocate
 
type  field_io_component_info_set
 contains information for parallel IO, and it is nodal base More...
 
type  field_io_component_info_set_ptr_type
 
type  field_io_info_set
 contains information for parallel IO, and it is nodal base More...
 
type  field_variable_component_ptr_type
 field variable component type pointer for IO More...
 
interface  FieldExport_CloseSession
 
interface  FieldExport_Component
 
interface  FieldExport_CoordinateComponent
 
interface  FieldExport_CoordinateDerivativeIndices
 
interface  FieldExport_CoordinateVariable
 
interface  FieldExport_DerivativeIndices
 
interface  FieldExport_ElementGridSize
 
interface  FieldExport_ElementGridValues
 
interface  FieldExport_ElementIndex
 
interface  FieldExport_ElementNodeIndices
 
interface  FieldExport_ElementNodeScales
 
interface  FieldExport_EndComponent
 
interface  FieldExport_FieldCount
 
interface  FieldExport_Group
 
interface  FieldExport_MeshDimensions
 
interface  FieldExport_NodeCount
 
interface  FieldExport_NodeScaleIndexes
 
interface  FieldExport_NodeValues
 
interface  FieldExport_OpenSession
 
interface  FieldExport_ScaleFactors
 
interface  FieldExport_ScalingFactorCount
 
interface  FieldExport_Variable
 
interface  FieldExport_VersionInfo
 
interface  grow_array
 
type  mesh_elements_type_ptr_type
 field variable component type pointer for IO More...
 
interface  reallocate
 

Functions/Subroutines

subroutine reallocate_int (array, newSize, errorMessage, ERR, ERROR,)
 
subroutine reallocate_real (array, newSize, errorMessage, ERR, ERROR,)
 
subroutine reallocate_string (array, newSize, errorMessage, ERR, ERROR,)
 
subroutine reallocate_components (array, newSize, errorMessage, ERR, ERROR,)
 
subroutine reallocate_basis (array, newSize, errorMessage, ERR, ERROR,)
 
subroutine reallocate_field (array, newSize, errorMessage, ERR, ERROR,)
 
subroutine reallocate_elements (array, newSize, errorMessage, ERR, ERROR,)
 
subroutine reallocate_2d (array, newSize1, newSize2, errorMessage, ERR, ERROR,)
 
subroutine grow_array_int (array, delta, errorMessage, ERR, ERROR,)
 
subroutine grow_array_real (array, delta, errorMessage, ERR, ERROR,)
 
subroutine grow_array_components (array, delta, errorMessage, ERR, ERROR,)
 
subroutine checked_deallocate_int (array)
 
subroutine checked_deallocate_real (array)
 
subroutine checked_deallocate_2d_int (array)
 
subroutine checked_deallocate_components (array)
 
subroutine checked_deallocate_str (array)
 
subroutine checked_deallocate_elements (array)
 
subroutine checked_deallocate_basis (array)
 
subroutine checked_deallocate_field (array)
 
subroutine field_io_field_info (STRING, LABEL_TYPE, FIELD_TYPE, ERR, ERROR,)
 Get the field information. More...
 
integer(intg) function field_io_derivative_info (LINE, ERR, ERROR)
 Get the derivative information. More...
 
integer(intg) function field_io_element_derivative_index (ELEMENT, DERIVATIVE_NUMBER, NODE_NUMBER, ERR, ERROR)
 Use the element version information to calcualte the derivative index of a given nodal derivative for an element. More...
 
subroutine field_io_create_fields (NAME, REGION, DECOMPOSITION, FIELD_VALUES_SET_TYPE, NUMBER_OF_FIELDS,
 Create decompsition. More...
 
subroutine field_io_create_decompistion (DECOMPOSITION, DECOMPOSITION_USER_NUMBER, DECOMPOSITION_METHOD, MESH, NUMBER_OF_DOMAINS, ERR, ERROR,)
 Create decompition. More...
 
subroutine, public field_io_fields_import (NAME, METHOD, REGION, MESH, MESH_USER_NUMBER, DECOMPOSITION, DECOMPOSITION_USER_NUMBER, DECOMPOSITION_METHOD, FIELD_VALUES_SET_TYPE, FIELD_SCALING_TYPE, ERR, ERROR,)
 Import fields from files into different computational nodes. More...
 
subroutine field_io_fill_basis_info (INTERPOLATION_XI, LIST_STR, NUMBER_OF_COMPONENTS, ERR, ERROR,)
 Finding basis information. More...
 
subroutine field_io_import_global_mesh (NAME, REGION, MESH, MESH_USER_NUMBER, MASTER_COMPUTATIONAL_NUMBER, my_computational_node_number, MESH_COMPONENTS_OF_FIELD_COMPONENTS, COMPONENTS_IN_FIELDS, NUMBER_OF_FIELDS, NUMBER_OF_EXNODE_FILES, ERR, ERROR,)
 Read the global mesh into one computational node first and then broadcasting to others nodes. More...
 
subroutine fieldio_translatelabelintointerpolationtype (INTERPOLATION, LABEL_TYPE, ERR, ERROR,)
 Finding basis information. More...
 
subroutine fieldio_calculatesimplexscaleandnodecounts (BASIS, num_scl, num_node, ERR, ERROR,)
 Finding basis information. More...
 
subroutine field_io_calculate_tp_scale_and_node_counts (BASIS, num_scl, num_node, ERR, ERROR,)
 Finding basis information. More...
 
integer(intg) function findmylocaldomainnumber (mapping, myComputationalNodeNumber)
 
subroutine fieldio_exportelementalgroupheaderfortran (global_number, MAX_NODE_COMP_INDEX, NUM_OF_SCALING_FACTOR_SETS, LIST_COMP_SCALE, my_computational_node_number, elementalInfoSet, sessionHandle, ERR, ERROR,)
 Write the header of a group elements using FORTRAN. More...
 
subroutine field_io_export_element_scale_factors (sessionHandle, components, componentScales, globalNumber, myComputationalNodeNumber, ERR, ERROR,)
 
subroutine field_io_export_elements_into_local_file (ELEMENTAL_INFO_SET, NAME, my_computational_node_number, ERR, ERROR,)
 Write all the elemental information from LOCAL_PROCESS_NODAL_INFO_SET to exelem files. More...
 
subroutine field_io_elemental_info_set_sort (ELEMENTAL_INFO_SET, my_computational_node_number, ERR, ERROR,)
 Sort the Elemental_info_set according to the type of field variable components. More...
 
subroutine fieldio_elementalinfosetattachlocalprocess (ELEMENTAL_INFO_SET, FIELDS, ERR, ERROR,)
 Collect the elemental information from each MPI process. More...
 
logical function field_io_compare_info_set_components (SET1, SET2)
 
subroutine field_io_compare_info_set_derivatives (SET1, SET2, my_computational_node_number, global_number1, global_number2, doesMatch, ERR, ERROR,)
 
subroutine field_io_nodal_info_set_sort (NODAL_INFO_SET, my_computational_node_number, ERR, ERROR,)
 Sort nodal information according to the type of field variable component. More...
 
type(varying_string) function field_io_label_derivative_info_get (GROUP_DERIVATIVES, NUMBER_DERIVATIVES, LABEL_TYPE, ERR, ERROR)
 Get the derivative information. More...
 
type(varying_string) function field_io_get_field_info_label (FIELD, ERR, ERROR)
 Get the field information. More...
 
type(varying_string) function field_io_get_variable_info_label (COMPONENT, ERR, ERROR)
 Get the field information. More...
 
type(varying_string) function field_io_get_component_info_label (COMPONENT, ERR, ERROR)
 Get the field information. More...
 
subroutine field_io_export_nodal_group_header_fortran (fieldInfoSet, global_number, MAX_NUM_OF_NODAL_DERIVATIVES, my_computational_node_number, sessionHandle, paddingInfo, ERR, ERROR,)
 Write the header of a group nodes using FORTRAIN. More...
 
subroutine field_io_export_nodes_into_local_file (NODAL_INFO_SET, NAME, my_computational_node_number, ERR, ERROR,)
 Write all the nodal information from NODAL_INFO_SET to local exnode files. More...
 
subroutine field_io_fortran_file_read_string (FILE_ID, STRING_DATA, FILE_END, ERR, ERROR,)
 Read a string using FORTRAN IO. More...
 
subroutine field_io_fortran_file_read_dp (FILE_ID, REAL_DATA, LEN_OF_DATA, FILE_END, ERR, ERROR,)
 Read a real data using FORTRAN IO. More...
 
subroutine field_io_fortran_file_write_dp (FILE_ID, REAL_DATA, LEN_OF_DATA, ERR, ERROR,)
 Write a real data using FORTRAN IO. More...
 
subroutine field_io_fortran_file_read_intg (FILE_ID, INTG_DATA, LEN_OF_DATA, ERR, ERROR,)
 Read a integer data. More...
 
subroutine field_io_fortran_file_write_intg (FILE_ID, INTG_DATA, LEN_OF_DATA, ERR, ERROR,)
 Write a integer data. More...
 
subroutine field_io_fortran_file_open (FILE_ID, FILE_NAME, FILE_STATUS, ERR, ERROR,)
 Open a file using Fortran. More...
 
subroutine field_io_fortran_file_close (FILE_ID, ERR, ERROR,)
 Close a file using Fortran. More...
 
subroutine string_to_muti_integers_vs (STRING, NUMBER_OF_INTEGERS, INTG_DATA, ERR, ERROR,)
 
subroutine string_to_muti_reals_vs (STRING, NUMBER_OF_REALS, REAL_DATA, POSITION, ERR, ERROR,)
 
subroutine fieldio_nodelinfosetattachlocalprocess (NODAL_INFO_SET, FIELDS, my_computational_node_number, ERR, ERROR,)
 Collect nodal information from each MPI process. More...
 
subroutine field_io_info_set_initialise (LOCAL_PROCESS_INFO_SET, ERR, ERROR,)
 Initialize nodal information set. More...
 
subroutine, public field_io_nodes_export (FIELDS, FILE_NAME, METHOD, ERR, ERROR,)
 Export nodal information. More...
 
subroutine, public field_io_elements_export (FIELDS, FILE_NAME, METHOD, ERR, ERROR,)
 Export elemental information into multiple files. More...
 

Variables

integer(intg), parameter shape_size =3
 size of shape More...
 
integer(intg), parameter field_io_field_label =1
 Type for lable. More...
 
integer(intg), parameter field_io_variable_label =2
 
integer(intg), parameter field_io_component_label =3
 
integer(intg), parameter field_io_derivative_label =4
 
integer(intg), parameter field_io_scale_factors_number_type =5
 Type of scale factor. More...
 
integer(intg), parameter field_io_scale_factors_property_type =6
 

Detailed Description

Implements lists of Field IO operation.

Function/Subroutine Documentation

subroutine field_io_routines::checked_deallocate_2d_int ( integer(intg), dimension(:,:), intent(inout), allocatable  array)
private

Definition at line 778 of file field_IO_routines.f90.

subroutine field_io_routines::checked_deallocate_basis ( type(basis_ptr_type), dimension(:), intent(inout), allocatable  array)
private

Definition at line 830 of file field_IO_routines.f90.

subroutine field_io_routines::checked_deallocate_components ( type(field_variable_component_ptr_type), dimension(:), intent(inout), allocatable  array)
private

Definition at line 791 of file field_IO_routines.f90.

subroutine field_io_routines::checked_deallocate_elements ( type(mesh_elements_type_ptr_type), dimension(:), intent(inout), allocatable  array)
private

Definition at line 817 of file field_IO_routines.f90.

subroutine field_io_routines::checked_deallocate_field ( type(field_ptr_type), dimension(:), intent(inout), allocatable  array)
private

Definition at line 842 of file field_IO_routines.f90.

subroutine field_io_routines::checked_deallocate_int ( integer(intg), dimension(:), intent(inout), allocatable  array)
private

Definition at line 752 of file field_IO_routines.f90.

subroutine field_io_routines::checked_deallocate_real ( real(dp), dimension(:), intent(inout), allocatable  array)
private

Definition at line 765 of file field_IO_routines.f90.

subroutine field_io_routines::checked_deallocate_str ( type(varying_string), dimension(:), intent(inout), allocatable  array)
private

Definition at line 804 of file field_IO_routines.f90.

subroutine field_io_routines::field_io_calculate_tp_scale_and_node_counts ( type(basis_type), intent(in)  BASIS,
integer(intg), intent(inout)  num_scl,
integer(intg), intent(inout)  num_node,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private
logical function field_io_routines::field_io_compare_info_set_components ( type(field_io_component_info_set SET1,
type(field_io_component_info_set SET2 
)
private

Definition at line 4292 of file field_IO_routines.f90.

Referenced by field_io_nodal_info_set_sort().

subroutine field_io_routines::field_io_compare_info_set_derivatives ( type(field_io_component_info_set SET1,
type(field_io_component_info_set SET2,
integer(intg)  my_computational_node_number,
integer(intg)  global_number1,
integer(intg)  global_number2,
logical  doesMatch,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private
Parameters
[out]errThe error code
[out]errorThe error string

Definition at line 4353 of file field_IO_routines.f90.

References base_routines::enters(), and base_routines::exits().

Referenced by field_io_nodal_info_set_sort().

subroutine field_io_routines::field_io_create_decompistion ( type(decomposition_type), pointer  DECOMPOSITION,
integer(intg), intent(in)  DECOMPOSITION_USER_NUMBER,
integer(intg), intent(in)  DECOMPOSITION_METHOD,
type(mesh_type), pointer  MESH,
integer(intg), intent(in)  NUMBER_OF_DOMAINS,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private

Create decompition.

Parameters
decompositiondecomposition tye
[in]decomposition_user_numberuser number for decompistion
[in]decomposition_methoddecompistion type
meshmesh type
[in]number_of_domainsnumber of domains
[out]errThe error code
[out]errorThe error string

Definition at line 1449 of file field_IO_routines.f90.

References base_routines::enters(), and base_routines::exits().

Referenced by field_io_fields_import().

subroutine field_io_routines::field_io_create_fields ( type(varying_string), intent(in)  NAME,
type(region_type), pointer  REGION,
type(decomposition_type), pointer  DECOMPOSITION,
integer(intg), intent(in)  FIELD_VALUES_SET_TYPE,
integer(intg), intent(in)  NUMBER_OF_FIELDS 
)
private
integer(intg) function field_io_routines::field_io_element_derivative_index ( type(domain_element_type), intent(in)  ELEMENT,
integer(intg), intent(in)  DERIVATIVE_NUMBER,
integer(intg), intent(in)  NODE_NUMBER,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private

Use the element version information to calcualte the derivative index of a given nodal derivative for an element.

Parameters
[in]elementThe element to calculate the derivative index for
[in]derivative_numberThe number of the derivative to calcualte
[in]node_numberThe local element node number
[out]errThe error code
[out]errorThe error string
Returns
On return, the calculated derative index

Definition at line 974 of file field_IO_routines.f90.

References base_routines::enters(), and base_routines::exits().

Referenced by fieldio_exportelementalgroupheaderfortran().

subroutine field_io_routines::field_io_elemental_info_set_sort ( type(field_io_info_set), intent(inout)  ELEMENTAL_INFO_SET,
integer(intg), intent(in)  my_computational_node_number,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private

Sort the Elemental_info_set according to the type of field variable components.

Parameters
[in,out]elemental_info_setelemental information in this process
[in]my_computational_node_numberlocal process number
[out]errThe error code
[out]errorThe error string

Definition at line 3865 of file field_IO_routines.f90.

References base_routines::enters(), base_routines::exits(), and findmylocaldomainnumber().

Referenced by field_io_elements_export().

subroutine, public field_io_routines::field_io_elements_export ( type(fields_type), pointer  FIELDS,
type(varying_string), intent(in)  FILE_NAME,
type(varying_string), intent(in)  METHOD,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
subroutine field_io_routines::field_io_export_element_scale_factors ( integer(intg)  sessionHandle,
type(field_io_component_info_set), intent(inout)  components,
integer(intg), dimension(:)  componentScales,
integer(intg)  globalNumber,
integer(intg)  myComputationalNodeNumber,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private
Parameters
[in,out]componentsnodal information in this process
[out]errThe error code
[out]errorThe error string

Definition at line 3424 of file field_IO_routines.f90.

References base_routines::enters(), base_routines::exits(), fieldexport_elementnodescales(), and findmylocaldomainnumber().

Referenced by field_io_export_elements_into_local_file().

subroutine field_io_routines::field_io_export_elements_into_local_file ( type(field_io_info_set), intent(inout)  ELEMENTAL_INFO_SET,
type(varying_string), intent(in)  NAME,
integer(intg), intent(in)  my_computational_node_number,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private
subroutine field_io_routines::field_io_export_nodal_group_header_fortran ( type(field_io_component_info_set), intent(in)  fieldInfoSet,
integer(intg), intent(in)  global_number,
integer(intg), intent(inout)  MAX_NUM_OF_NODAL_DERIVATIVES,
integer(intg), intent(in)  my_computational_node_number,
integer(intg), intent(in)  sessionHandle,
integer(intg), dimension(:), intent(inout), allocatable  paddingInfo,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private

Write the header of a group nodes using FORTRAIN.

Parameters
[in]my_computational_node_numberlocal process number
[out]errThe error code
[out]errorThe error string

Definition at line 5107 of file field_IO_routines.f90.

References base_routines::enters(), base_routines::exits(), fieldexport_coordinatevariable(), fieldexport_fieldcount(), fieldexport_variable(), constants::no_part_deriv, and constants::partial_derivative_index.

Referenced by field_io_export_nodes_into_local_file().

subroutine field_io_routines::field_io_export_nodes_into_local_file ( type(field_io_info_set), intent(inout)  NODAL_INFO_SET,
type(varying_string), intent(in)  NAME,
integer(intg), intent(in)  my_computational_node_number,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private

Write all the nodal information from NODAL_INFO_SET to local exnode files.

Parameters
[in,out]nodal_info_setnodal information in this process
[in]namethe prefix name of file.
[in]my_computational_node_numberlocal process number
[out]errThe error code
[out]errorThe error string

Definition at line 5360 of file field_IO_routines.f90.

References base_routines::enters(), base_routines::exits(), field_io_export_nodal_group_header_fortran(), fieldexport_closesession(), fieldexport_group(), and fieldexport_opensession().

Referenced by field_io_nodes_export().

subroutine field_io_routines::field_io_field_info ( type(varying_string), intent(in)  STRING,
integer(intg), intent(in)  LABEL_TYPE,
integer(intg), intent(inout)  FIELD_TYPE,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private

Get the field information.

Parameters
[in]label_typeidentitor for information
[out]errThe error code
[out]errorThe error string

Definition at line 856 of file field_IO_routines.f90.

References base_routines::enters(), base_routines::exits(), and field_io_field_label.

Referenced by field_io_create_fields().

subroutine, public field_io_routines::field_io_fields_import ( type(varying_string), intent(in)  NAME,
type(varying_string), intent(in)  METHOD,
type(region_type), pointer  REGION,
type(mesh_type), pointer  MESH,
integer(intg), intent(in)  MESH_USER_NUMBER,
type(decomposition_type), pointer  DECOMPOSITION,
integer(intg), intent(in)  DECOMPOSITION_USER_NUMBER,
integer(intg), intent(in)  DECOMPOSITION_METHOD,
integer(intg), intent(in)  FIELD_VALUES_SET_TYPE,
integer(intg), intent(in)  FIELD_SCALING_TYPE,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)

Import fields from files into different computational nodes.

Parameters
[in]namename of input
[in]methodmethod used for import
meshmesh type
[in]mesh_user_numberuser number for mesh
decompositiondecompistion
[in]decomposition_user_numberuser number for decompistion
[in]decomposition_methoddecompistion method
[out]errThe error code
[out]errorThe error string

Definition at line 1486 of file field_IO_routines.f90.

References comp_environment::computational_node_number_get(), comp_environment::computational_nodes_number_get(), base_routines::enters(), base_routines::exits(), field_io_create_decompistion(), field_io_create_fields(), and field_io_import_global_mesh().

subroutine field_io_routines::field_io_fill_basis_info ( integer(intg), dimension(:,:), intent(inout)  INTERPOLATION_XI,
type(varying_string), dimension(:), intent(inout)  LIST_STR,
integer(intg), intent(in)  NUMBER_OF_COMPONENTS,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private

Finding basis information.

Parameters
[in,out]interpolation_xixi interpolation type
[in,out]list_strlabel type
[out]errThe error code
[out]errorThe error string

Definition at line 1558 of file field_IO_routines.f90.

References base_routines::enters(), base_routines::exits(), fieldio_translatelabelintointerpolationtype(), and base_routines::my_computational_node_number.

Referenced by field_io_import_global_mesh().

subroutine field_io_routines::field_io_fortran_file_close ( integer(intg), intent(inout)  FILE_ID,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private

Close a file using Fortran.

Parameters
[in,out]file_idfile ID
[out]errThe error code
[out]errorThe error string

Definition at line 5796 of file field_IO_routines.f90.

References base_routines::enters(), and base_routines::exits().

Referenced by field_io_create_fields(), and field_io_import_global_mesh().

subroutine field_io_routines::field_io_fortran_file_open ( integer(intg), intent(inout)  FILE_ID,
type(varying_string), intent(inout)  FILE_NAME,
type(varying_string), intent(in)  FILE_STATUS,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private

Open a file using Fortran.

Parameters
[in,out]file_namethe name of file.
[in]file_statusstatus for opening a file
[in,out]file_idfile ID
[out]errThe error code
[out]errorThe error string

Definition at line 5768 of file field_IO_routines.f90.

References base_routines::enters(), and base_routines::exits().

Referenced by field_io_create_fields(), and field_io_import_global_mesh().

subroutine field_io_routines::field_io_fortran_file_read_dp ( integer(intg), intent(in)  FILE_ID,
real(dp), dimension(:), intent(out)  REAL_DATA,
integer(intg), intent(in)  LEN_OF_DATA,
logical, intent(inout)  FILE_END,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private

Read a real data using FORTRAN IO.

Parameters
[out]real_datathe name of file.
[in]file_idfile ID
[in]len_of_datalength of string
[out]errThe error code
[out]errorThe error string

Definition at line 5652 of file field_IO_routines.f90.

References base_routines::enters(), and base_routines::exits().

subroutine field_io_routines::field_io_fortran_file_read_intg ( integer(intg), intent(in)  FILE_ID,
integer(intg), dimension(:), intent(out)  INTG_DATA,
integer(intg), intent(in)  LEN_OF_DATA,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private

Read a integer data.

Parameters
[out]intg_datathe name of file.
[in]file_idfile ID
[in]len_of_datalength of string
[out]errThe error code
[out]errorThe error string

Definition at line 5714 of file field_IO_routines.f90.

References base_routines::enters(), and base_routines::exits().

subroutine field_io_routines::field_io_fortran_file_read_string ( integer(intg), intent(in)  FILE_ID,
type(varying_string), intent(inout)  STRING_DATA,
logical, intent(inout)  FILE_END,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private

Read a string using FORTRAN IO.

Parameters
[in,out]string_datathe string data.
[in]file_idfile ID
[in,out]file_endfile end
[out]errThe error code
[out]errorThe error string

Definition at line 5607 of file field_IO_routines.f90.

References base_routines::enters(), and base_routines::exits().

Referenced by field_io_create_fields(), and field_io_import_global_mesh().

subroutine field_io_routines::field_io_fortran_file_write_dp ( integer(intg), intent(in)  FILE_ID,
real(dp), dimension(:), intent(in)  REAL_DATA,
integer(intg), intent(in)  LEN_OF_DATA,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private

Write a real data using FORTRAN IO.

Parameters
[in]real_datathe name of file.
[in]file_idfile ID
[in]len_of_datalength of string
[out]errThe error code
[out]errorThe error string

Definition at line 5687 of file field_IO_routines.f90.

References base_routines::enters(), and base_routines::exits().

subroutine field_io_routines::field_io_fortran_file_write_intg ( integer(intg), intent(in)  FILE_ID,
integer(intg), dimension(:), intent(in)  INTG_DATA,
integer(intg), intent(in)  LEN_OF_DATA,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private

Write a integer data.

Parameters
[in]intg_datathe name of file.
[in]file_idfile ID
[in]len_of_datalength of string
[out]errThe error code
[out]errorThe error string

Definition at line 5741 of file field_IO_routines.f90.

References base_routines::enters(), and base_routines::exits().

type(varying_string) function field_io_routines::field_io_get_component_info_label ( type(field_variable_component_type), pointer  COMPONENT,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private

Get the field information.

Parameters
[out]errThe error code
[out]errorThe error string

Definition at line 4840 of file field_IO_routines.f90.

References coordinate_routines::coordinate_rectangular_cartesian_type, base_routines::enters(), base_routines::exits(), and base_routines::my_computational_node_number.

type(varying_string) function field_io_routines::field_io_get_field_info_label ( type(field_type), pointer  FIELD,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private

Get the field information.

Parameters
[out]errThe error code
[out]errorThe error string

Definition at line 4665 of file field_IO_routines.f90.

References base_routines::enters(), and base_routines::exits().

type(varying_string) function field_io_routines::field_io_get_variable_info_label ( type(field_variable_component_type), pointer  COMPONENT,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private

Get the field information.

Parameters
[out]errThe error code
[out]errorThe error string

Definition at line 4705 of file field_IO_routines.f90.

References coordinate_routines::coordinate_rectangular_cartesian_type, base_routines::enters(), and base_routines::exits().

subroutine field_io_routines::field_io_import_global_mesh ( type(varying_string), intent(in)  NAME,
type(region_type), pointer  REGION,
type(mesh_type), pointer  MESH,
integer(intg), intent(in)  MESH_USER_NUMBER,
integer(intg), intent(in)  MASTER_COMPUTATIONAL_NUMBER,
integer(intg), intent(in)  my_computational_node_number,
integer(intg), dimension(:), intent(inout), allocatable  MESH_COMPONENTS_OF_FIELD_COMPONENTS,
integer(intg), dimension(:), intent(inout), allocatable  COMPONENTS_IN_FIELDS,
integer(intg), intent(inout)  NUMBER_OF_FIELDS,
integer(intg), intent(inout)  NUMBER_OF_EXNODE_FILES,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private

Read the global mesh into one computational node first and then broadcasting to others nodes.

Parameters
[in]namethe name of elment file
meshmesh type
[in]mesh_user_numberuser number of mesh
[out]errThe error code
[out]errorThe error string

Definition at line 1605 of file field_IO_routines.f90.

References basis_routines::basis_create_finish(), basis_routines::basis_create_start(), basis_routines::basis_functions, base_routines::enters(), base_routines::exits(), field_io_fill_basis_info(), field_io_fortran_file_close(), field_io_fortran_file_open(), field_io_fortran_file_read_string(), cmiss_mpi::mpi_error_check(), reallocate_2d(), shape_size, and string_to_muti_integers_vs().

Referenced by field_io_fields_import().

subroutine field_io_routines::field_io_info_set_initialise ( type(field_io_info_set), intent(inout)  LOCAL_PROCESS_INFO_SET,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private

Initialize nodal information set.

Parameters
[in,out]local_process_info_setnodal information in this process
[out]errThe error code
[out]errorThe error string

Definition at line 6122 of file field_IO_routines.f90.

References base_routines::enters(), and base_routines::exits().

Referenced by field_io_elements_export(), and field_io_nodes_export().

type(varying_string) function field_io_routines::field_io_label_derivative_info_get ( integer(intg), dimension(number_derivatives), intent(in)  GROUP_DERIVATIVES,
integer(intg), intent(in)  NUMBER_DERIVATIVES,
integer(intg), intent(in)  LABEL_TYPE,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private
subroutine field_io_routines::field_io_nodal_info_set_sort ( type(field_io_info_set), intent(inout)  NODAL_INFO_SET,
integer(intg), intent(in)  my_computational_node_number,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private

Sort nodal information according to the type of field variable component.

Parameters
[in,out]nodal_info_setnodal information in this process
[in]my_computational_node_numberlocal process number
[out]errThe error code
[out]errorThe error string

Definition at line 4457 of file field_IO_routines.f90.

References base_routines::enters(), base_routines::exits(), field_io_compare_info_set_components(), and field_io_compare_info_set_derivatives().

Referenced by field_io_nodes_export().

subroutine, public field_io_routines::field_io_nodes_export ( type(fields_type), pointer  FIELDS,
type(varying_string), intent(in)  FILE_NAME,
type(varying_string), intent(in)  METHOD,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
subroutine field_io_routines::fieldio_calculatesimplexscaleandnodecounts ( type(basis_type), intent(in)  BASIS,
integer(intg), intent(inout)  num_scl,
integer(intg), intent(inout)  num_node,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private

Finding basis information.

Parameters
[in]basisThe error string
[out]errThe error code
[out]errorThe error string

Definition at line 2408 of file field_IO_routines.f90.

References basis_routines::basis_cubic_simplex_interpolation, basis_routines::basis_linear_simplex_interpolation, basis_routines::basis_quadratic_simplex_interpolation, base_routines::enters(), and base_routines::exits().

Referenced by fieldio_exportelementalgroupheaderfortran().

subroutine field_io_routines::fieldio_elementalinfosetattachlocalprocess ( type(field_io_info_set), intent(inout)  ELEMENTAL_INFO_SET,
type(fields_type), pointer  FIELDS,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private

Collect the elemental information from each MPI process.

Parameters
[in,out]elemental_info_setnodal information in this process
fieldsthe field object
[out]errThe error code
[out]errorThe error string

Definition at line 4073 of file field_IO_routines.f90.

References base_routines::enters(), and base_routines::exits().

Referenced by field_io_elements_export().

subroutine field_io_routines::fieldio_exportelementalgroupheaderfortran ( integer(intg), intent(in)  global_number,
integer(intg), intent(inout)  MAX_NODE_COMP_INDEX,
integer(intg), intent(inout)  NUM_OF_SCALING_FACTOR_SETS,
integer(intg), dimension(:), intent(inout)  LIST_COMP_SCALE,
integer(intg), intent(in)  my_computational_node_number,
type(field_io_component_info_set), intent(inout)  elementalInfoSet,
integer(intg), intent(in)  sessionHandle,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private
subroutine field_io_routines::fieldio_nodelinfosetattachlocalprocess ( type(field_io_info_set), intent(inout)  NODAL_INFO_SET,
type(fields_type), pointer  FIELDS,
integer(intg), intent(in)  my_computational_node_number,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private

Collect nodal information from each MPI process.

Parameters
[in,out]nodal_info_setnodal information in this process
fieldsthe field object
[out]errThe error code
[out]errorThe error string

Definition at line 5912 of file field_IO_routines.f90.

References base_routines::enters(), and base_routines::exits().

Referenced by field_io_nodes_export().

subroutine field_io_routines::fieldio_translatelabelintointerpolationtype ( integer(intg), intent(inout)  INTERPOLATION,
type(varying_string), intent(in)  LABEL_TYPE,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private
integer(intg) function field_io_routines::findmylocaldomainnumber ( type(domain_global_mapping_type)  mapping,
integer(intg), intent(in)  myComputationalNodeNumber 
)
private
subroutine field_io_routines::grow_array_components ( type(field_variable_component_ptr_type), dimension(:), intent(inout), allocatable  array,
integer(intg), intent(in)  delta,
character(len=*), intent(in)  errorMessage,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private
Parameters
[out]errThe error code
[out]errorThe error string

Definition at line 713 of file field_IO_routines.f90.

References base_routines::enters(), and base_routines::exits().

subroutine field_io_routines::grow_array_int ( integer(intg), dimension(:), intent(inout), allocatable  array,
integer(intg), intent(in)  delta,
character(len=*), intent(in)  errorMessage,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private
Parameters
[out]errThe error code
[out]errorThe error string

Definition at line 635 of file field_IO_routines.f90.

References base_routines::enters(), and base_routines::exits().

subroutine field_io_routines::grow_array_real ( real(c_double), dimension(:), intent(inout), allocatable  array,
integer(intg), intent(in)  delta,
character(len=*), intent(in)  errorMessage,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private
Parameters
[out]errThe error code
[out]errorThe error string

Definition at line 674 of file field_IO_routines.f90.

References base_routines::enters(), and base_routines::exits().

subroutine field_io_routines::reallocate_2d ( integer(intg), dimension(:,:), intent(inout), allocatable  array,
integer(intg), intent(in)  newSize1,
integer(intg), intent(in)  newSize2,
character(len=*), intent(in)  errorMessage,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private
Parameters
[out]errThe error code
[out]errorThe error string

Definition at line 606 of file field_IO_routines.f90.

References base_routines::enters(), and base_routines::exits().

Referenced by field_io_import_global_mesh().

subroutine field_io_routines::reallocate_basis ( type(basis_ptr_type), dimension(:), intent(inout), allocatable  array,
integer(intg), intent(in)  newSize,
character(len=*), intent(in)  errorMessage,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private
Parameters
[out]errThe error code
[out]errorThe error string

Definition at line 528 of file field_IO_routines.f90.

References base_routines::enters(), and base_routines::exits().

subroutine field_io_routines::reallocate_components ( type(field_variable_component_ptr_type), dimension(:), intent(inout), allocatable  array,
integer(intg), intent(in)  newSize,
character(len=*), intent(in)  errorMessage,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private
Parameters
[out]errThe error code
[out]errorThe error string

Definition at line 502 of file field_IO_routines.f90.

References base_routines::enters(), and base_routines::exits().

subroutine field_io_routines::reallocate_elements ( type(mesh_elements_type_ptr_type), dimension(:), intent(inout), allocatable  array,
integer(intg), intent(in)  newSize,
character(len=*), intent(in)  errorMessage,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private
Parameters
[out]errThe error code
[out]errorThe error string

Definition at line 580 of file field_IO_routines.f90.

References base_routines::enters(), and base_routines::exits().

subroutine field_io_routines::reallocate_field ( type(field_ptr_type), dimension(:), intent(inout), allocatable  array,
integer(intg), intent(in)  newSize,
character(len=*), intent(in)  errorMessage,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private
Parameters
[out]errThe error code
[out]errorThe error string

Definition at line 554 of file field_IO_routines.f90.

References base_routines::enters(), and base_routines::exits().

subroutine field_io_routines::reallocate_int ( integer(intg), dimension(:), intent(inout), allocatable  array,
integer(intg), intent(in)  newSize,
character(len=*), intent(in)  errorMessage,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private
Parameters
[out]errThe error code
[out]errorThe error string

Definition at line 420 of file field_IO_routines.f90.

References base_routines::enters(), and base_routines::exits().

subroutine field_io_routines::reallocate_real ( real(dp), dimension(:), intent(inout), allocatable  array,
integer(intg), intent(in)  newSize,
character(len=*), intent(in)  errorMessage,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private
Parameters
[out]errThe error code
[out]errorThe error string

Definition at line 448 of file field_IO_routines.f90.

References base_routines::enters(), and base_routines::exits().

subroutine field_io_routines::reallocate_string ( type(varying_string), dimension(:), intent(inout), allocatable  array,
integer(intg), intent(in)  newSize,
character(len=*), intent(in)  errorMessage,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private
Parameters
[out]errThe error code
[out]errorThe error string

Definition at line 476 of file field_IO_routines.f90.

References base_routines::enters(), and base_routines::exits().

subroutine field_io_routines::string_to_muti_integers_vs ( type(varying_string), intent(in)  STRING,
integer(intg), intent(in)  NUMBER_OF_INTEGERS,
integer(intg), dimension(:), intent(inout)  INTG_DATA,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private

Definition at line 5815 of file field_IO_routines.f90.

References base_routines::enters(), and base_routines::exits().

Referenced by field_io_import_global_mesh().

subroutine field_io_routines::string_to_muti_reals_vs ( type(varying_string), intent(in)  STRING,
integer(intg), intent(in)  NUMBER_OF_REALS,
real(dp), dimension(:), intent(inout)  REAL_DATA,
integer(intg), intent(in)  POSITION,
integer(intg), intent(out)  ERR,
type(varying_string), intent(out)  ERROR 
)
private

Definition at line 5857 of file field_IO_routines.f90.

References base_routines::enters(), and base_routines::exits().

Referenced by field_io_create_fields().

Variable Documentation

integer(intg), parameter field_io_routines::field_io_component_label =3
private

Definition at line 89 of file field_IO_routines.f90.

integer(intg), parameter field_io_routines::field_io_derivative_label =4
private

Definition at line 90 of file field_IO_routines.f90.

Referenced by field_io_label_derivative_info_get().

integer(intg), parameter field_io_routines::field_io_field_label =1
private

Type for lable.

Definition at line 87 of file field_IO_routines.f90.

Referenced by field_io_create_fields(), and field_io_field_info().

integer(intg), parameter field_io_routines::field_io_scale_factors_number_type =5
private

Type of scale factor.

Definition at line 93 of file field_IO_routines.f90.

integer(intg), parameter field_io_routines::field_io_scale_factors_property_type =6
private

Definition at line 94 of file field_IO_routines.f90.

integer(intg), parameter field_io_routines::field_io_variable_label =2
private

Definition at line 88 of file field_IO_routines.f90.

integer(intg), parameter field_io_routines::shape_size =3
private

size of shape

Definition at line 84 of file field_IO_routines.f90.

Referenced by field_io_import_global_mesh().