f_sts_mean_core Function

public pure function f_sts_mean_core(x) result(mean)

Computes arithmetic mean.

Arguments

Type IntentOptional Attributes Name
real(kind=wp), intent(in) :: x(:)

x vector (assumed size array)

Return Value real(kind=wp)

arithmetic mean


Called by

proc~~f_sts_mean_core~~CalledByGraph proc~f_sts_mean_core f_sts_mean_core proc~f_sts_cov_core f_sts_cov_core proc~f_sts_cov_core->proc~f_sts_mean_core proc~f_sts_mean f_sts_mean proc~f_sts_mean->proc~f_sts_mean_core proc~f_sts_var_core f_sts_var_core proc~f_sts_var_core->proc~f_sts_mean_core proc~s_lin_pca s_lin_pca proc~s_lin_pca->proc~f_sts_mean_core proc~f_sts_std_core f_sts_std_core proc~s_lin_pca->proc~f_sts_std_core proc~s_tst_anova_1w_core s_tst_anova_1w_core proc~s_tst_anova_1w_core->proc~f_sts_mean_core proc~s_tst_ttest_1s_core s_tst_ttest_1s_core proc~s_tst_ttest_1s_core->proc~f_sts_mean_core proc~s_tst_ttest_2s_core s_tst_ttest_2s_core proc~s_tst_ttest_2s_core->proc~f_sts_mean_core interface~fsml_mean fsml_mean interface~fsml_mean->proc~f_sts_mean interface~fsml_pca fsml_pca interface~fsml_pca->proc~s_lin_pca proc~f_sts_cov f_sts_cov proc~f_sts_cov->proc~f_sts_cov_core proc~f_sts_pcc_core f_sts_pcc_core proc~f_sts_pcc_core->proc~f_sts_cov_core proc~f_sts_pcc_core->proc~f_sts_var_core proc~f_sts_std f_sts_std proc~f_sts_std->proc~f_sts_var_core proc~f_sts_std_core->proc~f_sts_var_core proc~f_sts_trend_core f_sts_trend_core proc~f_sts_trend_core->proc~f_sts_cov_core proc~f_sts_trend_core->proc~f_sts_var_core proc~f_sts_var f_sts_var proc~f_sts_var->proc~f_sts_var_core proc~s_tst_anova_1w s_tst_anova_1w proc~s_tst_anova_1w->proc~s_tst_anova_1w_core proc~s_tst_ttest_1s s_tst_ttest_1s proc~s_tst_ttest_1s->proc~s_tst_ttest_1s_core proc~s_tst_ttest_2s s_tst_ttest_2s proc~s_tst_ttest_2s->proc~s_tst_ttest_2s_core proc~s_tst_ttest_paired_core s_tst_ttest_paired_core proc~s_tst_ttest_paired_core->proc~s_tst_ttest_1s_core interface~fsml_anova_1way fsml_anova_1way interface~fsml_anova_1way->proc~s_tst_anova_1w interface~fsml_cov fsml_cov interface~fsml_cov->proc~f_sts_cov interface~fsml_std fsml_std interface~fsml_std->proc~f_sts_std interface~fsml_ttest_1sample fsml_ttest_1sample interface~fsml_ttest_1sample->proc~s_tst_ttest_1s interface~fsml_ttest_2sample fsml_ttest_2sample interface~fsml_ttest_2sample->proc~s_tst_ttest_2s interface~fsml_var fsml_var interface~fsml_var->proc~f_sts_var proc~f_sts_pcc f_sts_pcc proc~f_sts_pcc->proc~f_sts_pcc_core proc~f_sts_trend f_sts_trend proc~f_sts_trend->proc~f_sts_trend_core proc~s_tst_ttest_paired s_tst_ttest_paired proc~s_tst_ttest_paired->proc~s_tst_ttest_paired_core interface~fsml_pcc fsml_pcc interface~fsml_pcc->proc~f_sts_pcc interface~fsml_trend fsml_trend interface~fsml_trend->proc~f_sts_trend interface~fsml_ttest_paired fsml_ttest_paired interface~fsml_ttest_paired->proc~s_tst_ttest_paired

Source Code

pure function f_sts_mean_core(x) result(mean)

! ==== Description
!! Computes arithmetic mean.

! ==== Declarations
  real(wp), intent(in) :: x(:)   !! x vector (assumed size array)
  real(wp)             :: mean   !! arithmetic mean

! ==== Instructions
  mean = sum(x) / real(size(x), kind=wp)

end function f_sts_mean_core