cpl_send_seaice_fields Subroutine

public subroutine cpl_send_seaice_fields(itime, dtime, knon, knindex, pctsrf, lafin, rlon, rlat, swdown, lwdown, fluxlat, fluxsens, precip_rain, precip_snow, evap, tsurf, fder, albsol, taux, tauy, sens_prec_liq, sens_prec_sol, lat_prec_liq, lat_prec_sol)

Uses

  • proc~~cpl_send_seaice_fields~~UsesGraph proc~cpl_send_seaice_fields cpl_send_seaice_fields module~indice_sol_mod indice_sol_mod proc~cpl_send_seaice_fields->module~indice_sol_mod module~mod_grid_phy_lmdz mod_grid_phy_lmdz proc~cpl_send_seaice_fields->module~mod_grid_phy_lmdz module~carbon_cycle_mod carbon_cycle_mod proc~cpl_send_seaice_fields->module~carbon_cycle_mod

Reset fields to zero in the beginning of a new coupling period

Cumulate at each time-step

If the time-step corresponds to the end of coupling period the fields are transformed to the 2D grid and all fields are sent to coupler.

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: itime
real, intent(in) :: dtime
integer, intent(in) :: knon
integer, intent(in), DIMENSION(klon) :: knindex
real, intent(in), DIMENSION(klon,nbsrf) :: pctsrf
logical, intent(in) :: lafin
real, intent(in), DIMENSION(klon) :: rlon
real, intent(in), DIMENSION(klon) :: rlat
real, intent(in), DIMENSION(klon) :: swdown
real, intent(in), DIMENSION(klon) :: lwdown
real, intent(in), DIMENSION(klon) :: fluxlat
real, intent(in), DIMENSION(klon) :: fluxsens
real, intent(in), DIMENSION(klon) :: precip_rain
real, intent(in), DIMENSION(klon) :: precip_snow
real, intent(in), DIMENSION(klon) :: evap
real, intent(in), DIMENSION(klon) :: tsurf
real, intent(in), DIMENSION(klon) :: fder
real, intent(in), DIMENSION(klon) :: albsol
real, intent(in), DIMENSION(klon) :: taux
real, intent(in), DIMENSION(klon) :: tauy
real, intent(in) :: sens_prec_liq(:)
real, intent(in) :: sens_prec_sol(:)
real, intent(in), DIMENSION(klon) :: lat_prec_liq
real, intent(in), DIMENSION(klon) :: lat_prec_sol

Calls

