gmsh_msh_format_fortran Module

Implementation of a derived type to hold $MeshFormat of Gmsh MSH file format.


Uses

  • module~~gmsh_msh_format_fortran~~UsesGraph module~gmsh_msh_format_fortran gmsh_msh_format_fortran iso_c_binding iso_c_binding module~gmsh_msh_format_fortran->iso_c_binding

Variables

Type Visibility Attributes Name Initial
character(len=*), private, parameter :: footer = '$EndMeshFormat'
character(len=*), private, parameter :: header = '$MeshFormat'
integer, private, parameter :: iostat_error = 1

iostat value when an error occurs
integer, private, parameter :: iostat_success = 0

iostat value when an I/O statement executes successfully

Interfaces

public interface export_data_size

Exports the data-size of the read Gmsh MSH file format as a c_int value.

  • private elemental function export_data_size_from_format(gmsh_msh_format) result(data_size)

    License
    MIT
    Version
    experimental

    Exports the data-size of the read Gmsh MSH file format as a c_int value.

    Arguments

    Type IntentOptional Attributes Name
    type(gmsh_msh_format_type), intent(in) :: gmsh_msh_format

    Return Value integer(kind=c_int)

public interface export_file_type

Exports the file-type of the read Gmsh MSH file format as a c_int value.

  • private elemental function export_file_type_from_format(gmsh_msh_format) result(file_type)

    License
    MIT
    Version
    experimental

    Exports the file-type of the read Gmsh MSH file format as a c_int value.

    Arguments

    Type IntentOptional Attributes Name
    type(gmsh_msh_format_type), intent(in) :: gmsh_msh_format

    Return Value integer(kind=c_int)

public interface export_version

Exports the version of the read Gmsh MSH file format as a c_double value.

  • private elemental function export_version_from_format(gmsh_msh_format) result(version)

    License
    MIT
    Version
    experimental

    Exports the version of the read Gmsh MSH file format as a c_double value.

    Arguments

    Type IntentOptional Attributes Name
    type(gmsh_msh_format_type), intent(in) :: gmsh_msh_format

    Return Value real(kind=c_double)

public interface is_ascii

Checks if the read Gmsh MSH file is ASCII mode

  • private elemental function is_ascii_gmsh_msh_format(gmsh_msh_format) result(res)

    License
    MIT
    Version
    experimental

    Checks if the read Gmsh MSH file is ASCII mode

    Arguments

    Type IntentOptional Attributes Name
    type(gmsh_msh_format_type), intent(in) :: gmsh_msh_format

    Return Value logical

public interface is_binary

Checks if the read Gmsh MSH file is binary mode

  • private elemental function is_binary_gmsh_msh_format(gmsh_msh_format) result(res)

    License
    MIT
    Version
    experimental

    Checks if the read Gmsh MSH file is binary mode

    Arguments

    Type IntentOptional Attributes Name
    type(gmsh_msh_format_type), intent(in) :: gmsh_msh_format

    Return Value logical

public interface read(formatted)

Read an $MshMeshFormat from a connected formatted unit.

  • private subroutine read_formatted(gmsh_msh_format, unit, iotype, v_list, iostat, iomsg)

    License
    MIT
    Version
    experimental

    Read an $MshMeshFormat from a connected formatted unit.

    Arguments

    Type IntentOptional Attributes Name
    class(gmsh_msh_format_type), intent(inout) :: gmsh_msh_format
    integer, intent(in) :: unit
    character(len=*), intent(in) :: iotype
    integer, intent(in) :: v_list(:)
    integer, intent(out) :: iostat
    character(len=*), intent(inout) :: iomsg

public interface read(unformatted)

