iparity(3f) - [FORTRAN:INTRINSIC:BIT MANIPULATION] Bitwise exclusive or of array elements
o result = iparity(array[, mask]) o result = iparity(array, dim[, mask])
Reduces with bitwise XOR (exclusive OR) the elements of ARRAY along dimension DIM if the corresponding element in MASK is TRUE.
ARRAY Shall be an array of type INTEGER DIM (Optional) shall be a scalar of type INTEGER with a value in the range from "1" to "n", where "n" equals the rank of ARRAY. MASK (Optional) shall be of type LOGICAL and either be a scalar or an array of the same shape as ARRAY.
The result is of the same type as ARRAY.If DIM is absent, a scalar with the bitwise XOR of all elements in ARRAY is returned. Otherwise, an array of rank "n-1", where "n" equals the rank of ARRAY, and a shape similar to that of ARRAY with dimension DIM dropped is returned.
Sample program:
program demo_iparity implicit none integer, dimension(2) :: a a(1) = int(b00100100) a(2) = int(b01101010) print (b8.8), iparity(a) end program demo_iparityResults:
01001110
[[Fortran 2008]] and later
Transformational function
iany(3), iall(3), ieor(3), parity(3)
iparity (3) | March 11, 2021 |