COMPUTE IONIZATION RATES USING GLOW MODEL RUN AT EACH X,Y METHOD.
zero flux should really be checked per field line date in format needed by GLOW (yyddd)
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=wp), | intent(in), | dimension(:,:,:) | :: | W0 | ||
| real(kind=wp), | intent(in), | dimension(:,:,:) | :: | PhiWmWm2 | ||
| integer, | intent(in), | dimension(3) | :: | ymd | ||
| real(kind=wp), | intent(in) | :: | UTsec | |||
| real(kind=wp), | intent(in) | :: | f107 | |||
| real(kind=wp), | intent(in) | :: | f107a | |||
| real(kind=wp), | intent(in), | dimension(:,:) | :: | glat | ||
| real(kind=wp), | intent(in), | dimension(:,:) | :: | glon | ||
| real(kind=wp), | intent(in), | dimension(:,:,:) | :: | alt | ||
| real(kind=wp), | intent(in), | dimension(:,:,:,:) | :: | nn | ||
| real(kind=wp), | intent(in), | dimension(:,:,:) | :: | Tn | ||
| real(kind=wp), | intent(in), | dimension(-1:,-1:,-1:,:) | :: | ns | ||
| real(kind=wp), | intent(in), | dimension(-1:,-1:,-1:,:) | :: | Ts | ||
| real(kind=wp), | intent(out), | dimension(1:size(nn,1),1:size(nn,2),1:size(nn,3)) | :: | eheating | ||
| real(kind=wp), | intent(out), | dimension(1:size(nn,2),1:size(nn,3),lwave) | :: | iver | ||
| real(kind=wp), | intent(out), | dimension(1:size(nn,1),1:size(nn,2),1:size(nn,3),lsp-1) | :: | ionrate |