subroutine aer_cloud::arg_activ |
( |
real*8, intent(in) | wparc, |
|
|
real*8, intent(in) | sigw, |
|
|
real*8, intent(out) | nact, |
|
|
real*8, intent(out) | smax, |
|
|
integer, intent(in) | nmodes, |
|
|
real*8, dimension(nmodes) | tp_par, |
|
|
real*8, dimension(nmodes) | dpg_par, |
|
|
real*8, dimension(nmodes) | kappa_par, |
|
|
real*8, dimension(nmodes) | sig_par, |
|
|
| temp_par, |
|
|
| pres_par ) |
|
private |