libsim  Versione6.3.0

◆ arrayof_georef_coord_array_packarray()

subroutine, private georef_coord_class::arrayof_georef_coord_array_packarray ( type(arrayof_georef_coord_array this)
private

Method for packing the array object reducing at a minimum the memory occupation, without destroying its contents.

The value of this::overalloc remains unchanged. After the call to the method, the object can continue to be used, extended and shortened as before. If the object is empty the array is allocated to zero length.

Parametri
thisobject to be packed

Definizione alla linea 683 del file georef_coord_class.F90.

683 ENDIF
684 
685 CONTAINS
686 
687 FUNCTION pointinpoly(x, y, px, py)
688 DOUBLE PRECISION, INTENT(in) :: x, y, px(:), py(:)
689 LOGICAL :: pointinpoly
690 
691 INTEGER :: i, j, starti
692 
693 pointinpoly = .false.
694 

Generated with Doxygen.