complex*16 function, private module_mp_radar::get_m_mix_nested |
( |
complex*16, intent(in) | m_a, |
|
|
complex*16, intent(in) | m_i, |
|
|
complex*16, intent(in) | m_w, |
|
|
double precision, intent(in) | volair, |
|
|
double precision, intent(in) | volice, |
|
|
double precision, intent(in) | volwater, |
|
|
character(len=*), intent(in) | mixingrule, |
|
|
character(len=*), intent(in) | host, |
|
|
character(len=*), intent(in) | matrix, |
|
|
character(len=*), intent(in) | inclusion, |
|
|
character(len=*), intent(in) | hostmatrix, |
|
|
character(len=*), intent(in) | hostinclusion, |
|
|
integer, intent(out) | cumulerror ) |
|
private |