bipolar_pole_lat Function

public pure function bipolar_pole_lat(phi_join) result(lat)

Latitude (deg) of the two cap poles — they sit ON the join latitude, so this is simply phi_join.

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=wp),	intent(in)			::	phi_join

Return Value real(kind=wp)

Source Code

   pure function bipolar_pole_lat(phi_join) result(lat)
      !! Latitude (deg) of the two cap poles — they sit ON the join
      !! latitude, so this is simply `phi_join`.
      real(wp), intent(in) :: phi_join
      real(wp) :: lat
      lat = phi_join
   end function bipolar_pole_lat