|
| subroutine | ztoc (z, infz, v) |
| | Given a complex z, return the equivalent cartesian unit 3-vector associated by the polar stereographic projection. More...
|
| |
| subroutine | ztocd (z, infz, v, vd) |
| | The convention adopted for the complex derivative is that, for a complex infinitesimal map displacement, delta_z, the corresponding infinitesimal change of cartesian vector position is delta_v given by: delta_v = Real(vd*delta_z). More...
|
| |
Definition at line 106 of file pmat4.f90.
◆ ztoc()
| subroutine pmat4::ztoc::ztoc |
( |
complex(dpc), intent(in) |
z, |
|
|
logical, intent(in) |
infz, |
|
|
real(dp), dimension(3), intent(out) |
v |
|
) |
| |
|
private |
Given a complex z, return the equivalent cartesian unit 3-vector associated by the polar stereographic projection.
- Parameters
-
| [in] | z | complex input argument |
| [in] | infz | logical indicator for z being the point at infinity |
| [out] | v | cartesian unit 3-vector position equivalent to z |
- Author
- R. J. Purser
Definition at line 2053 of file pmat4.f90.
◆ ztocd()
| subroutine pmat4::ztoc::ztocd |
( |
complex(dpc), intent(in) |
z, |
|
|
logical, intent(in) |
infz, |
|
|
real(dp), dimension(3), intent(out) |
v, |
|
|
complex(dpc), dimension(3), intent(out) |
vd |
|
) |
| |
|
private |
The convention adopted for the complex derivative is that, for a complex infinitesimal map displacement, delta_z, the corresponding infinitesimal change of cartesian vector position is delta_v given by: delta_v = Real(vd*delta_z).
Thus, by a kind of Cauchy-Riemann relation, Imag(vd)=v CROSS Real(vd).
- Note
- The derivative for the ideal point at infinity has not been coded yet.
- Parameters
-
| [in] | z | complex input argument |
| [in] | infz | logical indicator for z being the point at infinity |
| [out] | v | cartesian unit 3-vector position equivalent to z |
| [out] | vd | derivative of cartesian v wrt z |
- Author
- R. J. Purser
Definition at line 2083 of file pmat4.f90.
The documentation for this interface was generated from the following file:
- /lfs/h2/emc/global/noscrub/George.Gayno/ufs_utils.git/UFS_UTILS.upstream/sorc/grid_tools.fd/regional_esg_grid.fd/pmat4.f90
1.8.14