|
subroutine | invsym2 (em, z) |
| Get the inverse of a 2*2 matrix (need not be symmetric in this case). More...
|
|
subroutine | invsym2d (em, z, zd) |
| Get the inverse, z,of a 2*2 symmetric matrix, em, and its derivative, zd, with respect to symmetric variations of its components. More...
|
|
Definition at line 22 of file psym2.f90.
◆ invsym2()
subroutine psym2::invsym2::invsym2 |
( |
real(dp), dimension(2,2), intent(in) |
em, |
|
|
real(dp), dimension(2,2), intent(out) |
z |
|
) |
| |
|
private |
Get the inverse of a 2*2 matrix (need not be symmetric in this case).
- Parameters
-
[in] | em | 2*2 matrix |
[out] | z | inverse of a 2*2 matrix |
- Author
- R. J. Purser
Definition at line 112 of file psym2.f90.
◆ invsym2d()
subroutine psym2::invsym2::invsym2d |
( |
real(dp), dimension(2,2), intent(in) |
em, |
|
|
real(dp), dimension(2,2), intent(out) |
z, |
|
|
real(dp), dimension(2,2,2,2), intent(out) |
zd |
|
) |
| |
|
private |
Get the inverse, z,of a 2*2 symmetric matrix, em, and its derivative, zd, with respect to symmetric variations of its components.
I.e., for a symmetric infinitesimal change, delta_em, in em, the resulting infinitesimal change in z would be:
delta_z(i,j) = matmul(zd(i,j,:,:),delta_em)
- Parameters
-
[in] | em | 2*2 symmetric matrix |
[out] | z | inverse of a 2*2 symmetric matrix |
[out] | zd | derivative of the 2*2 symmetric matrix |
- Author
- R. J. Purser
Definition at line 132 of file psym2.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/psym2.f90