isSmaller Function

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

This function provides a < comparison of two projections.

Sorting of fpt header is given by node_header, fpt_blocksize and last by factor.

Arguments

TypeIntentOptionalAttributesName
type(ply_fpt_header_type), intent(in) :: left

projection to compare

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

projection to compare against

Return Value logical

is smaller??


Called by

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

Contents


Variables

TypeVisibilityAttributesNameInitial
integer, private :: left_log

help variables

integer, private :: right_log

help variables