subroutine rayleigh_damp::rayleigh_damp_run | ( | logical, intent(in) | lsidea, |
integer, intent(in) | im, | ||
integer, intent(in) | km, | ||
real(kind=kind_phys), dimension(:,:), intent(inout) | a, | ||
real(kind=kind_phys), dimension(:,:), intent(inout) | b, | ||
real(kind=kind_phys), dimension(:,:), intent(inout) | c, | ||
real(kind=kind_phys), dimension(:,:), intent(in) | u1, | ||
real(kind=kind_phys), dimension(:,:), intent(in) | v1, | ||
real(kind=kind_phys), intent(in) | dt, | ||
real(kind=kind_phys), intent(in) | cp, | ||
integer, intent(in) | levr, | ||
real(kind=kind_phys), dimension(:), intent(in) | pgr, | ||
real(kind=kind_phys), dimension(:,:), intent(in) | prsl, | ||
real(kind=kind_phys), intent(in) | prslrd0, | ||
real(kind=kind_phys), intent(in) | ral_ts, | ||
logical, intent(in) | ldiag3d, | ||
real(kind=kind_phys), dimension(:,:,:), intent(inout), optional | dtend, | ||
integer, dimension(:,:), intent(in) | dtidx, | ||
integer, intent(in) | index_of_process_rayleigh_damping, | ||
integer, intent(in) | index_of_temperature, | ||
integer, intent(in) | index_of_x_wind, | ||
integer, intent(in) | index_of_y_wind, | ||
character(len=*), intent(out) | errmsg, | ||
integer, intent(out) | errflg ) |
Definition at line 21 of file rayleigh_damp.f.