isSmallerOrEqual Function

  1. ply_prj_header_module.f90
  2. ply_prj_header_module
  3. isSmallerOrEqual

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

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

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

Arguments

TypeIntentOptionalAttributesName
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~~issmallerorequal~6~~CalledByGraph proc~issmallerorequal~6 isSmallerOrEqual interface~operator(lt=)~6 operator(<=) interface~operator(lt=)~6->proc~issmallerorequal~6

Contents

None