updating tests after removing _log() probability functions

stan-dev · Jan 4, 2024 · ddd12a3 · ddd12a3
1 parent c1bf4c4
commit ddd12a3
Show file tree

Hide file tree

Showing 8 changed files with 14 additions and 83 deletions.
diff --git a/stan/math/prim/prob.hpp b/stan/math/prim/prob.hpp
diff --git a/stan/math/prim/prob/lkj_corr_cholesky_lpdf.hpp b/stan/math/prim/prob/lkj_corr_cholesky_lpdf.hpp
@@ -7,7 +7,6 @@
 #include <stan/math/prim/fun/make_nu.hpp>
 #include <stan/math/prim/fun/multiply.hpp>
 #include <stan/math/prim/fun/to_ref.hpp>
-#include <stan/math/prim/prob/lkj_corr_log.hpp>
 
 namespace stan {
 namespace math {

diff --git a/stan/math/prim/prob/logistic_cdf.hpp b/stan/math/prim/prob/logistic_cdf.hpp
@@ -11,7 +11,7 @@
 #include <stan/math/prim/fun/size_zero.hpp>
 #include <stan/math/prim/fun/value_of.hpp>
 #include <stan/math/prim/fun/inv_logit.hpp>
-#include <stan/math/prim/prob/logistic_log.hpp>
+#include <stan/math/prim/prob/logistic_lpdf.hpp>
 #include <stan/math/prim/functor/partials_propagator.hpp>
 #include <cmath>
 
@@ -78,16 +78,16 @@ return_type_t<T_y, T_loc, T_scale> logistic_cdf(const T_y& y, const T_loc& mu,
 
     if (!is_constant_all<T_y>::value) {
       partials<0>(ops_partials)[n]
-          += exp(logistic_log(y_dbl, mu_dbl, sigma_dbl)) / Pn;
+          += exp(logistic_lpdf(y_dbl, mu_dbl, sigma_dbl)) / Pn;
     }
     if (!is_constant_all<T_loc>::value) {
       partials<1>(ops_partials)[n]
-          += -exp(logistic_log(y_dbl, mu_dbl, sigma_dbl)) / Pn;
+          += -exp(logistic_lpdf(y_dbl, mu_dbl, sigma_dbl)) / Pn;
     }
     if (!is_constant_all<T_scale>::value) {
       partials<2>(ops_partials)[n]
           += -(y_dbl - mu_dbl) * sigma_inv_vec
-             * exp(logistic_log(y_dbl, mu_dbl, sigma_dbl)) / Pn;
+             * exp(logistic_lpdf(y_dbl, mu_dbl, sigma_dbl)) / Pn;
     }
   }
 

diff --git a/stan/math/prim/prob/logistic_lccdf.hpp b/stan/math/prim/prob/logistic_lccdf.hpp
@@ -12,7 +12,7 @@
 #include <stan/math/prim/fun/size.hpp>
 #include <stan/math/prim/fun/size_zero.hpp>
 #include <stan/math/prim/fun/value_of.hpp>
-#include <stan/math/prim/prob/logistic_log.hpp>
+#include <stan/math/prim/prob/logistic_lpdf.hpp>
 #include <stan/math/prim/functor/partials_propagator.hpp>
 #include <cmath>
 
@@ -79,16 +79,16 @@ return_type_t<T_y, T_loc, T_scale> logistic_lccdf(const T_y& y, const T_loc& mu,
 
     if (!is_constant_all<T_y>::value) {
       partials<0>(ops_partials)[n]
-          -= exp(logistic_log(y_dbl, mu_dbl, sigma_dbl)) / Pn;
+          -= exp(logistic_lpdf(y_dbl, mu_dbl, sigma_dbl)) / Pn;
     }
     if (!is_constant_all<T_loc>::value) {
       partials<1>(ops_partials)[n]
-          -= -exp(logistic_log(y_dbl, mu_dbl, sigma_dbl)) / Pn;
+          -= -exp(logistic_lpdf(y_dbl, mu_dbl, sigma_dbl)) / Pn;
     }
     if (!is_constant_all<T_scale>::value) {
       partials<2>(ops_partials)[n]
           -= -(y_dbl - mu_dbl) * sigma_inv_vec
-             * exp(logistic_log(y_dbl, mu_dbl, sigma_dbl)) / Pn;
+             * exp(logistic_lpdf(y_dbl, mu_dbl, sigma_dbl)) / Pn;
     }
   }
   return ops_partials.build(P);

diff --git a/stan/math/prim/prob/logistic_lcdf.hpp b/stan/math/prim/prob/logistic_lcdf.hpp
@@ -12,7 +12,7 @@
 #include <stan/math/prim/fun/size.hpp>
 #include <stan/math/prim/fun/size_zero.hpp>
 #include <stan/math/prim/fun/value_of.hpp>
-#include <stan/math/prim/prob/logistic_log.hpp>
+#include <stan/math/prim/prob/logistic_lpdf.hpp>
 #include <stan/math/prim/functor/partials_propagator.hpp>
 #include <cmath>
 
@@ -78,16 +78,16 @@ return_type_t<T_y, T_loc, T_scale> logistic_lcdf(const T_y& y, const T_loc& mu,
 
     if (!is_constant_all<T_y>::value) {
       partials<0>(ops_partials)[n]
-          += exp(logistic_log(y_dbl, mu_dbl, sigma_dbl)) / Pn;
+          += exp(logistic_lpdf(y_dbl, mu_dbl, sigma_dbl)) / Pn;
     }
     if (!is_constant_all<T_loc>::value) {
       partials<1>(ops_partials)[n]
-          += -exp(logistic_log(y_dbl, mu_dbl, sigma_dbl)) / Pn;
+          += -exp(logistic_lpdf(y_dbl, mu_dbl, sigma_dbl)) / Pn;
     }
     if (!is_constant_all<T_scale>::value) {
       partials<2>(ops_partials)[n]
           += -(y_dbl - mu_dbl) * sigma_inv_vec
-             * exp(logistic_log(y_dbl, mu_dbl, sigma_dbl)) / Pn;
+             * exp(logistic_lpdf(y_dbl, mu_dbl, sigma_dbl)) / Pn;
     }
   }
   return ops_partials.build(P);

diff --git a/stan/math/prim/prob/multi_student_t_lpdf.hpp b/stan/math/prim/prob/multi_student_t_lpdf.hpp
@@ -13,7 +13,6 @@
 #include <stan/math/prim/fun/size_mvt.hpp>
 #include <stan/math/prim/fun/to_ref.hpp>
 #include <stan/math/prim/fun/vector_seq_view.hpp>
-#include <stan/math/prim/prob/multi_normal_log.hpp>
 #include <cmath>
 #include <cstdlib>
 

diff --git a/test/prob/beta/beta_test.hpp b/test/prob/beta/beta_test.hpp
@@ -1,5 +1,5 @@
 // Arguments: Doubles, Doubles, Doubles
-#include <stan/math/prim/prob/beta_log.hpp>
+#include <stan/math/prim/prob/beta_lpdf.hpp>
 #include <stan/math/prim/fun/lgamma.hpp>
 #include <stan/math/prim/fun/log1m.hpp>
 

diff --git a/test/unit/math_include_test.cpp b/test/unit/math_include_test.cpp
@@ -68,7 +68,7 @@ TEST_F(Math, paper_example_3) {
   double y = 1.3;
   stan::math::var mu = 0.5, sigma = 1.2;
 
-  stan::math::var lp = normal_log(y, mu, sigma);
+  stan::math::var lp = normal_lpdf(y, mu, sigma);
   EXPECT_FLOAT_EQ(-1.323482, lp.val());
 }