isSmaller Function

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

This function provides a < comparison of the header of two projections.

Sorting of projections is given by the kind, fpt_header and last by l2p_header.

Arguments

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

projection to compare
type(ply_prj_header_type), intent(in) :: right

projection to compare against

Return Value logical

is smaller??


Called by

proc~~issmaller~~CalledByGraph proc~issmaller isSmaller interface~operator(lt) operator(<) interface~operator(lt)->proc~issmaller