/dports/math/unuran/unuran-1.8.1/src/distr/ |
H A D | cont.c | 297 if (DISTR.hrtree) _unur_fstr_free(DISTR.hrtree); in _unur_distr_cont_free() 331 if (DISTR.pdf != NULL || DISTR.logpdf != NULL) { in unur_distr_cont_set_pdf() 408 if (DISTR.pdf != NULL || DISTR.logpdf != NULL) { in unur_distr_cont_set_logpdf() 538 if (DISTR.cdf != NULL || DISTR.logcdf != NULL) { in unur_distr_cont_set_cdf() 614 if (DISTR.cdf != NULL || DISTR.logcdf != NULL) { in unur_distr_cont_set_logcdf() 720 if ( DISTR.pdftree || DISTR.logpdftree ) { in unur_distr_cont_set_pdfstr() 784 if ( DISTR.pdftree || DISTR.logpdftree ) { in unur_distr_cont_set_logpdfstr() 796 if (DISTR.pdf != NULL || DISTR.logpdf != NULL) { in unur_distr_cont_set_logpdfstr() 1907 DISTR.trunc[0] = DISTR.domain[0] = left; in unur_distr_cont_set_domain() 1908 DISTR.trunc[1] = DISTR.domain[1] = right; in unur_distr_cont_set_domain() [all …]
|
H A D | discr.c | 240 if (DISTR.pv) free( DISTR.pv ); in _unur_distr_discr_free() 272 if (DISTR.pmf != NULL || DISTR.cdf != NULL) { in unur_distr_discr_set_pv() 289 DISTR.domain[1] = DISTR.domain[0] + n_pv - 1; in unur_distr_discr_set_pv() 342 free(DISTR.pv); DISTR.n_pv = 0; in unur_distr_discr_make_pv() 437 DISTR.domain[1] = DISTR.domain[0] + n_pv - 1; in unur_distr_discr_make_pv() 466 *pv = (DISTR.pv) ? DISTR.pv : NULL; in unur_distr_discr_get_pv() 496 return (DISTR.pv[k-DISTR.domain[0]]); in unur_distr_discr_eval_pv() 540 free(DISTR.pv); DISTR.n_pv = 0; in unur_distr_discr_set_pmf() 582 free(DISTR.pv); DISTR.n_pv = 0; in unur_distr_discr_set_cdf() 1090 DISTR.trunc[0] = DISTR.domain[0] = left; in unur_distr_discr_set_domain() [all …]
|
H A D | cemp.c | 156 if (DISTR.sample) { in _unur_distr_cemp_clone() 158 memcpy( CLONE.sample, DISTR.sample, DISTR.n_sample * sizeof(double) ); in _unur_distr_cemp_clone() 201 if (DISTR.sample) free( DISTR.sample ); in _unur_distr_cemp_free() 202 if (DISTR.hist_prob) free( DISTR.hist_prob ); in _unur_distr_cemp_free() 203 if (DISTR.hist_bins) free( DISTR.hist_bins ); in _unur_distr_cemp_free() 273 DISTR.n_sample = _unur_read_data( filename, 1, &(DISTR.sample) ); in unur_distr_cemp_read_data() 302 *sample = (DISTR.sample) ? DISTR.sample : NULL; in unur_distr_cemp_get_data() 417 DISTR.hmin = xmin; in unur_distr_cemp_set_hist_domain() 418 DISTR.hmax = xmax; in unur_distr_cemp_set_hist_domain() 538 fprintf(LOG,"min = %g, max = %g", DISTR.hmin, DISTR.hmax); in _unur_distr_cemp_debug() [all …]
|
H A D | cvec.c | 299 if (DISTR.domainrect) free(DISTR.domainrect); in _unur_distr_cvec_free() 300 if (DISTR.mean) free(DISTR.mean); in _unur_distr_cvec_free() 301 if (DISTR.covar) free(DISTR.covar); in _unur_distr_cvec_free() 302 if (DISTR.covar_inv) free(DISTR.covar_inv); in _unur_distr_cvec_free() 303 if (DISTR.cholesky) free(DISTR.cholesky); in _unur_distr_cvec_free() 304 if (DISTR.rankcorr) free(DISTR.rankcorr); in _unur_distr_cvec_free() 305 if (DISTR.rk_cholesky) free(DISTR.rk_cholesky); in _unur_distr_cvec_free() 307 if (DISTR.mode) free(DISTR.mode); in _unur_distr_cvec_free() 308 if (DISTR.center) free(DISTR.center); in _unur_distr_cvec_free() 348 if (DISTR.pdf != NULL || DISTR.logpdf != NULL) { in unur_distr_cvec_set_pdf() [all …]
|
/dports/math/unuran/unuran-1.8.1/src/distributions/ |
H A D | c_weibull.c | 191 …DISTR.mode = (DISTR.c<=1.) ? 0. : DISTR.alpha * pow((DISTR.c - 1.)/DISTR.c, 1./DISTR.c) + DISTR.ze… in _unur_upd_mode_weibull() 194 if (DISTR.mode < DISTR.domain[0]) in _unur_upd_mode_weibull() 195 DISTR.mode = DISTR.domain[0]; in _unur_upd_mode_weibull() 196 else if (DISTR.mode > DISTR.domain[1]) in _unur_upd_mode_weibull() 197 DISTR.mode = DISTR.domain[1]; in _unur_upd_mode_weibull() 208 NORMCONSTANT = DISTR.c / DISTR.alpha; in _unur_upd_area_weibull() 216 DISTR.area = ( _unur_cdf_weibull( DISTR.domain[1],distr) in _unur_upd_area_weibull() 248 DISTR.c = c; in _unur_set_params_weibull() 315 NORMCONSTANT = DISTR.c / DISTR.alpha; in unur_distr_weibull() 318 …DISTR.mode = (DISTR.c<=1.) ? 0. : DISTR.alpha * pow((DISTR.c - 1.)/DISTR.c, 1./DISTR.c) + DISTR.ze… in unur_distr_weibull() [all …]
|
H A D | c_extremeII.c | 187 DISTR.mode = DISTR.zeta + pow( DISTR.k/(DISTR.k+1.), 1/DISTR.k ) * DISTR.theta; in _unur_upd_mode_extremeII() 190 if (DISTR.mode < DISTR.domain[0]) in _unur_upd_mode_extremeII() 191 DISTR.mode = DISTR.domain[0]; in _unur_upd_mode_extremeII() 192 else if (DISTR.mode > DISTR.domain[1]) in _unur_upd_mode_extremeII() 193 DISTR.mode = DISTR.domain[1]; in _unur_upd_mode_extremeII() 213 DISTR.area = ( _unur_cdf_extremeII( DISTR.domain[1],distr) in _unur_upd_area_extremeII() 246 DISTR.k = k; in _unur_set_params_extremeII() 268 DISTR.domain[0] = DISTR.zeta; /* left boundary */ in _unur_set_params_extremeII() 316 DISTR.mode = DISTR.zeta + pow( DISTR.k/(DISTR.k+1.), 1/DISTR.k ) * DISTR.theta; in unur_distr_extremeII() 317 DISTR.area = 1.; in unur_distr_extremeII() [all …]
|
H A D | c_exponential.c | 193 DISTR.mode = DISTR.theta; in _unur_upd_mode_exponential() 196 if (DISTR.mode < DISTR.domain[0]) in _unur_upd_mode_exponential() 197 DISTR.mode = DISTR.domain[0]; in _unur_upd_mode_exponential() 198 else if (DISTR.mode > DISTR.domain[1]) in _unur_upd_mode_exponential() 199 DISTR.mode = DISTR.domain[1]; in _unur_upd_mode_exponential() 219 DISTR.area = ( _unur_cdf_exponential( DISTR.domain[1],distr) in _unur_upd_area_exponential() 248 DISTR.sigma = 1.; in _unur_set_params_exponential() 268 DISTR.domain[0] = DISTR.theta; /* left boundary */ in _unur_set_params_exponential() 318 DISTR.mode = DISTR.theta; /* theta */ in unur_distr_exponential() 319 DISTR.area = 1.; in unur_distr_exponential() [all …]
|
H A D | c_normal.c | 205 DISTR.mode = DISTR.mu; in _unur_upd_mode_normal() 208 if (DISTR.mode < DISTR.domain[0]) in _unur_upd_mode_normal() 209 DISTR.mode = DISTR.domain[0]; in _unur_upd_mode_normal() 210 else if (DISTR.mode > DISTR.domain[1]) in _unur_upd_mode_normal() 211 DISTR.mode = DISTR.domain[1]; in _unur_upd_mode_normal() 230 DISTR.area = ( _unur_cdf_normal( DISTR.domain[1],distr) in _unur_upd_area_normal() 257 DISTR.mu = 0.; in _unur_set_params_normal() 265 DISTR.mu = mu; in _unur_set_params_normal() 334 DISTR.mode = DISTR.mu; in unur_distr_normal() 335 DISTR.area = 1.; in unur_distr_normal() [all …]
|
H A D | c_cauchy.c | 191 DISTR.mode = DISTR.theta; in _unur_upd_mode_cauchy() 194 if (DISTR.mode < DISTR.domain[0]) in _unur_upd_mode_cauchy() 195 DISTR.mode = DISTR.domain[0]; in _unur_upd_mode_cauchy() 196 else if (DISTR.mode > DISTR.domain[1]) in _unur_upd_mode_cauchy() 197 DISTR.mode = DISTR.domain[1]; in _unur_upd_mode_cauchy() 211 DISTR.area = 1.; in _unur_upd_area_cauchy() 216 DISTR.area = ( _unur_cdf_cauchy( DISTR.domain[1],distr) in _unur_upd_area_cauchy() 245 DISTR.theta = 0.; in _unur_set_params_cauchy() 314 DISTR.mode = DISTR.theta; in unur_distr_cauchy() 315 DISTR.area = 1.; in unur_distr_cauchy() [all …]
|
H A D | c_gamma.c | 267 DISTR.mode = DISTR.mode * beta + gamma; in _unur_upd_mode_gamma() 270 if (DISTR.mode < DISTR.domain[0]) in _unur_upd_mode_gamma() 271 DISTR.mode = DISTR.domain[0]; in _unur_upd_mode_gamma() 272 else if (DISTR.mode > DISTR.domain[1]) in _unur_upd_mode_gamma() 273 DISTR.mode = DISTR.domain[1]; in _unur_upd_mode_gamma() 301 DISTR.area = ( _unur_cdf_gamma( DISTR.domain[1],distr) in _unur_upd_area_gamma() 351 DISTR.beta = 1.; in _unur_set_params_gamma() 352 DISTR.gamma = 0.; in _unur_set_params_gamma() 370 DISTR.domain[0] = DISTR.gamma; /* left boundary */ in _unur_set_params_gamma() 431 DISTR.area = 1.; in unur_distr_gamma() [all …]
|
H A D | c_extremeI.c | 173 DISTR.mode = DISTR.zeta; in _unur_upd_mode_extremeI() 176 if (DISTR.mode < DISTR.domain[0]) in _unur_upd_mode_extremeI() 177 DISTR.mode = DISTR.domain[0]; in _unur_upd_mode_extremeI() 178 else if (DISTR.mode > DISTR.domain[1]) in _unur_upd_mode_extremeI() 179 DISTR.mode = DISTR.domain[1]; in _unur_upd_mode_extremeI() 199 DISTR.area = ( _unur_cdf_extremeI( DISTR.domain[1],distr) in _unur_upd_area_extremeI() 228 DISTR.zeta = 0.; in _unur_set_params_extremeI() 229 DISTR.theta = 1.; in _unur_set_params_extremeI() 299 DISTR.mode = DISTR.zeta; in unur_distr_extremeI() 300 DISTR.area = 1.; in unur_distr_extremeI() [all …]
|
H A D | c_uniform.c | 162 DISTR.mode = (DISTR.a + DISTR.b) / 2.; in _unur_upd_mode_uniform() 165 if (DISTR.mode < DISTR.domain[0]) in _unur_upd_mode_uniform() 166 DISTR.mode = DISTR.domain[0]; in _unur_upd_mode_uniform() 167 else if (DISTR.mode > DISTR.domain[1]) in _unur_upd_mode_uniform() 168 DISTR.mode = DISTR.domain[1]; in _unur_upd_mode_uniform() 184 DISTR.area = ( _unur_cdf_uniform( DISTR.domain[1],distr) in _unur_upd_area_uniform() 214 DISTR.a = 0.; in _unur_set_params_uniform() 228 DISTR.domain[0] = DISTR.a; /* left boundary */ in _unur_set_params_uniform() 229 DISTR.domain[1] = DISTR.b; /* right boundary */ in _unur_set_params_uniform() 277 DISTR.mode = (DISTR.a + DISTR.b) / 2.; in unur_distr_uniform() [all …]
|
H A D | c_logistic.c | 174 DISTR.mode = DISTR.alpha; in _unur_upd_mode_logistic() 177 if (DISTR.mode < DISTR.domain[0]) in _unur_upd_mode_logistic() 178 DISTR.mode = DISTR.domain[0]; in _unur_upd_mode_logistic() 179 else if (DISTR.mode > DISTR.domain[1]) in _unur_upd_mode_logistic() 180 DISTR.mode = DISTR.domain[1]; in _unur_upd_mode_logistic() 199 DISTR.area = ( _unur_cdf_logistic( DISTR.domain[1],distr) in _unur_upd_area_logistic() 227 DISTR.alpha = 0.; in _unur_set_params_logistic() 228 DISTR.beta = 1.; in _unur_set_params_logistic() 298 DISTR.mode = DISTR.alpha; in unur_distr_logistic() 299 DISTR.area = 1.; in unur_distr_logistic() [all …]
|
H A D | c_chi.c | 131 DISTR.mode = (DISTR.nu >= 1.) ? sqrt(DISTR.nu - 1.) : 0.; in _unur_upd_mode_chi() 134 if (DISTR.mode < DISTR.domain[0]) in _unur_upd_mode_chi() 135 DISTR.mode = DISTR.domain[0]; in _unur_upd_mode_chi() 136 else if (DISTR.mode > DISTR.domain[1]) in _unur_upd_mode_chi() 137 DISTR.mode = DISTR.domain[1]; in _unur_upd_mode_chi() 151 DISTR.area = 1.; in _unur_upd_area_chi() 156 DISTR.area = ( _unur_cdf_chi( DISTR.domain[1],distr) in _unur_upd_area_chi() 182 DISTR.nu = nu; in _unur_set_params_chi() 238 DISTR.mode = (DISTR.nu >= 1.) ? sqrt(DISTR.nu - 1.) : 0.; in unur_distr_chi() 239 DISTR.area = 1.; in unur_distr_chi() [all …]
|
H A D | c_lomax.c | 133 if (DISTR.mode < DISTR.domain[0]) in _unur_upd_mode_lomax() 134 DISTR.mode = DISTR.domain[0]; in _unur_upd_mode_lomax() 135 else if (DISTR.mode > DISTR.domain[1]) in _unur_upd_mode_lomax() 136 DISTR.mode = DISTR.domain[1]; in _unur_upd_mode_lomax() 147 NORMCONSTANT = DISTR.a * pow(DISTR.C,DISTR.a); in _unur_upd_area_lomax() 155 DISTR.area = ( _unur_cdf_lomax( DISTR.domain[1],distr) in _unur_upd_area_lomax() 187 DISTR.a = a; in _unur_set_params_lomax() 190 DISTR.C = 1.; in _unur_set_params_lomax() 194 DISTR.C = C; in _unur_set_params_lomax() 246 NORMCONSTANT = DISTR.a * pow(DISTR.C,DISTR.a); in unur_distr_lomax() [all …]
|
H A D | c_chisquare.c | 154 DISTR.mode = (DISTR.nu >= 2.) ? (DISTR.nu - 2.) : 0.; in _unur_upd_mode_chisquare() 157 if (DISTR.mode < DISTR.domain[0]) in _unur_upd_mode_chisquare() 158 DISTR.mode = DISTR.domain[0]; in _unur_upd_mode_chisquare() 159 else if (DISTR.mode > DISTR.domain[1]) in _unur_upd_mode_chisquare() 160 DISTR.mode = DISTR.domain[1]; in _unur_upd_mode_chisquare() 174 DISTR.area = 1.; in _unur_upd_area_chisquare() 179 DISTR.area = ( _unur_cdf_chisquare( DISTR.domain[1],distr) in _unur_upd_area_chisquare() 206 DISTR.nu = nu; in _unur_set_params_chisquare() 265 DISTR.mode = (DISTR.nu >= 2.) ? (DISTR.nu - 2.) : 0.; in unur_distr_chisquare() 266 DISTR.area = 1.; in unur_distr_chisquare() [all …]
|
H A D | c_F.c | 196 return _unur_SF_cdf_F(x,DISTR.nua,DISTR.nub); in _unur_cdf_F() 217 return _unur_SF_invcdf_F(x,DISTR.nua,DISTR.nub); in _unur_invcdf_F() 227 DISTR.mode = ((DISTR.nua - 2.) * DISTR.nub) / (DISTR.nua * (DISTR.nub + 2.)); in _unur_upd_mode_F() 232 if (DISTR.mode < DISTR.domain[0]) in _unur_upd_mode_F() 233 DISTR.mode = DISTR.domain[0]; in _unur_upd_mode_F() 234 else if (DISTR.mode > DISTR.domain[1]) in _unur_upd_mode_F() 235 DISTR.mode = DISTR.domain[1]; in _unur_upd_mode_F() 254 DISTR.area = ( _unur_cdf_F( DISTR.domain[1],distr) in _unur_upd_area_F() 291 DISTR.nua = nua; in _unur_set_params_F() 292 DISTR.nub = nub; in _unur_set_params_F() [all …]
|
H A D | d_negativebinomial.c | 144 DISTR.mode = (int) ((1.+UNUR_EPSILON) * (DISTR.r - 1.) * (1. - DISTR.p) / DISTR.p); in _unur_upd_mode_negativebinomial() 151 if (DISTR.mode < DISTR.domain[0]) in _unur_upd_mode_negativebinomial() 152 DISTR.mode = DISTR.domain[0]; in _unur_upd_mode_negativebinomial() 153 else if (DISTR.mode > DISTR.domain[1]) in _unur_upd_mode_negativebinomial() 154 DISTR.mode = DISTR.domain[1]; in _unur_upd_mode_negativebinomial() 166 LOGNORMCONSTANT = - DISTR.r * log(DISTR.p) + _unur_SF_ln_gamma(DISTR.r); in _unur_upd_sum_negativebinomial() 175 DISTR.sum = ( _unur_cdf_negativebinomial( DISTR.domain[1],distr) in _unur_upd_sum_negativebinomial() 204 DISTR.p = p; in _unur_set_params_negativebinomial() 205 DISTR.r = r; in _unur_set_params_negativebinomial() 267 DISTR.sum = 1.; in unur_distr_negativebinomial() [all …]
|
H A D | c_beta.c | 312 DISTR.mode = DISTR.mode * (b - a) + a; in _unur_upd_mode_beta() 315 if (DISTR.mode < DISTR.domain[0]) in _unur_upd_mode_beta() 316 DISTR.mode = DISTR.domain[0]; in _unur_upd_mode_beta() 317 else if (DISTR.mode > DISTR.domain[1]) in _unur_upd_mode_beta() 318 DISTR.mode = DISTR.domain[1]; in _unur_upd_mode_beta() 338 DISTR.area = ( _unur_cdf_beta( DISTR.domain[1],distr) in _unur_upd_area_beta() 392 DISTR.p = p; in _unur_set_params_beta() 393 DISTR.q = q; in _unur_set_params_beta() 410 DISTR.domain[0] = DISTR.a; /* left boundary */ in _unur_set_params_beta() 411 DISTR.domain[1] = DISTR.b; /* right boundary */ in _unur_set_params_beta() [all …]
|
H A D | d_poisson.c | 123 DISTR.mode = (int) DISTR.theta; in _unur_upd_mode_poisson() 126 if (DISTR.mode < DISTR.domain[0]) in _unur_upd_mode_poisson() 127 DISTR.mode = DISTR.domain[0]; in _unur_upd_mode_poisson() 128 else if (DISTR.mode > DISTR.domain[1]) in _unur_upd_mode_poisson() 129 DISTR.mode = DISTR.domain[1]; in _unur_upd_mode_poisson() 143 DISTR.sum = 1.; in _unur_upd_sum_poisson() 148 DISTR.sum = ( _unur_cdf_poisson( DISTR.domain[1],distr) in _unur_upd_sum_poisson() 173 DISTR.theta = theta; in _unur_set_params_poisson() 231 DISTR.mode = (int) DISTR.theta; in unur_distr_poisson() 232 DISTR.sum = 1.; in unur_distr_poisson() [all …]
|
H A D | c_rayleigh.c | 119 DISTR.mode = DISTR.sigma; in _unur_upd_mode_rayleigh() 122 if (DISTR.mode < DISTR.domain[0]) in _unur_upd_mode_rayleigh() 123 DISTR.mode = DISTR.domain[0]; in _unur_upd_mode_rayleigh() 124 else if (DISTR.mode > DISTR.domain[1]) in _unur_upd_mode_rayleigh() 125 DISTR.mode = DISTR.domain[1]; in _unur_upd_mode_rayleigh() 139 DISTR.area = 1.; in _unur_upd_area_rayleigh() 144 DISTR.area = ( _unur_cdf_rayleigh( DISTR.domain[1],distr) in _unur_upd_area_rayleigh() 170 DISTR.sigma = sigma; in _unur_set_params_rayleigh() 227 DISTR.mode = DISTR.sigma; in unur_distr_rayleigh() 228 DISTR.area = 1.; in unur_distr_rayleigh() [all …]
|
H A D | c_laplace.c | 178 DISTR.mode = DISTR.theta; in _unur_upd_mode_laplace() 181 if (DISTR.mode < DISTR.domain[0]) in _unur_upd_mode_laplace() 182 DISTR.mode = DISTR.domain[0]; in _unur_upd_mode_laplace() 183 else if (DISTR.mode > DISTR.domain[1]) in _unur_upd_mode_laplace() 184 DISTR.mode = DISTR.domain[1]; in _unur_upd_mode_laplace() 202 DISTR.area = ( _unur_cdf_laplace( DISTR.domain[1],distr) in _unur_upd_area_laplace() 230 DISTR.theta = 0.; in _unur_set_params_laplace() 231 DISTR.phi = 1.; in _unur_set_params_laplace() 297 DISTR.mode = DISTR.theta; in unur_distr_laplace() 298 DISTR.area = 1.; in unur_distr_laplace() [all …]
|
H A D | c_student.c | 142 DISTR.mode = 0.; in _unur_upd_mode_student() 145 if (DISTR.mode < DISTR.domain[0]) in _unur_upd_mode_student() 146 DISTR.mode = DISTR.domain[0]; in _unur_upd_mode_student() 147 else if (DISTR.mode > DISTR.domain[1]) in _unur_upd_mode_student() 148 DISTR.mode = DISTR.domain[1]; in _unur_upd_mode_student() 163 DISTR.area = 1.; in _unur_upd_area_student() 168 DISTR.area = ( _unur_cdf_student( DISTR.domain[1],distr) in _unur_upd_area_student() 202 DISTR.nu = nu; in _unur_set_params_student() 262 DISTR.mode = 0.; in unur_distr_student() 263 DISTR.area = 1.; in unur_distr_student() [all …]
|
H A D | d_hypergeometric.c | 136 DISTR.mode = (int) ( (DISTR.n + 1) * (DISTR.M + 1.) / (DISTR.N + 2.) ); in _unur_upd_mode_hypergeometric() 139 if (DISTR.mode < DISTR.domain[0]) in _unur_upd_mode_hypergeometric() 140 DISTR.mode = DISTR.domain[0]; in _unur_upd_mode_hypergeometric() 141 else if (DISTR.mode > DISTR.domain[1]) in _unur_upd_mode_hypergeometric() 142 DISTR.mode = DISTR.domain[1]; in _unur_upd_mode_hypergeometric() 201 DISTR.N = nh; in _unur_set_params_hypergeometric() 206 DISTR.M = nh; in _unur_set_params_hypergeometric() 211 DISTR.n = nh; in _unur_set_params_hypergeometric() 221 … DISTR.domain[0] = (int) (_unur_max(0,(DISTR.n - DISTR.N + DISTR.M + 0.5))); /* left boundary */ in _unur_set_params_hypergeometric() 222 … DISTR.domain[1] = (int) (_unur_min(DISTR.n, DISTR.M) + 0.5); /* right boundary */ in _unur_set_params_hypergeometric() [all …]
|
/dports/math/unuran/unuran-1.8.1/scripts/ |
H A D | read_PDF.pl | 69 my $DISTR; 119 return $DISTR; 173 $DISTR->{$distr}->{"=NAME"} = $2; 241 $DISTR->{$distr}->{"=TYPE"} = $type; 259 my $file = $DISTR->{$distr}->{"=FILE"}; 272 my $type = $DISTR->{$distr}->{"=TYPE"}; 297 $DISTR->{$distr}->{"=PDF"}->{"=NAME"} = ""; 340 $DISTR->{$distr}->{"=ID"} = $1; 468 my $DISTR = $_[0]; 470 foreach my $d (keys %{$DISTR}) { [all …]
|