SetEsriPeStringInteger Subroutine

private subroutine SetEsriPeStringInteger(string, layer)

set the esri pe string of a integer grid

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: string
type(grid_integer), intent(inout) :: layer

Source Code

SUBROUTINE SetEsriPeStringInteger &
!
(string, layer)

IMPLICIT NONE

!Arguments with intent(in):
CHARACTER (LEN = *), INTENT(IN) :: string

!Arguments with intent(out):
TYPE(grid_integer), INTENT(INOUT) :: layer

!------------end of declaration------------------------------------------------

layer % esri_pe_string = string

END SUBROUTINE SetEsriPeStringInteger