Calculate the localized admittance and correlation spectra of two functions at a given location using spherical cap localization windows.
call SHLocalizedAdmitCorr (
tapers: input, real*8, dimension (
- A matrix of spherical cap localization functions obtained from
taper_order: input, integer, dimension (
- The angular order of the windowing coefficients in
lwin: input, integer
- The spherical harmonic bandwidth of the localizing windows.
lat: input, real*8
- The latitude of the localized analysis in degrees.
lon: input, real*8
- The longitude of the localized analysis in degrees.
gilm: input, real*8, dimension (2,
- The spherical harmonic coefficients of the function G.
tilm: input, real*8, dimension (2,
- The spherical harmonic coefficients of the function T.
lmax: input, integer
- The maximum spherical harmonic degree of the input functions corresponding to
admit: output, real*8, dimension (
- The admittance function, which is equal to
corr: output, real*8, dimension (
- The degree correlation function, which is equal to
k: input, integer
- The number of tapers to be used in the multitaper spectral analysis.
admit_error: output, optional, real*8, dimension (
- The standard error of the admittance function.
corr_error: output, optional, real*8, dimension (
- The standard error of the degree correlation function.
taper_wt: input, optional, real*8, dimension (
- The weights to be applied to the spectral estimates when calculating the admittance, correlation, and their associated errors. This must sum to unity.
mtdef: input, optional, integer, default = 1
- 1 (default): Calculate the multitaper spectral estimates Sgt, Sgg and Stt first, and then use these to calculate the admittance and correlation functions. 2: Calculate admittance and correlation spectra using each individual taper, and then average these to obtain the multitaper admittance and correlation functions.
k1linsig: input, optional, integer
- If equal to one, and only a single taper is being used, the errors in the admittance function will be calculated by assuming that the coefficients of
tilmare related by a linear degree-dependent transfer function and that the lack of correlation is a result of uncorrelated noise. This is the square root of eq. 33 of Simons et al. 1997.
exitstatus: output, optional, integer
- If present, instead of executing a STOP when an error is encountered, the variable exitstatus will be returned describing the error. 0 = No errors; 1 = Improper dimensions of input array; 2 = Improper bounds for input variable; 3 = Error allocating memory; 4 = File IO error.
SHLocalizedAdmitCorr will calculate the localized admittance and degree correlation spectra of two functions at a given location. The windowing functions are solutions to the spherical-cap concentration problem (as calculated by
SHReturnTapersM), of which the best
k concentrated tapers are utilized. If
k is greater than 1, then estimates of the standard error for the admittance and correlation will be returned in the optional arrays
corr_error. The symmetry axis of the localizing windows are rotated to the coordinates (
lon) before performing the windowing operation.
The admittance is defined as
Sgt is the localized cross-power spectrum of two functions
T expressed in spherical harmonics. The localized degree-correlation spectrum is defined as
Sgt/sqrt(Sgg Stt), which can possess values between -1 and 1. Two methods are available for calculating the multitaper admittance and correlation functions. When
mtdef is 1 (default), the multitaper estimates and errors of Sgt, Stt, and Sgg are calculated by calls to
SHMultiTaperCSE, and these results are then used to calculate the final admittance and correlation functions. When
mtdef is 2, the admitance and correlation are calculated invidivually for each individual taper, and these results are then averaged.
If the optional parameter
k1linsig is specified, and only a single taper is being used, the uncertainty in the admittance function will be calculated by assuming the two sets of coefficients are related by a linear degree-dependent transfer function and that the lack of correlation is a result of uncorrelated noise.
mtdef is 1, by default, the multitaper spectral estimates are calculated as an unweighted average of the individual tapered estimates. However, if the optional argument
taper_wt is specified, a weighted average will be employed using the weights in this array. Minimum variance optimal weights can be obtained from the routines
SHMTVarOpt if the form of the underlying global power spectrum is known. Taper weights can not be used when
mtdef is 2
This routine assumes that the input functions and tapers are expressed using geodesy 4-pi normalized spherical harmonic functions that exclude the Condon-Shortley phase factor of (-1)^m.
Wieczorek, M. A. and F. J. Simons, Minimum-variance multitaper spectral estimation on the sphere, J. Fourier Anal. Appl., 13, doi:10.1007/s00041-006-6904-1, 665-692, 2007.
Simons, F. J., F. A. Dahlen and M. A. Wieczorek, Spatiospectral concentration on the sphere, SIAM Review, 48, 504-536, doi:10.1137/S0036144504445765, 2006.
Wieczorek, M. A. and F. J. Simons, Localized spectral analysis on the sphere, Geophys. J. Int., 162, 655-675, 2005.
Simons, M., S. C. Solomon and B. H. Hager, Localization of gravity and topography: constrains on the tectonics and mantle dynamics of Venus, Geophys. J. Int., 131, 24-44, 1997.Edit me