SICOPOLIS V5-dev  Revision 1368
Functions/Subroutines
sico_main_loop_wrapper_m Module Reference

Functions/Subroutines

subroutine sico_main_loop_wrapper (delta_ts, glac_index, mean_accum, dtime, dtime_temp, dtime_wss, dtime_out, dtime_ser, time, time_init, time_end, time_output, dxi, deta, dzeta_c, dzeta_t, dzeta_r, z_sl, dzsl_dtau, z_mar, ii, jj, nn, ndat2d, ndat3d, n_output, runname, itercount_max, iter_temp, iter_wss, iter_ser, iter_out, iter_output)
 

Function/Subroutine Documentation

subroutine sico_main_loop_wrapper_m::sico_main_loop_wrapper ( real(dp), intent(inout)  delta_ts,
real(dp), intent(inout)  glac_index,
real(dp), intent(inout)  mean_accum,
real(dp), intent(inout)  dtime,
real(dp), intent(inout)  dtime_temp,
real(dp), intent(inout)  dtime_wss,
real(dp), intent(inout)  dtime_out,
real(dp), intent(inout)  dtime_ser,
real(dp), intent(inout)  time,
real(dp), intent(inout)  time_init,
real(dp), intent(inout)  time_end,
real(dp), dimension(100), intent(inout)  time_output,
real(dp), intent(inout)  dxi,
real(dp), intent(inout)  deta,
real(dp), intent(inout)  dzeta_c,
real(dp), intent(inout)  dzeta_t,
real(dp), intent(inout)  dzeta_r,
real(dp), intent(inout)  z_sl,
real(dp), intent(inout)  dzsl_dtau,
real(dp), intent(inout)  z_mar,
integer(i4b), dimension((imax+1)*(jmax+1)), intent(inout)  ii,
integer(i4b), dimension((imax+1)*(jmax+1)), intent(inout)  jj,
integer(i4b), dimension(0:jmax,0:imax), intent(inout)  nn,
integer(i4b), intent(inout)  ndat2d,
integer(i4b), intent(inout)  ndat3d,
integer(i4b), intent(inout)  n_output,
character(len=100), intent(inout)  runname,
integer(i4b), intent(inout)  itercount_max,
integer(i4b), intent(inout)  iter_temp,
integer(i4b), intent(inout)  iter_wss,
integer(i4b), intent(inout)  iter_ser,
integer(i4b), intent(inout)  iter_out,
integer(i4b), dimension(100), intent(inout)  iter_output 
)

Definition at line 19 of file sico_main_loop_wrapper_m.F90.