15 December 2024 07:24:46 PM L4LIB_TEST C version Test the L4LIB library. I4_TO_L4_TEST I4_TO_L4 converts an I4 to an L4. I4 L4 -5 1 -4 1 -3 1 -2 1 -1 1 0 0 1 1 2 1 3 1 4 1 5 1 I4_TO_L4VEC_TEST I4_TO_L4VEC converts an I4 to an L4VEC. I4 L4VEC 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 1 2 0 0 0 0 0 0 1 0 3 0 0 0 0 0 0 1 1 4 0 0 0 0 0 1 0 0 5 0 0 0 0 0 1 0 1 6 0 0 0 0 0 1 1 0 7 0 0 0 0 0 1 1 1 8 0 0 0 0 1 0 0 0 9 0 0 0 0 1 0 0 1 10 0 0 0 0 1 0 1 0 L4_TO_I4_TEST L4_TO_I4 converts an L4 to an I4. L4 I4 0 0 1 1 L4_TO_S_TEST L4_TO_S converts an L4 to a string. L4 S 1 True 0 False 1999 True 0 False 1 True L4_UNIFORM_TEST L4_UNIFORM computes pseudorandom logical values. The initial seed is 123456789 1 0 2 1 3 1 4 1 5 0 6 0 7 0 8 0 9 0 10 1 L4_XOR_TEST L4_XOR computes the exclusive OR of two L4's L1 L2 L4_XOR(L1,L2) 0 0 0 0 1 1 1 0 1 1 1 0 L4MAT_PRINT_TEST L4MAT_PRINT prints a logical matrix. A(I,J) = I+1 is divisible by J+1 0 0 0 0 0 0 0 0 0 0 1 1 1 1 1 1 1 1 1 1 2 2 2 2 2 2 2 2 2 2 3 3 3 3 3 Col 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 Row 0: 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1: 1 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2: 1 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 3: 1 1 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 4: 1 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 5: 1 1 1 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 6: 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 7: 1 1 0 1 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 8: 1 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 9: 1 1 0 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 10: 1 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 11: 1 1 1 1 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 12: 1 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 13: 1 1 0 0 0 0 1 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 14: 1 0 1 0 1 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 15: 1 1 0 1 0 0 0 1 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 16: 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 17: 1 1 1 0 0 1 0 0 1 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 18: 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 19: 1 1 0 1 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 3 3 3 3 3 4 4 4 4 4 4 4 4 4 4 Col 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 Row 0: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 3: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 4: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 5: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 6: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 7: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 8: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 9: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 10: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 11: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 12: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 13: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 14: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 15: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 16: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 17: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 18: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 19: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 L4MAT_PRINT_SOME_TEST L4MAT_PRINT_SOME prints some of a logical matrix. Here, our matrix is 20x50, but we print rows 4:14, columns 0:4 A(I,J) = I+1 is divisible by J+1 Col 0 1 2 3 4 Row 4: 1 0 0 0 1 5: 1 1 1 0 0 6: 1 0 0 0 0 7: 1 1 0 1 0 8: 1 0 1 0 0 9: 1 1 0 0 1 10: 1 0 0 0 0 11: 1 1 1 1 0 12: 1 0 0 0 0 13: 1 1 0 0 0 14: 1 0 1 0 1 L4MAT_TRANSPOSE_PRINT_TEST L4MAT_TRANSPOSE_PRINT prints a logical matrix, transposed. A(I,J) = I+1 is divisible by J+1 0 0 0 0 0 0 0 0 0 0 1 1 1 1 1 1 1 1 1 1 Row 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 Col 0: 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1: 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 2: 0 0 1 0 0 1 0 0 1 0 0 1 0 0 1 0 0 1 0 0 3: 0 0 0 1 0 0 0 1 0 0 0 1 0 0 0 1 0 0 0 1 4: 0 0 0 0 1 0 0 0 0 1 0 0 0 0 1 0 0 0 0 1 5: 0 0 0 0 0 1 0 0 0 0 0 1 0 0 0 0 0 1 0 0 6: 0 0 0 0 0 0 1 0 0 0 0 0 0 1 0 0 0 0 0 0 7: 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 1 0 0 0 0 8: 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 1 0 0 9: 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 1 10: 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 11: 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 12: 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 13: 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 14: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 15: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 16: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 17: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 18: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 19: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 20: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 21: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 22: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 23: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 24: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 25: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 26: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 27: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 28: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 29: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 30: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 31: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 32: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 33: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 34: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 35: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 36: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 37: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 38: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 39: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 40: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 41: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 42: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 43: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 44: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 45: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 46: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 47: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 48: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 49: 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 L4MAT_TRANSPOSE_PRINT_SOME_TEST L4MAT_TRANSPOSE_PRINT_SOME prints some of a logical matrix, transposed. Here, our matrix is 20x50, but we print rows 4:14, columns 0:4 A(I,J) = I+1 is divisible by J+1 0 0 0 0 0 0 1 1 1 1 1 Row 4 5 6 7 8 9 0 1 2 3 4 Col 0: 1 1 1 1 1 1 1 1 1 1 1 1: 0 1 0 1 0 1 0 1 0 1 0 2: 0 1 0 0 1 0 0 1 0 0 1 3: 0 0 0 1 0 0 0 1 0 0 0 4: 1 0 0 0 0 1 0 0 0 0 1 L4MAT_UNIFORM_NEW_TEST L4MAT_UNIFORM_NEW computes a vector of pseudorandom logical values. The initial seed is 123456789 Uniform L4MAT: Col 0 1 2 3 Row 0: 0 0 0 0 1: 1 0 0 1 2: 1 0 0 0 3: 1 0 1 0 4: 0 1 1 0 L4VEC_NEXT_TEST L4VEC_NEXT generates logical vectors in order. 000 001 010 011 100 101 110 111 L4VEC_PRINT_TEST L4VEC_PRINT prints an L4VEC. Is I Prime?: 0: F 1: F 2: T 3: T 4: F 5: T 6: F 7: T 8: F 9: F 10: F 11: T 12: F 13: T 14: F 15: F 16: F 17: T 18: F 19: T L4VEC_UNIFORM_NEW_TEST L4VEC_UNIFORM_NEW computes a vector of pseudorandom logical values. The initial seed is 123456789 Uniform L4VEC: 0: F 1: T 2: T 3: T 4: F 5: F 6: F 7: F 8: F 9: T L4LIB_TEST Normal end of execution. 15 December 2024 07:24:46 PM