blocks_equal Function

private pure function blocks_equal(block1, block2)

check if two blocks are equal

Arguments

Type IntentOptional Attributes Name
type(block_nd), intent(in) :: block1
type(block_nd), intent(in) :: block2

Return Value logical