create_limit_unstruct Subroutine

public subroutine create_limit_unstruct()

Uses

  • proc~~create_limit_unstruct~~UsesGraph proc~create_limit_unstruct create_limit_unstruct module~time_phylmdz_mod time_phylmdz_mod proc~create_limit_unstruct->module~time_phylmdz_mod module~indice_sol_mod indice_sol_mod proc~create_limit_unstruct->module~indice_sol_mod module~dimphy~3 dimphy proc~create_limit_unstruct->module~dimphy~3 module~mod_phys_lmdz_para mod_phys_lmdz_para proc~create_limit_unstruct->module~mod_phys_lmdz_para ioipsl ioipsl proc~create_limit_unstruct->ioipsl module~lmdz_xios lmdz_xios proc~create_limit_unstruct->module~lmdz_xios module~iniprint_mod_h iniprint_mod_h proc~create_limit_unstruct->module~iniprint_mod_h module~phys_state_var_mod phys_state_var_mod proc~create_limit_unstruct->module~phys_state_var_mod module~mod_phys_lmdz_transfert_para mod_phys_lmdz_transfert_para module~mod_phys_lmdz_para->module~mod_phys_lmdz_transfert_para module~mod_phys_lmdz_mpi_data mod_phys_lmdz_mpi_data module~mod_phys_lmdz_para->module~mod_phys_lmdz_mpi_data module~mod_phys_lmdz_omp_data mod_phys_lmdz_omp_data module~mod_phys_lmdz_para->module~mod_phys_lmdz_omp_data module~phys_state_var_mod->module~dimphy~3 netcdf netcdf module~phys_state_var_mod->netcdf module~dimsoil_mod_h dimsoil_mod_h module~phys_state_var_mod->module~dimsoil_mod_h module~mod_phys_lmdz_omp_transfert mod_phys_lmdz_omp_transfert module~mod_phys_lmdz_transfert_para->module~mod_phys_lmdz_omp_transfert module~mod_phys_lmdz_mpi_transfert mod_phys_lmdz_mpi_transfert module~mod_phys_lmdz_transfert_para->module~mod_phys_lmdz_mpi_transfert module~lmdz_cppkeys_wrapper lmdz_cppkeys_wrapper module~mod_phys_lmdz_mpi_data->module~lmdz_cppkeys_wrapper module~lmdz_mpi lmdz_mpi module~mod_phys_lmdz_mpi_data->module~lmdz_mpi module~lmdz_cppkeys_wrapper->netcdf iso_fortran_env iso_fortran_env module~lmdz_cppkeys_wrapper->iso_fortran_env

IF (icefile==trim(fcpldsic)) THEN ! SIC=pICE(1-LIC-TER) pctsrf_t(:,is_sic,k)=fi_ice(:)(1.-pctsrf(:,is_lic)-pctsrf(:,is_ter)) ELSE IF (icefile==trim(fhistsic)) THEN ! SIC=pICE pctsrf_t(:,is_sic,k)=fi_ice(:) ELSE ! icefile==famipsic ! SIC=pICE-LIC

Arguments

None

Calls

proc~~create_limit_unstruct~~CallsGraph proc~create_limit_unstruct create_limit_unstruct proc~xios_get_axis_attr xios_get_axis_attr proc~create_limit_unstruct->proc~xios_get_axis_attr proc~abort_physic abort_physic proc~create_limit_unstruct->proc~abort_physic interface~gather_omp gather_omp proc~create_limit_unstruct->interface~gather_omp ioget_year_len ioget_year_len proc~create_limit_unstruct->ioget_year_len interface~bcast_omp bcast_omp proc~create_limit_unstruct->interface~bcast_omp interface~xios_recv_field xios_recv_field proc~create_limit_unstruct->interface~xios_recv_field interface~scatter_omp scatter_omp proc~create_limit_unstruct->interface~scatter_omp interface~xios_send_field xios_send_field proc~create_limit_unstruct->interface~xios_send_field 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 proc~xios_recv_field_scalar xios_recv_field_scalar interface~xios_recv_field->proc~xios_recv_field_scalar proc~xios_recv_field_4d xios_recv_field_4d interface~xios_recv_field->proc~xios_recv_field_4d proc~xios_recv_field_2d xios_recv_field_2d interface~xios_recv_field->proc~xios_recv_field_2d proc~xios_recv_field_3d xios_recv_field_3d interface~xios_recv_field->proc~xios_recv_field_3d proc~xios_recv_field_1d xios_recv_field_1d interface~xios_recv_field->proc~xios_recv_field_1d proc~xios_send_field_1d xios_send_field_1d interface~xios_send_field->proc~xios_send_field_1d proc~xios_send_field_scalar xios_send_field_scalar interface~xios_send_field->proc~xios_send_field_scalar proc~xios_send_field_3d xios_send_field_3d interface~xios_send_field->proc~xios_send_field_3d proc~xios_send_field_2d xios_send_field_2d interface~xios_send_field->proc~xios_send_field_2d proc~xios_send_field_4d xios_send_field_4d interface~xios_send_field->proc~xios_send_field_4d proc~xios_send_field_5d xios_send_field_5d interface~xios_send_field->proc~xios_send_field_5d proc~lmdz_mpi_wrapper_abort lmdz_mpi_wrapper_abort proc~mpi_abort->proc~lmdz_mpi_wrapper_abort

Called by

proc~~create_limit_unstruct~~CalledByGraph proc~create_limit_unstruct create_limit_unstruct proc~create_etat0_limit_unstruct create_etat0_limit_unstruct proc~create_etat0_limit_unstruct->proc~create_limit_unstruct proc~create_etat0_limit_unstruct~2 create_etat0_limit_unstruct proc~create_etat0_limit_unstruct~2->proc~create_limit_unstruct proc~physiq physiq proc~physiq->proc~create_etat0_limit_unstruct proc~physiq~2 physiq proc~physiq~2->proc~create_etat0_limit_unstruct 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

None