isSmallerOrEqual Function

private pure function isSmallerOrEqual(left, right) result(small)

This function provides a <= comparison of two projections.

Sorting of fxt header is given by node_header, fxt_blocksize and last by factor.

Arguments

Type IntentOptional Attributes Name
type(ply_fxt_header_type), intent(in) :: left

projection to compare

type(ply_fxt_header_type), intent(in) :: right

projection to compare against

Return Value logical

is smaller??


Called by

proc~~issmallerorequal~3~~CalledByGraph proc~issmallerorequal~3 isSmallerOrEqual interface~operator(lt=)~2 operator(<=) interface~operator(lt=)~2->proc~issmallerorequal~3