Functions/Subroutines | |
subroutine | iniflu (i_tube, I1, In, time, pos, pos_loc, ion, neutre, proxy, absci, alt, densneut, denelc, temelc, denion, temion, colden, nen0, ddeng, botE, centE, angzb, gmu, gwt, prec, Ei, Fi) |
Real *8 function | integ_curv (x1, x2, y1, y2) |
subroutine iniflu | ( | integer | i_tube, |
integer | I1, | ||
integer | In, | ||
type (time_global) | time, | ||
type(coordonnees), dimension(:,:) | pos, | ||
type(coordonnees), dimension(:) | pos_loc, | ||
type(espece), dimension(:) | ion, | ||
type(neutral), dimension(:) | neutre, | ||
type(activite) | proxy, | ||
real*8, dimension(:) | absci, | ||
real, dimension(:) | alt, | ||
real, dimension(:,:) | densneut, | ||
real, dimension(:) | denelc, | ||
real, dimension(:) | temelc, | ||
real, dimension(:,:) | denion, | ||
real, dimension (:) | temion, | ||
real*8, dimension (:,:) | colden, | ||
integer | nen0, | ||
real, dimension(:) | ddeng, | ||
real, dimension(:) | botE, | ||
real, dimension(:) | centE, | ||
real, dimension(:) | angzb, | ||
real*8, dimension(:) | gmu, | ||
real*8, dimension(:) | gwt, | ||
type(precip_elec) | prec, | ||
real | Ei, | ||
real | Fi | ||
) |