OpenCMISS-Iron Internal API Documentation
machine_constants_vms.f90
Go to the documentation of this file.
1 
43 
45 MODULE machine_constants
46 
47  USE constants
48  USE kinds
49 
50  IMPLICIT NONE
51 
52  !Machine constants
53  INTEGER(INTG), PARAMETER :: machine_type=dec_computer
54  INTEGER(INTG), PARAMETER :: machine_os=vms_os
55  INTEGER(INTG), PARAMETER :: machine_endian=little_endian_number
56  INTEGER(INTG), PARAMETER :: machine_char_format=ascii_character
57  INTEGER(INTG), PARAMETER :: machine_int_format=twos_complement_integer
58  INTEGER(INTG), PARAMETER :: machine_sp_format=spieee_number
59  INTEGER(INTG), PARAMETER :: machine_dp_format=dpieee_number
60  INTEGER(INTG), PARAMETER :: integer_size=4
61  INTEGER(INTG), PARAMETER :: short_integer_size=2
62  INTEGER(INTG), PARAMETER :: long_integer_size=8
63  INTEGER(INTG), PARAMETER :: single_real_size=4
64  INTEGER(INTG), PARAMETER :: double_real_size=8
65  INTEGER(INTG), PARAMETER :: character_size=1
66  INTEGER(INTG), PARAMETER :: logical_size=4
67  INTEGER(INTG), PARAMETER :: single_complex_size=8
68  INTEGER(INTG), PARAMETER :: double_complex_size=16
69 
70  CHARACTER(LEN=1), PARAMETER :: error_separator_constant=char(0)
71 
72 END MODULE machine_constants
integer(intg), parameter machine_char_format
integer(intg), parameter integer_size
integer(intg), parameter twos_complement_integer
Twos complement integer type.
Definition: constants.f90:119
integer(intg), parameter machine_os
integer(intg), parameter double_complex_size
integer(intg), parameter machine_endian
integer(intg), parameter ascii_character
ASCII character type.
Definition: constants.f90:111
This module contains all program wide constants.
Definition: constants.f90:45
integer(intg), parameter machine_type
integer(intg), parameter machine_dp_format
integer(intg), parameter logical_size
integer(intg), parameter machine_int_format
integer(intg), parameter short_integer_size
integer(intg), parameter single_complex_size
integer(intg), parameter double_real_size
integer(intg), parameter dpieee_number
Double precision IEEE real type.
Definition: constants.f90:128
character(len=1), parameter error_separator_constant
integer(intg), parameter machine_sp_format
integer(intg), parameter character_size
integer(intg), parameter long_integer_size
integer(intg), parameter vms_os
VMS operating system type.
Definition: constants.f90:147
integer(intg), parameter little_endian_number
Little endian number type.
Definition: constants.f90:104
integer(intg), parameter dec_computer
Digital computer system type.
Definition: constants.f90:135
This module contains all machine dependent constants for AIX systems.
integer(intg), parameter single_real_size
integer(intg), parameter spieee_number
Single precision IEEE real type.
Definition: constants.f90:127
This module contains all kind definitions.
Definition: kinds.f90:45