interpolation Subroutine
public subroutine interpolation(ncol, nlay, ngas, nflav, neta, npres, ntemp, flavor, press_ref_log, temp_ref, press_ref_log_delta, temp_ref_min, temp_ref_delta, press_ref_trop_log, vmr_ref, play, tlay, col_gas, jtemp, fmajor, fminor, col_mix, tropo, jeta, jpress) bind(C, name="0")
Compute interpolation coefficients for calculations of major optical depths, minor optical depths, Rayleigh, and Planck fractions
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in) | :: | ncol | physical domain size |
||
| integer, | intent(in) | :: | nlay | physical domain size |
||
| integer, | intent(in) | :: | ngas | k-distribution table dimensions |
||
| integer, | intent(in) | :: | nflav | k-distribution table dimensions |
||
| integer, | intent(in) | :: | neta | k-distribution table dimensions |
||
| integer, | intent(in) | :: | npres | k-distribution table dimensions |
||
| integer, | intent(in) | :: | ntemp | k-distribution table dimensions |
||
| integer, | intent(in), | dimension(2,nflav) | :: | flavor | index into vmr_ref of major gases for each flavor |
|
| real(kind=wp), | intent(in), | dimension(npres) | :: | press_ref_log | log of pressure dimension in RRTMGP tables |
|
| real(kind=wp), | intent(in), | dimension(ntemp) | :: | temp_ref | temperature dimension in RRTMGP tables |
|
| real(kind=wp), | intent(in) | :: | press_ref_log_delta | constants related to RRTMGP tables |
||
| real(kind=wp), | intent(in) | :: | temp_ref_min | constants related to RRTMGP tables |
||
| real(kind=wp), | intent(in) | :: | temp_ref_delta | constants related to RRTMGP tables |
||
| real(kind=wp), | intent(in) | :: | press_ref_trop_log | constants related to RRTMGP tables |
||
| real(kind=wp), | intent(in), | dimension(2,0:ngas,ntemp) | :: | vmr_ref | reference volume mixing ratios used in compute "binary species parameter" eta |
|
| real(kind=wp), | intent(in), | dimension(ncol,nlay) | :: | play | input pressure (Pa?) and temperature (K) |
|
| real(kind=wp), | intent(in), | dimension(ncol,nlay) | :: | tlay | input pressure (Pa?) and temperature (K) |
|
| real(kind=wp), | intent(in), | dimension(ncol,nlay,0:ngas) | :: | col_gas | input column gas amount - molecules/cm^2 |
|
| integer, | intent(out), | dimension(ncol,nlay) | :: | jtemp | temperature and pressure interpolation indexes |
|
| real(kind=wp), | intent(out), | dimension(2,2,2,ncol,nlay,nflav) | :: | fmajor | Interpolation weights in pressure, eta, strat/trop |
|
| real(kind=wp), | intent(out), | dimension(2,2, ncol,nlay,nflav) | :: | fminor | Interpolation fraction in eta, strat/trop |
|
| real(kind=wp), | intent(out), | dimension(2, ncol,nlay,nflav) | :: | col_mix | combination of major species's column amounts (first index is strat/trop) |
|
| logical(kind=wl), | intent(out), | dimension(ncol,nlay) | :: | tropo | use lower (or upper) atmosphere tables |
|
| integer, | intent(out), | dimension(2, ncol,nlay,nflav) | :: | jeta | Index for binary species interpolation |
|
| integer, | intent(out), | dimension(ncol,nlay) | :: | jpress | temperature and pressure interpolation indexes |