This module contains code run cires_ugwp afterwards.The subroutine initializes the CIRES UGWP. More...
Functions/Subroutines | |
| subroutine | cires_ugwp_post::cires_ugwp_post_run (ldiag_ugwp, dtf, im, levs, gw_dudt, gw_dvdt, tau_tofd, tau_mtb, tau_ogw, tau_ngw, zmtb, zlwb, zogw, dudt_mtb, dudt_ogw, dudt_tms, tot_zmtb, tot_zlwb, tot_zogw, tot_tofd, tot_mtb, tot_ogw, tot_ngw, du3dt_mtb, du3dt_ogw, du3dt_tms, du3dt_ngw, dv3dt_ngw, errmsg, errflg) |
This module contains code run cires_ugwp afterwards.
The subroutine initializes the CIRES UGWP.
| subroutine cires_ugwp_post::cires_ugwp_post_run | ( | logical, intent(in) | ldiag_ugwp, |
| real(kind=kind_phys), intent(in) | dtf, | ||
| integer, intent(in) | im, | ||
| integer, intent(in) | levs, | ||
| real(kind=kind_phys), dimension(:,:), intent(in) | gw_dudt, | ||
| real(kind=kind_phys), dimension(:,:), intent(in) | gw_dvdt, | ||
| real(kind=kind_phys), dimension(:), intent(in) | tau_tofd, | ||
| real(kind=kind_phys), dimension(:), intent(in) | tau_mtb, | ||
| 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) | zmtb, | ||
| real(kind=kind_phys), dimension(:), intent(in) | zlwb, | ||
| real(kind=kind_phys), dimension(:), intent(in) | zogw, | ||
| real(kind=kind_phys), dimension(:,:), intent(in) | dudt_mtb, | ||
| real(kind=kind_phys), dimension(:,:), intent(in) | dudt_ogw, | ||
| real(kind=kind_phys), dimension(:,:), intent(in) | dudt_tms, | ||
| 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, | ||
| character(len=*), intent(out) | errmsg, | ||
| integer, intent(out) | errflg | ||
| ) |
Definition at line 16 of file cires_ugwp_post.F90.