encode.f90 File Reference

Go to the source code of this file.

Modules
module	fapi_encode_tests

Functions/Subroutines
subroutine	fapi_encode_tests::check_call (err, msg, success)
subroutine	fapi_encode_tests::check_decoded_column_major (data, success)
real(8) function, dimension(7, 15)	fapi_encode_tests::construct_data_column_major ()
subroutine	fapi_encode_tests::initialise_encoder (encoder, success)
logical function	fapi_encode_tests::test_encode_column_major ()
logical function	fapi_encode_tests::test_encode_row_major ()
subroutine	fapi_encode_tests::check_frame_column (frame, col, name, type, success)
subroutine	fapi_encode_tests::check_encoded_odb (path, success)
program	fapi_general

Variables
integer(8), dimension(7), parameter	fapi_encode_tests::col1_data = [1, 2, 3, 4, 5, 6, 7]
integer(8), dimension(7), parameter	fapi_encode_tests::col2_data = [0, 0, 0, 0, 0, 0, 0]
integer(8), dimension(7), parameter	fapi_encode_tests::col3_data = [73, 73, 73, 73, 73, 73, 73]
real(8), dimension(7), parameter	fapi_encode_tests::col4_data = [1.432, 1.432, 1.432, 1.432, 1.432, 1.432, 1.432]
integer(8), dimension(7), parameter	fapi_encode_tests::col5_data = [-17, -7, -7, 999999, 1, 4, 4]
character(16), dimension(7), parameter	fapi_encode_tests::col6_data = [character(16) :: "aoeu", "aoeu", "abcdefghijkl", "None", "boo", "squiggle", "a"]
character(8), dimension(7), parameter	fapi_encode_tests::col7_data = [character(8) :: "abcd", "abcd", "abcd", "abcd", "abcd", "abcd", "abcd"]
real(8), dimension(7), parameter	fapi_encode_tests::col8_data = [2.345, 2.345, 2.345, 2.345, 2.345, 2.345, 2.345]
real(8), dimension(7), parameter	fapi_encode_tests::col9_data = [999.99, 888.88, 777.77, 666.66, 999999.0, 444.44, 333.33]
real(8), dimension(7), parameter	fapi_encode_tests::col10_data = [999.99, 888.88, 777.77, 666.66, 999999.0, 444.44, 333.33]
integer(8), dimension(7), parameter	fapi_encode_tests::col11_data = [1, 999999, 3, 4, 5, 999999, 8]
integer(8), dimension(7), parameter	fapi_encode_tests::col12_data = [-512, 999999, 3, 7623, -22000, 999999, 7]
integer(8), dimension(7), parameter	fapi_encode_tests::col13_data = [-1234567, 8765432, 999999, 22, 2222222, -81222323, 999999]
integer(8), dimension(7), parameter	fapi_encode_tests::col14_data = [999999, 999999, 999999, 999999, 999999, 999999, 999999]

Function/Subroutine Documentation

fapi_general()

program fapi_general

Definition at line 421 of file encode.f90.

Here is the call graph for this function: