| subroutine module_sf_ruclsm::snowseaice |
( |
logical, intent(in) | debug_print, |
|
|
real (kind_phys), intent(in) | xlat, |
|
|
real (kind_phys), intent(in) | xlon, |
|
|
integer, intent(in) | i, |
|
|
integer, intent(in) | j, |
|
|
integer, intent(in) | isoil, |
|
|
real (kind_phys), intent(in) | delt, |
|
|
integer, intent(in) | ktau, |
|
|
real (kind_phys), intent(in) | conflx, |
|
|
integer, intent(in) | nzs, |
|
|
integer, intent(in) | nddzs, |
|
|
integer, intent(in) | isncond_opt, |
|
|
integer, intent(in) | isncovr_opt, |
|
|
real (kind_phys), intent(in) | meltfactor, |
|
|
real (kind_phys), intent(in) | rhonewsn, |
|
|
real (kind_phys), intent(in) | snhei_crit, |
|
|
integer, intent(inout) | iland, |
|
|
real (kind_phys), intent(in) | prcpms, |
|
|
real (kind_phys), intent(in) | rainf, |
|
|
real (kind_phys), intent(in) | newsnow, |
|
|
real (kind_phys), intent(inout) | snhei, |
|
|
real (kind_phys), intent(inout) | snwe, |
|
|
real (kind_phys), intent(inout) | snowfrac, |
|
|
real (kind_phys), intent(inout) | rhosn, |
|
|
real (kind_phys), intent(in) | patm, |
|
|
real (kind_phys), intent(in) | qvatm, |
|
|
real (kind_phys), intent(in) | qcatm, |
|
|
real (kind_phys), intent(in) | glw, |
|
|
real (kind_phys), intent(in) | gsw, |
|
|
real (kind_phys), intent(inout) | emiss, |
|
|
real (kind_phys) | rnet, |
|
|
real (kind_phys), intent(in) | qkms, |
|
|
real (kind_phys), intent(in) | tkms, |
|
|
real (kind_phys), intent(in) | rho, |
|
|
logical, intent(in) | myj, |
|
|
real (kind_phys), intent(inout) | alb, |
|
|
real (kind_phys), intent(inout) | znt, |
|
|
real (kind_phys), dimension(1:nzs), intent(in) | tice, |
|
|
real (kind_phys), dimension(1:nzs), intent(in) | rhosice, |
|
|
real (kind_phys), dimension(1:nzs), intent(in) | capice, |
|
|
real (kind_phys), dimension(1:nzs), intent(in) | thdifice, |
|
|
real (kind_phys), dimension(1:nzs), intent(in) | zsmain, |
|
|
real (kind_phys), dimension(1:nzs), intent(in) | zshalf, |
|
|
real (kind_phys), dimension(1:nddzs), intent(in) | dtdzs, |
|
|
real (kind_phys), dimension(1:nzs), intent(in) | dtdzs2, |
|
|
real (kind_phys), dimension(1:5001), intent(in) | tbq, |
|
|
real (kind_phys), intent(in) | xlv, |
|
|
real (kind_phys) | cp, |
|
|
real (kind_phys) | rovcp, |
|
|
real (kind_phys), intent(in) | cw, |
|
|
real (kind_phys) | stbolt, |
|
|
real (kind_phys) | tabs, |
|
|
integer, intent(inout) | ilnb, |
|
|
real (kind_phys), intent(out) | snweprint, |
|
|
real (kind_phys), intent(out) | snheiprint, |
|
|
real (kind_phys), intent(out) | rsm, |
|
|
real (kind_phys), dimension( 1:nzs ), intent(inout) | tso, |
|
|
real (kind_phys), intent(inout) | dew, |
|
|
real (kind_phys), intent(inout) | soilt, |
|
|
real (kind_phys), intent(inout) | soilt1, |
|
|
real (kind_phys), intent(inout) | tsnav, |
|
|
real (kind_phys), intent(inout) | qvg, |
|
|
real (kind_phys), intent(inout) | qsg, |
|
|
real (kind_phys), intent(inout) | qcg, |
|
|
real (kind_phys), intent(inout) | smelt, |
|
|
real (kind_phys), intent(inout) | snoh, |
|
|
real (kind_phys), intent(inout) | snflx, |
|
|
real (kind_phys), intent(inout) | snom, |
|
|
real (kind_phys), intent(inout) | eeta, |
|
|
real (kind_phys), intent(inout) | qfx, |
|
|
real (kind_phys), intent(inout) | hfx, |
|
|
real (kind_phys), intent(inout) | s, |
|
|
real (kind_phys), intent(inout) | sublim, |
|
|
real (kind_phys), intent(inout) | prcpl, |
|
|
real (kind_phys) | fltot ) |
|
private |
1.12.0