Read an $MshMeshFormat from a connected unformatted unit.

  • private subroutine read_unformatted(gmsh_msh_format, unit, iostat, iomsg)

    License
    MIT
    Version
    experimental

    Read an $MshMeshFormat from a connected unformatted unit.

    Arguments

    Type IntentOptional Attributes Name
    class(gmsh_msh_format_type), intent(inout) :: gmsh_msh_format
    integer, intent(in) :: unit
    integer, intent(out) :: iostat
    character(len=*), intent(inout) :: iomsg

Derived Types

type, public ::  gmsh_msh_format_type

Derived type to hold $MeshFormat of Gmsh MSH file format.

Components

Type Visibility Attributes Name Initial
integer(kind=c_int), private :: data_size
integer(kind=c_int), private :: file_type
real(kind=c_double), private :: version

Functions

private elemental function export_data_size_from_format(gmsh_msh_format) result(data_size)

License
MIT
Version
experimental

Exports the data-size of the read Gmsh MSH file format as a c_int value.

Arguments

Type IntentOptional Attributes Name
type(gmsh_msh_format_type), intent(in) :: gmsh_msh_format

Return Value integer(kind=c_int)

private elemental function export_file_type_from_format(gmsh_msh_format) result(file_type)

License
MIT
Version
experimental

Exports the file-type of the read Gmsh MSH file format as a c_int value.

Arguments

Type IntentOptional Attributes Name
type(gmsh_msh_format_type), intent(in) :: gmsh_msh_format

Return Value integer(kind=c_int)

private elemental function export_version_from_format(gmsh_msh_format) result(version)

License
MIT
Version
experimental

Exports the version of the read Gmsh MSH file format as a c_double value.

Arguments

Type IntentOptional Attributes Name
type(gmsh_msh_format_type), intent(in) :: gmsh_msh_format

Return Value real(kind=c_double)

private elemental function is_ascii_gmsh_msh_format(gmsh_msh_format) result(res)

License
MIT
Version
experimental

Checks if the read Gmsh MSH file is ASCII mode

Arguments

Type IntentOptional Attributes Name
type(gmsh_msh_format_type), intent(in) :: gmsh_msh_format

Return Value logical

private elemental function is_binary_gmsh_msh_format(gmsh_msh_format) result(res)

License
MIT
Version
experimental

Checks if the read Gmsh MSH file is binary mode

Arguments

Type IntentOptional Attributes Name
type(gmsh_msh_format_type), intent(in) :: gmsh_msh_format

Return Value logical


Subroutines

private subroutine check_text_line(text_line, str, iostat, iomsg)

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: text_line
character(len=*), intent(in) :: str
integer, intent(inout) :: iostat
character(len=*), intent(inout) :: iomsg

private subroutine read_formatted(gmsh_msh_format, unit, iotype, v_list, iostat, iomsg)

License
MIT
Version
experimental

Read an $MshMeshFormat from a connected formatted unit.

Arguments

Type IntentOptional Attributes Name
class(gmsh_msh_format_type), intent(inout) :: gmsh_msh_format
integer, intent(in) :: unit
character(len=*), intent(in) :: iotype
integer, intent(in) :: v_list(:)
integer, intent(out) :: iostat
character(len=*), intent(inout) :: iomsg

private subroutine read_formatted_kernel(gmsh_msh_format, unit, iostat, iomsg)

License
MIT
Version
experimental

Read an $MshMeshFormat from a connected formatted unit.

Arguments

Type IntentOptional Attributes Name
class(gmsh_msh_format_type), intent(inout) :: gmsh_msh_format
integer, intent(in) :: unit
integer, intent(out) :: iostat
character(len=*), intent(inout) :: iomsg

private subroutine read_unformatted(gmsh_msh_format, unit, iostat, iomsg)

License
MIT
Version
experimental

Read an $MshMeshFormat from a connected unformatted unit.

Arguments

Type IntentOptional Attributes Name
class(gmsh_msh_format_type), intent(inout) :: gmsh_msh_format
integer, intent(in) :: unit
integer, intent(out) :: iostat
character(len=*), intent(inout) :: iomsg