create_proj Function

public function create_proj(code, lon1, lat1, truelat1, truelat2, flattening, xshift, yshift) result(p)

支持Lambert投影

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: code

1 for lcc

real(kind=fp), intent(in), optional :: lon1

中心经度,默认是本初子午线(lcc), 左下角纬度(latlon)

real(kind=fp), intent(in), optional :: lat1

中心纬度(lcc), 左下角纬度(latlon)

real(kind=fp), intent(in), optional :: truelat1

First true latitude

real(kind=fp), intent(in), optional :: truelat2

Second true latitude

real(kind=fp), intent(in), optional :: flattening

eccentricity of the ellipsoid

real(kind=fp), intent(in), optional :: xshift

Easting at false origin: m

real(kind=fp), intent(in), optional :: yshift

Northing at false origin: m

Return Value type(proj_type)


Called by

proc~~create_proj~~CalledByGraph proc~create_proj create_proj program~main main program~main->proc~create_proj