subroutine ugwpv1_gsldrag_post::ugwpv1_gsldrag_post_run |
( |
integer, intent(in) | im, |
|
|
integer, intent(in) | levs, |
|
|
logical, intent(in) | ldiag_ugwp, |
|
|
real(kind=kind_phys), intent(in) | dtf, |
|
|
real(kind=kind_phys), dimension(:,:), intent(in) | dudt_gw, |
|
|
real(kind=kind_phys), dimension(:,:), intent(in) | dvdt_gw, |
|
|
real(kind=kind_phys), dimension(:,:), intent(in) | dtdt_gw, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | tau_ogw, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | tau_ngw, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | zobl, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | zlwb, |
|
|
real(kind=kind_phys), dimension(:), intent(in) | zogw, |
|
|
real(kind=kind_phys), dimension(:,:), intent(in), optional | dudt_obl, |
|
|
real(kind=kind_phys), dimension(:,:), intent(in), optional | dvdt_obl, |
|
|
real(kind=kind_phys), dimension(:,:), intent(in), optional | dudt_ofd, |
|
|
real(kind=kind_phys), dimension(:,:), intent(in), optional | dvdt_ofd, |
|
|
real(kind=kind_phys), dimension(:,:), intent(in), optional | dudt_ogw, |
|
|
real(kind=kind_phys), dimension(:,:), intent(in), optional | dvdt_ogw, |
|
|
real(kind=kind_phys), dimension(:,:), intent(in), optional | dudt_oss, |
|
|
real(kind=kind_phys), dimension(:,:), intent(in), optional | dvdt_oss, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) | tot_zmtb, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) | tot_zlwb, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) | tot_zogw, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) | tot_tofd, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) | tot_mtb, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) | tot_ogw, |
|
|
real(kind=kind_phys), dimension(:), intent(inout) | tot_ngw, |
|
|
real(kind=kind_phys), dimension(:,:), intent(inout), optional | du3dt_mtb, |
|
|
real(kind=kind_phys), dimension(:,:), intent(inout), optional | du3dt_ogw, |
|
|
real(kind=kind_phys), dimension(:,:), intent(inout), optional | du3dt_tms, |
|
|
real(kind=kind_phys), dimension(:,:), intent(inout), optional | du3dt_ngw, |
|
|
real(kind=kind_phys), dimension(:,:), intent(inout), optional | dv3dt_ngw, |
|
|
real(kind=kind_phys), dimension(:,:), intent(in), optional | dudt_ngw, |
|
|
real(kind=kind_phys), dimension(:,:), intent(in), optional | dvdt_ngw, |
|
|
real(kind=kind_phys), dimension(:,:), intent(in), optional | dtdt_ngw, |
|
|
real(kind=kind_phys), dimension(:,:), intent(inout), optional | ldu3dt_ngw, |
|
|
real(kind=kind_phys), dimension(:,:), intent(inout), optional | ldv3dt_ngw, |
|
|
real(kind=kind_phys), dimension(:,:), intent(inout), optional | ldt3dt_ngw, |
|
|
real(kind=kind_phys), dimension(:,:), intent(inout), optional | dws3dt_ogw, |
|
|
real(kind=kind_phys), dimension(:,:), intent(inout), optional | dws3dt_obl, |
|
|
real(kind=kind_phys), dimension(:,:), intent(inout), optional | dws3dt_oss, |
|
|
real(kind=kind_phys), dimension(:,:), intent(inout), optional | dws3dt_ofd, |
|
|
real(kind=kind_phys), dimension(:,:), intent(inout), optional | ldu3dt_ogw, |
|
|
real(kind=kind_phys), dimension(:,:), intent(inout), optional | ldu3dt_obl, |
|
|
real(kind=kind_phys), dimension(:,:), intent(inout), optional | ldu3dt_oss, |
|
|
real(kind=kind_phys), dimension(:,:), intent(inout), optional | ldu3dt_ofd, |
|
|
real(kind=kind_phys), dimension(:), intent(in), optional | du_ogwcol, |
|
|
real(kind=kind_phys), dimension(:), intent(in), optional | dv_ogwcol, |
|
|
real(kind=kind_phys), dimension(:), intent(in), optional | du_oblcol, |
|
|
real(kind=kind_phys), dimension(:), intent(in), optional | dv_oblcol, |
|
|
real(kind=kind_phys), dimension(:), intent(in), optional | du_osscol, |
|
|
real(kind=kind_phys), dimension(:), intent(in), optional | dv_osscol, |
|
|
real(kind=kind_phys), dimension(:), intent(in), optional | du_ofdcol, |
|
|
real(kind=kind_phys), dimension(:), intent(in), optional | dv_ofdcol, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | du3_ogwcol, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | dv3_ogwcol, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | du3_oblcol, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | dv3_oblcol, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | du3_osscol, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | dv3_osscol, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | du3_ofdcol, |
|
|
real(kind=kind_phys), dimension(:), intent(inout), optional | dv3_ofdcol, |
|
|
real(kind=kind_phys), dimension(:,:), intent(inout) | dtdt, |
|
|
real(kind=kind_phys), dimension(:,:), intent(inout) | dudt, |
|
|
real(kind=kind_phys), dimension(:,:), intent(inout) | dvdt, |
|
|
character(len=*), intent(out) | errmsg, |
|
|
integer, intent(out) | errflg ) |