 |
libSUFR
a LIBrary of Some Useful Fortran Routines
|
|
libSUFR
a LIBrary of Some Useful Fortran Routines
|
Provides kinds and related constants/routines. More...
Functions/Subroutines | |
| subroutine | max_accuracy_kinds (ikindmax, rkindmax, warn) |
| Get the kinds of the most accurate integer and real for the current compiler/system. | |
Variables | |
| integer, parameter | long = selected_int_kind(18) |
| Long integer. | |
| integer, parameter | lng = selected_int_kind(18) |
| Long integer. | |
| integer, parameter | double = selected_real_kind(15, 307) |
| Double-precision float. Precision = 15, range = 307. | |
| integer, parameter | dbl = selected_real_kind(15, 307) |
| Double-precision float. Precision = 15, range = 307. | |
| integer, parameter | intkindmax = max(selected_int_kind(9), selected_int_kind(18), selected_int_kind(38), selected_int_kind(99)) |
| Maximum integer kind: | |
| integer, parameter | realkindmax = max(selected_real_kind(6), selected_real_kind(15), selected_real_kind(18), selected_real_kind(31), selected_real_kind(33), selected_real_kind(99)) |
| Maximum real kind: | |
Provides kinds and related constants/routines.
Contains the integers double and dbl, which can be used to provide the kind of a (often double-precision) variable type. Variables can be declared using e.g. "real(double) :: x"; constants can be defined as e.g. "x = 3.0_dbl".
| subroutine sufr_kinds::max_accuracy_kinds | ( | integer, intent(out) | ikindmax, |
| integer, intent(out) | rkindmax, | ||
| logical, intent(in), optional | warn ) |
Get the kinds of the most accurate integer and real for the current compiler/system.
| ikindmax | Maximum integer kind (output) |
| rkindmax | Maximum real kind (output) |
| warn | Warn if something funny happens (output, optional) |
| integer, parameter sufr_kinds::dbl = selected_real_kind(15, 307) |
Double-precision float. Precision = 15, range = 307.
Definition at line 36 of file kinds.f90.
Referenced by golden_section(), sufr_date_and_time::jd2cal(), sufr_date_and_time::jd2ymdhms(), sufr_solvers::minimum_solver(), sufr_random_numbers::ran_unif(), sufr_numerics::reldiff(), and sufr_solvers::root_solver().
| integer, parameter sufr_kinds::double = selected_real_kind(15, 307) |
Double-precision float. Precision = 15, range = 307.
Definition at line 35 of file kinds.f90.
Referenced by sufr_weather::air_density(), sufr_weather::air_pressure(), sufr_angle2string::ams(), sufr_angle2string::ams2(), sufr_angle2string::amss(), sufr_angles::asep(), sufr_angle2string::ass(), sufr_fitting::basefunc_polynomial(), sufr_weather::beaufort(), sufr_statistics::bin_data_1d(), sufr_statistics::bin_data_1d_sp(), sufr_statistics::bin_data_2d(), sufr_statistics::bin_data_2d_sp(), sufr_statistics::binom_coeff(), sufr_statistics::binom_cumul_prob(), sufr_statistics::binom_prob(), sufr_date_and_time::cal2jd(), sufr_command_line::cl_option_var_dbl(), sufr_date_and_time::consistent_date_time(), sufr_statistics::correlation(), sufr_sports::cycling_power(), sufr_sports::cycling_power_sp(), sufr_angle2string::d1ms2(), sufr_text::d2s(), sufr_text::d2sc(), sufr_text::dbl2str(), sufr_angle2string::ddd2(), sufr_angle2string::ddms2(), sufr_numerics::deq(), sufr_numerics::deq0(), sufr_weather::dew_point(), sufr_earth::distance(), sufr_angle2string::dm(), sufr_angle2string::dm2(), sufr_angle2string::dmm2(), sufr_angle2string::dmmm2(), sufr_angle2string::dmmmmm2(), sufr_angle2string::dms(), sufr_angle2string::dms2(), sufr_angle2string::dmss(), sufr_angle2string::dmss2(), sufr_numerics::dne(), sufr_numerics::dne0(), sufr_date_and_time::dow_iso(), sufr_date_and_time::dow_ut(), sufr_date_and_time::doy(), sufr_date_and_time::doy2md(), sufr_date_and_time::dtm2jd(), sufr_system::execute_command_line_and_return_str(), sufr_statistics::faculty(), sufr_command_line::get_command_argument_d(), sufr_getopt::getopt_optarg_to_dbl(), golden_section(), sufr_date_and_time::gps2jd(), sufr_time2string::hdm(), sufr_sports::heartrate2power(), sufr_time2string::hhm(), sufr_time2string::hhms(), sufr_statistics::histogram_1d_onthefly(), sufr_statistics::histogram_2d_onthefly(), sufr_time2string::hm(), sufr_time2string::hm2(), sufr_time2string::hm_mmm(), sufr_time2string::hmm(), sufr_time2string::hms(), sufr_time2string::hms2(), sufr_time2string::hms_s(), sufr_time2string::hms_sss(), sufr_numerics::isanan(), sufr_numerics::isinf(), sufr_numerics::isnormal(), sufr_date_and_time::jd2cal(), sufr_date_and_time::jd2datestr(), sufr_date_and_time::jd2datetime(), sufr_date_and_time::jd2gps(), sufr_date_and_time::jd2iso8601(), sufr_date_and_time::jd2rfc822(), sufr_date_and_time::jd2time(), sufr_date_and_time::jd2unix(), sufr_date_and_time::jd2year(), sufr_date_and_time::jd2ymdhms(), sufr_fitting::linear_fit_yerr(), sufr_interpolate::linear_interpolate_array(), sufr_interpolate::linear_interpolation(), sufr_interpolate::locate_value_in_array(), sufr_statistics::mean(), sufr_statistics::mean_sp(), sufr_statistics::mean_var_running(), sufr_statistics::mean_weight(), sufr_statistics::median(), sufr_statistics::median_sp(), sufr_solvers::minimum_solver(), sufr_fitting::nonlin_fit_example_myfunc(), sufr_fitting::nonlin_fit_yerr(), sufr_interpolate::parabola(), sufr_angles::pastr_en(), sufr_angles::pastr_nl(), sufr_angles::pastr_nls(), sufr_interpolate::perfect_parabolic_fit(), sufr_numerics::plot_ranges(), sufr_statistics::poisson_prob(), sufr_statistics::poisson_prob_cumul(), sufr_system::print_cputime(), sufr_system::print_runtimes(), sufr_system::printprogressbar(), sufr_statistics::prob_range(), sufr_statistics::prob_range_sp(), sufr_angle2string::prs(), sufr_random_numbers::ran_gauss(), sufr_random_numbers::ran_unif(), sufr_optics::reflectance_transmittance(), sufr_optics::refractive_index_air(), sufr_optics::refractive_index_pmma(), sufr_numerics::reldiff(), sufr_angles::rev(), sufr_angles::rev2(), sufr_angles::rev360(), sufr_angles::revc(), sufr_solvers::root_solver(), sufr_angles::rv(), sufr_angles::rv12(), sufr_angles::rv180(), sufr_sorting::sort_array(), sufr_sorting::sorted_index_list(), sufr_statistics::stdev(), sufr_statistics::stdev_sp(), sufr_statistics::stdev_weight(), sufr_system::swapdbl(), sufr_date_and_time::system_clock_2_ymdhms(), sufr_system::system_time(), sufr_system::timestamp(), sufr_date_and_time::tm2hm(), sufr_date_and_time::tm2hmm(), sufr_date_and_time::tm2hms(), sufr_date_and_time::tm2hmss(), sufr_system::tms(), sufr_time2string::tms(), sufr_time2string::tms2(), sufr_time2string::tmsss2(), sufr_time2string::um(), sufr_time2string::umm(), sufr_time2string::ums(), sufr_date_and_time::unix2jd(), sufr_angle2string::wams(), sufr_angle2string::wams2(), sufr_angle2string::wamss(), sufr_angle2string::wass(), sufr_weather::water_vapor_saturated_density(), sufr_optics::wavelength2rgb(), sufr_angle2string::wd1ms2(), sufr_angle2string::wddd2(), sufr_angle2string::wddms2(), sufr_angle2string::wdm(), sufr_angle2string::wdm2(), sufr_angle2string::wdmm2(), sufr_angle2string::wdmmm2(), sufr_angle2string::wdms(), sufr_angle2string::wdms2(), sufr_angle2string::wdmss(), sufr_angle2string::wdmss2(), sufr_angles::wdstr_en(), sufr_angles::wdstr_ens(), sufr_angles::wdstr_nl(), sufr_angles::wdstr_nl8(), sufr_angles::wdstr_nls(), sufr_angles::wdstr_nls2(), sufr_time2string::wum(), sufr_time2string::wumm(), sufr_time2string::wums(), sufr_time2string::wums_s(), sufr_date_and_time::year2jd(), sufr_date_and_time::ymd2doy(), and sufr_date_and_time::ymdhms2jd().
| integer, parameter sufr_kinds::intkindmax = max(selected_int_kind(9), selected_int_kind(18), selected_int_kind(38), selected_int_kind(99)) |
| integer, parameter sufr_kinds::lng = selected_int_kind(18) |
| integer, parameter sufr_kinds::long = selected_int_kind(18) |
Long integer.
Definition at line 31 of file kinds.f90.
Referenced by sufr_text::d2s(), sufr_text::d2sc(), sufr_text::dbl2str(), sufr_statistics::faculty_i(), sufr_command_line::get_command_argument_l(), sufr_date_and_time::jd2cal(), and sufr_system::print_runtimes().
1.12.0
