chgres_cube  1.7.0
 All Data Structures Files Functions Variables
utils.F90 File Reference

Contains utility routines. More...

Go to the source code of this file.

Functions/Subroutines

subroutine error_handler (string, rc)
 General error handler. More...
 
subroutine netcdf_err (err, string)
 Error handler for netcdf. More...
 
subroutine to_lower (strIn)
 Convert from upper to lowercase. More...
 
character(len=len(strin)) function to_upper (strIn)
 Convert string from lower to uppercase. More...
 

Detailed Description

Contains utility routines.

Definition in file utils.F90.

Function/Subroutine Documentation

subroutine error_handler ( character(len=*), intent(in)  string,
integer, intent(in)  rc 
)

General error handler.

Parameters
[in]stringerror message
[in]rcerror status code

Definition at line 9 of file utils.F90.

Referenced by surface::adjust_soil_levels(), surface::adjust_soilt_for_terrain(), atmosphere::atmosphere_driver(), surface::calc_liq_soil_moisture(), chgres(), atmosphere::compute_zh(), atmosphere::convert_winds(), input_data::convert_winds(), atmosphere::create_atm_b4adj_esmf_fields(), atmosphere::create_atm_esmf_fields(), surface::create_nst_esmf_fields(), static_data::create_static_fields(), surface::create_surface_esmf_fields(), model_grid::define_input_grid_gaussian(), model_grid::define_input_grid_grib2(), model_grid::define_input_grid_mosaic(), model_grid::define_target_grid(), model_grid::gdt_to_gds(), model_grid::get_model_latlons(), model_grid::get_model_mask_terrain(), static_data::get_static_fields(), input_data::handle_grib_error(), atmosphere::horiz_interp_thomp_mp_climo(), input_data::init_atm_esmf_fields(), input_data::init_sfc_esmf_fields(), surface::interp(), atmosphere::newpr1(), atmosphere::newps(), surface::nst_land_fill(), surface::qc_check(), input_data::read_grib_soil(), input_data::read_input_atm_gaussian_nemsio_file(), input_data::read_input_atm_gaussian_netcdf_file(), input_data::read_input_atm_gfs_gaussian_nemsio_file(), input_data::read_input_atm_gfs_sigio_file(), input_data::read_input_atm_grib2_file(), input_data::read_input_atm_restart_file(), input_data::read_input_atm_tiled_history_file(), input_data::read_input_nst_data(), input_data::read_input_nst_nemsio_file(), input_data::read_input_nst_netcdf_file(), input_data::read_input_sfc_gaussian_nemsio_file(), input_data::read_input_sfc_gfs_gaussian_nemsio_file(), input_data::read_input_sfc_gfs_sfcio_file(), input_data::read_input_sfc_grib2_file(), input_data::read_input_sfc_netcdf_file(), input_data::read_input_sfc_restart_file(), program_setup::read_setup_namelist(), thompson_mp_climo_data::read_thomp_mp_climo_data(), program_setup::read_varmap(), atmosphere::read_vcoord_info(), input_data::read_winds(), surface::regrid_many(), surface::rescale_soil_moisture(), surface::roughness(), surface::search_many(), atmosphere::vintg(), atmosphere::vintg_thomp_mp_climo(), atmosphere::vintg_wam(), write_data::write_fv3_atm_bndy_data_netcdf(), write_data::write_fv3_atm_data_netcdf(), and write_data::write_fv3_sfc_data_netcdf().

subroutine to_lower ( character(len=*), intent(inout)  strIn)

Convert from upper to lowercase.

Author
Clive Page

Adapted from http://www.star.le.ac.uk/~cgp/fortran.html (25 May 2012)

Parameters
[in,out]strInstring to convert

Definition at line 84 of file utils.F90.

Referenced by program_setup::read_setup_namelist().

character(len=len(strin)) function to_upper ( character(len=*), intent(in)  strIn)

Convert string from lower to uppercase.

Author
Clive Page

Adapted from http://www.star.le.ac.uk/~cgp/fortran.html (25 May 2012)

Parameters
[in]strInstring to convert
Returns
strOut string in uppercase

Definition at line 59 of file utils.F90.

Referenced by input_data::read_input_sfc_grib2_file().