1data { 2 int d_int; 3 matrix[d_int, d_int] d_matrix; 4 row_vector[d_int] d_row_vector; 5} 6transformed data { 7 row_vector[d_int] transformed_data_row_vector; 8 matrix[d_int, d_int] transformed_data_matrix; 9 transformed_data_matrix = mdivide_right(d_matrix, d_matrix); 10 transformed_data_row_vector = mdivide_right(d_row_vector, d_matrix); 11} 12parameters { 13 real y_p; 14 matrix[d_int, d_int] p_matrix; 15 row_vector[d_int] p_row_vector; 16} 17transformed parameters { 18 row_vector[d_int] transformed_param_row_vector; 19 matrix[d_int, d_int] transformed_param_matrix; 20 transformed_param_matrix = mdivide_right(d_matrix, d_matrix); 21 transformed_param_row_vector = mdivide_right(d_row_vector, d_matrix); 22 transformed_param_matrix = mdivide_right(p_matrix, d_matrix); 23 transformed_param_row_vector = mdivide_right(p_row_vector, d_matrix); 24 transformed_param_matrix = mdivide_right(d_matrix, p_matrix); 25 transformed_param_row_vector = mdivide_right(d_row_vector, p_matrix); 26 transformed_param_matrix = mdivide_right(p_matrix, p_matrix); 27 transformed_param_row_vector = mdivide_right(p_row_vector, p_matrix); 28} 29model { 30 y_p ~ normal(0, 1); 31} 32 33