CAM
endian Module Reference

Data Types

interface  byte_order_swap
 

Functions/Subroutines

subroutine, private native_4byte_real (realInOut)
 
subroutine, private native_8byte_real (realInOut)
 

Variables

integer, parameter i4 = 4
 
integer, parameter ich = ichar( transfer( 1_i4, "a" ) )
 
logical, parameter, public big_endian = ich == 0
 
logical, parameter, public little_endian = big_endian
 

Function/Subroutine Documentation

◆ native_4byte_real()

subroutine, private endian::native_4byte_real ( real(kind=selected_real_kind(6)), intent(inout)  realInOut)
private

◆ native_8byte_real()

subroutine, private endian::native_8byte_real ( real(kind=selected_real_kind(12)), intent(inout)  realInOut)
private

Variable Documentation

◆ big_endian

logical, parameter, public endian::big_endian = ich == 0

◆ i4

integer, parameter endian::i4 = 4
private

◆ ich

integer, parameter endian::ich = ichar( transfer( 1_i4, "a" ) )
private

◆ little_endian

logical, parameter, public endian::little_endian = big_endian