proc~~cpl_send_seaice_fields~~CallsGraph proc~cpl_send_seaice_fields cpl_send_seaice_fields proc~abort_physic abort_physic proc~cpl_send_seaice_fields->proc~abort_physic proc~gath2cpl gath2cpl proc~cpl_send_seaice_fields->proc~gath2cpl proc~mpi_abort MPI_ABORT proc~abort_physic->proc~mpi_abort getin_dump getin_dump proc~abort_physic->getin_dump restclo restclo proc~abort_physic->restclo histclo histclo proc~abort_physic->histclo interface~gather_omp gather_omp proc~gath2cpl->interface~gather_omp interface~grid1dto2d_mpi grid1dTo2d_mpi proc~gath2cpl->interface~grid1dto2d_mpi proc~lmdz_mpi_wrapper_abort lmdz_mpi_wrapper_abort proc~mpi_abort->proc~lmdz_mpi_wrapper_abort proc~grid1dto2d_mpi_i grid1dTo2d_mpi_i interface~grid1dto2d_mpi->proc~grid1dto2d_mpi_i proc~grid1dto2d_mpi_i3 grid1dTo2d_mpi_i3 interface~grid1dto2d_mpi->proc~grid1dto2d_mpi_i3 proc~grid1dto2d_mpi_r1 grid1dTo2d_mpi_r1 interface~grid1dto2d_mpi->proc~grid1dto2d_mpi_r1 proc~grid1dto2d_mpi_i2 grid1dTo2d_mpi_i2 interface~grid1dto2d_mpi->proc~grid1dto2d_mpi_i2 proc~grid1dto2d_mpi_i1 grid1dTo2d_mpi_i1 interface~grid1dto2d_mpi->proc~grid1dto2d_mpi_i1 proc~grid1dto2d_mpi_r3 grid1dTo2d_mpi_r3 interface~grid1dto2d_mpi->proc~grid1dto2d_mpi_r3 proc~grid1dto2d_mpi_l2 grid1dTo2d_mpi_l2 interface~grid1dto2d_mpi->proc~grid1dto2d_mpi_l2 proc~grid1dto2d_mpi_l3 grid1dTo2d_mpi_l3 interface~grid1dto2d_mpi->proc~grid1dto2d_mpi_l3 proc~grid1dto2d_mpi_r grid1dTo2d_mpi_r interface~grid1dto2d_mpi->proc~grid1dto2d_mpi_r proc~grid1dto2d_mpi_l grid1dTo2d_mpi_l interface~grid1dto2d_mpi->proc~grid1dto2d_mpi_l proc~grid1dto2d_mpi_r2 grid1dTo2d_mpi_r2 interface~grid1dto2d_mpi->proc~grid1dto2d_mpi_r2 proc~grid1dto2d_mpi_l1 grid1dTo2d_mpi_l1 interface~grid1dto2d_mpi->proc~grid1dto2d_mpi_l1 proc~grid1dto2d_mpi_igen grid1dTo2d_mpi_igen proc~grid1dto2d_mpi_i->proc~grid1dto2d_mpi_igen proc~grid1dto2d_mpi_i3->proc~grid1dto2d_mpi_igen proc~grid1dto2d_mpi_rgen grid1dTo2d_mpi_rgen proc~grid1dto2d_mpi_r1->proc~grid1dto2d_mpi_rgen proc~grid1dto2d_mpi_i2->proc~grid1dto2d_mpi_igen proc~grid1dto2d_mpi_i1->proc~grid1dto2d_mpi_igen proc~grid1dto2d_mpi_r3->proc~grid1dto2d_mpi_rgen proc~grid1dto2d_mpi_lgen grid1dTo2d_mpi_lgen proc~grid1dto2d_mpi_l2->proc~grid1dto2d_mpi_lgen proc~grid1dto2d_mpi_l3->proc~grid1dto2d_mpi_lgen proc~grid1dto2d_mpi_r->proc~grid1dto2d_mpi_rgen proc~grid1dto2d_mpi_l->proc~grid1dto2d_mpi_lgen proc~grid1dto2d_mpi_r2->proc~grid1dto2d_mpi_rgen proc~grid1dto2d_mpi_l1->proc~grid1dto2d_mpi_lgen

Called by

proc~~cpl_send_seaice_fields~~CalledByGraph proc~cpl_send_seaice_fields cpl_send_seaice_fields proc~ocean_cpl_ice ocean_cpl_ice proc~ocean_cpl_ice->proc~cpl_send_seaice_fields proc~ocean_cpl_ice~2 ocean_cpl_ice proc~ocean_cpl_ice~2->proc~cpl_send_seaice_fields proc~surf_seaice surf_seaice proc~surf_seaice->proc~ocean_cpl_ice proc~surf_seaice~2 surf_seaice proc~surf_seaice~2->proc~ocean_cpl_ice proc~pbl_surface pbl_surface proc~pbl_surface->proc~surf_seaice proc~pbl_surface~2 pbl_surface proc~pbl_surface~2->proc~surf_seaice proc~physiq physiq proc~physiq->proc~pbl_surface proc~physiq~2 physiq proc~physiq~2->proc~pbl_surface proc~old_lmdz1d old_lmdz1d proc~old_lmdz1d->proc~physiq proc~call_physiq call_physiq proc~call_physiq->proc~physiq proc~call_physiq~2 call_physiq proc~call_physiq~2->proc~physiq proc~scm scm proc~scm->proc~physiq program~lmdz1d lmdz1d program~lmdz1d->proc~old_lmdz1d program~lmdz1d->proc~scm proc~calfis calfis proc~calfis->proc~call_physiq proc~leapfrog leapfrog proc~leapfrog->proc~calfis program~gcm~2 gcm program~gcm~2->proc~leapfrog

Contents