speedy Program

Uses

  • program~~speedy~~UsesGraph program~speedy speedy module~diagnostics diagnostics program~speedy->module~diagnostics module~prognostics prognostics program~speedy->module~prognostics module~time_stepping time_stepping program~speedy->module~time_stepping module~shortwave_radiation shortwave_radiation program~speedy->module~shortwave_radiation module~input_output input_output program~speedy->module~input_output module~coupler coupler program~speedy->module~coupler module~date date program~speedy->module~date module~forcing forcing program~speedy->module~forcing module~initialization initialization program~speedy->module~initialization module~params params program~speedy->module~params module~prognostics->module~params module~time_stepping->module~params module~shortwave_radiation->module~params module~input_output->module~params netcdf netcdf module~input_output->netcdf

The top-level program. Here we initialize the model and run the main loop until the (continually updated) model datetime (model_datetime) equals the final datetime (end_datetime).


Calls

program~~speedy~~CallsGraph program~speedy speedy proc~datetime_equal datetime_equal program~speedy->proc~datetime_equal proc~set_forcing set_forcing program~speedy->proc~set_forcing proc~initialize initialize program~speedy->proc~initialize proc~step step program~speedy->proc~step proc~couple_sea_land couple_sea_land program~speedy->proc~couple_sea_land proc~newdate newdate program~speedy->proc~newdate proc~get_qsat get_qsat proc~set_forcing->proc~get_qsat proc~radset radset proc~set_forcing->proc~radset proc~set_orog_land_sfc_drag set_orog_land_sfc_drag proc~set_forcing->proc~set_orog_land_sfc_drag proc~grid_to_spec grid_to_spec proc~set_forcing->proc~grid_to_spec proc~setgam setgam proc~set_forcing->proc~setgam proc~get_zonal_average_fields get_zonal_average_fields proc~set_forcing->proc~get_zonal_average_fields proc~initialize->proc~set_forcing proc~initialize_params initialize_params proc~initialize->proc~initialize_params proc~initialize_geopotential initialize_geopotential proc~initialize->proc~initialize_geopotential proc~initialize_horizontal_diffusion initialize_horizontal_diffusion proc~initialize->proc~initialize_horizontal_diffusion proc~first_step first_step proc~initialize->proc~first_step proc~initialize_prognostics initialize_prognostics proc~initialize->proc~initialize_prognostics proc~initialize_physics initialize_physics proc~initialize->proc~initialize_physics proc~initialize_date initialize_date proc~initialize->proc~initialize_date proc~initialize_geometry initialize_geometry proc~initialize->proc~initialize_geometry proc~initialize_spectral initialize_spectral proc~initialize->proc~initialize_spectral proc~print_speedy_title print_speedy_title proc~initialize->proc~print_speedy_title proc~initialize_coupler initialize_coupler proc~initialize->proc~initialize_coupler proc~initialize_boundaries initialize_boundaries proc~initialize->proc~initialize_boundaries interface~do_horizontal_diffusion do_horizontal_diffusion proc~step->interface~do_horizontal_diffusion proc~step_field_3d step_field_3d proc~step->proc~step_field_3d proc~step_field_2d step_field_2d proc~step->proc~step_field_2d proc~get_tendencies get_tendencies proc~step->proc~get_tendencies proc~couple_land_atm couple_land_atm proc~couple_sea_land->proc~couple_land_atm proc~couple_sea_atm couple_sea_atm proc~couple_sea_land->proc~couple_sea_atm float float proc~newdate->float proc~do_horizontal_diffusion_3d do_horizontal_diffusion_3d interface~do_horizontal_diffusion->proc~do_horizontal_diffusion_3d proc~do_horizontal_diffusion_2d do_horizontal_diffusion_2d interface~do_horizontal_diffusion->proc~do_horizontal_diffusion_2d proc~initialize_horizontal_diffusion->float proc~first_step->proc~step proc~initialize_implicit initialize_implicit proc~first_step->proc~initialize_implicit proc~forin5 forin5 proc~couple_land_atm->proc~forin5 proc~run_land_model run_land_model proc~couple_land_atm->proc~run_land_model proc~forint forint proc~couple_land_atm->proc~forint proc~legendre_dir legendre_dir proc~grid_to_spec->proc~legendre_dir proc~fourier_dir fourier_dir proc~grid_to_spec->proc~fourier_dir proc~step_field_3d->proc~step_field_2d proc~initialize_from_rest_state initialize_from_rest_state proc~initialize_prognostics->proc~initialize_from_rest_state proc~couple_sea_atm->proc~forin5 proc~couple_sea_atm->proc~forint proc~run_sea_model run_sea_model proc~couple_sea_atm->proc~run_sea_model proc~initialize_date->float proc~initialize_spectral->float proc~initialize_fourier initialize_fourier proc~initialize_spectral->proc~initialize_fourier proc~initialize_legendre initialize_legendre proc~initialize_spectral->proc~initialize_legendre proc~initialize_coupler->proc~couple_land_atm proc~initialize_coupler->proc~couple_sea_atm proc~sea_model_init sea_model_init proc~initialize_coupler->proc~sea_model_init proc~land_model_init land_model_init proc~initialize_coupler->proc~land_model_init proc~trunct trunct proc~step_field_2d->proc~trunct proc~spectral_truncation spectral_truncation proc~initialize_boundaries->proc~spectral_truncation interface~load_boundary_file load_boundary_file proc~initialize_boundaries->interface~load_boundary_file proc~implicit_terms implicit_terms proc~get_tendencies->proc~implicit_terms proc~get_spectral_tendencies get_spectral_tendencies proc~get_tendencies->proc~get_spectral_tendencies proc~get_grid_point_tendencies get_grid_point_tendencies proc~get_tendencies->proc~get_grid_point_tendencies proc~solar solar proc~get_zonal_average_fields->proc~solar proc~sea_model_init->interface~load_boundary_file proc~forchk forchk proc~sea_model_init->proc~forchk proc~rffti1 rffti1 proc~initialize_fourier->proc~rffti1 proc~land_model_init->interface~load_boundary_file proc~land_model_init->proc~forchk proc~spectral_truncation->proc~grid_to_spec proc~spec_to_grid spec_to_grid proc~spectral_truncation->proc~spec_to_grid proc~initialize_legendre->float proc~get_legendre_poly get_legendre_poly proc~initialize_legendre->proc~get_legendre_poly proc~get_weights get_weights proc~initialize_legendre->proc~get_weights proc~laplacian laplacian proc~get_spectral_tendencies->proc~laplacian proc~get_geopotential get_geopotential proc~get_spectral_tendencies->proc~get_geopotential proc~load_boundary_file_one_month_from_long load_boundary_file_one_month_from_long interface~load_boundary_file->proc~load_boundary_file_one_month_from_long proc~load_boundary_file_one_month_from_year load_boundary_file_one_month_from_year interface~load_boundary_file->proc~load_boundary_file_one_month_from_year proc~load_boundary_file_2d load_boundary_file_2d interface~load_boundary_file->proc~load_boundary_file_2d proc~initialize_from_rest_state->proc~grid_to_spec proc~output output proc~initialize_from_rest_state->proc~output proc~initialize_implicit->float proc~do_horizontal_diffusion_3d->proc~do_horizontal_diffusion_2d proc~fourier_dir->float proc~rfftf1 rfftf1 proc~fourier_dir->proc~rfftf1 proc~get_grid_point_tendencies->proc~grid_to_spec proc~get_grid_point_tendencies->proc~laplacian proc~get_grid_point_tendencies->proc~get_geopotential proc~get_grid_point_tendencies->proc~spec_to_grid proc~get_legendre_poly->float nf90_inq_varid nf90_inq_varid proc~load_boundary_file_one_month_from_long->nf90_inq_varid nf90_get_var nf90_get_var proc~load_boundary_file_one_month_from_long->nf90_get_var nf90_open nf90_open proc~load_boundary_file_one_month_from_long->nf90_open nf90_close nf90_close proc~load_boundary_file_one_month_from_long->nf90_close proc~fourier_inv fourier_inv proc~spec_to_grid->proc~fourier_inv proc~legendre_inv legendre_inv proc~spec_to_grid->proc~legendre_inv proc~load_boundary_file_one_month_from_year->nf90_inq_varid proc~load_boundary_file_one_month_from_year->nf90_get_var proc~load_boundary_file_one_month_from_year->nf90_open proc~load_boundary_file_one_month_from_year->nf90_close proc~output->proc~spec_to_grid nf90_put_att nf90_put_att proc~output->nf90_put_att nf90_enddef nf90_enddef proc~output->nf90_enddef nf90_put_var nf90_put_var proc~output->nf90_put_var nf90_create nf90_create proc~output->nf90_create nf90_def_dim nf90_def_dim proc~output->nf90_def_dim proc~output->nf90_close nf90_def_var nf90_def_var proc~output->nf90_def_var proc~load_boundary_file_2d->nf90_inq_varid proc~load_boundary_file_2d->nf90_get_var proc~load_boundary_file_2d->nf90_open proc~load_boundary_file_2d->nf90_close proc~rfftb1 rfftb1 proc~fourier_inv->proc~rfftb1

Contents


Variables

Type AttributesNameInitial
integer :: model_step =1