/dports/math/R-cran-lava/lava/R/ |
H A D | profile.R | 6 plogl <- function(tau0) { argument 8 mm$mean[[i]] <- tau0 12 mm$fix[fixed$A[i,1],fixed$A[i,2]] <- tau0 16 mm$covfix[fixed$P[i,1],fixed$P[i,2]] <- tau0 19 index(mm)$exfix[i] <- tau0 48 tau0 <- coef(x)[parm] functionVar 51 interval <- tau0 + 3*c(-1,1)*tau0.sd 63 low <- uniroot(pp,interval=c(interval[1],tau0))$root 65 up <- uniroot(pp,interval=c(tau0,interval[2]))$root
|
/dports/science/octopus/octopus-10.5/src/math/ |
H A D | tdfunction.F90 | 132 FLOAT :: a0, tau0, t0, tau1 347 f%tau0 = tau0 367 f%tau0 = tau0 387 f%tau0 = tau0 821 r = exp(-(t - f%t0)**2 / (M_TWO*f%tau0**2)) 827 if(abs(t - f%t0) <= f%tau0) then 828 r = cos( (M_Pi/2)*((t - 2*f%tau0 - f%t0)/f%tau0) ) 833 if(t > f%t0-f%tau0/M_TWO-f%tau1 .and. t <= f%t0-f%tau0/M_TWO) then 835 elseif(t>f%t0-f%tau0/M_TWO .and. t <=f%t0+f%tau0/M_TWO) then 837 elseif(t>f%t0+f%tau0/M_TWO .and. t <=f%t0+f%tau0/M_TWO+f%tau1) then [all …]
|
/dports/science/R-cran-eco/eco/src/ |
H A D | bayes.c | 28 double tau0, /* prior scale */ in NIWupdate() argument 54 mun[j] = (tau0*mu0[j]+n_samp*Ybar[j])/(tau0+n_samp); in NIWupdate() 57 Sn[j][k] += (tau0*n_samp)*(Ybar[j]-mu0[j])*(Ybar[k]-mu0[k])/(tau0+n_samp); in NIWupdate() 69 mtemp[j][k] = Sigma[j][k]/(tau0+n_samp); in NIWupdate()
|
/dports/science/madness/madness-ebb3fd7/src/madness/external/elemental/include/elemental/lapack-like/solve/ |
H A D | MultiShiftHessSolve.hpp | 103 F tau0 = x[m-1]; in LN() local 108 tau0 = -Conj(s[k])*tau0 + c[k]*tau1; in LN() 110 x[0] = tau0; in LN() 193 F tau0 = x[0]; in UN() local 198 tau0 = -Conj(s[k])*tau0 + c[k]*tau1; in UN() 200 x[m-1] = tau0; in UN() 311 tau0 = -Conj(s[k])*tau0 + c[k]*tau1; in LN() 313 x[0] = tau0; in LN() 410 F tau0 = x[0]; in UN() local 415 tau0 = -Conj(s[k])*tau0 + c[k]*tau1; in UN() [all …]
|
/dports/science/qbox/qbox-public-rel1_73_3/util/ |
H A D | qbox_msd.py | 22 self.tau0 = [] 48 self.tau0 = self.tau 52 dx = self.tau[i][0]-self.tau0[i][0] 53 dy = self.tau[i][1]-self.tau0[i][1] 54 dz = self.tau[i][2]-self.tau0[i][2]
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/CPV/src/ |
H A D | restart_sub.f90 | 26 …USE ions_positions, ONLY : taus, tau0, tausm, taum, vels, fion, fionm, set_velocities, velsm 63 CALL r_to_s( tau0, taus, nat, ainv ) 99 CALL s_to_r( taus, tau0, nat, h ) 107 CALL randvel( tempw, tau0 , taum, nat, ityp, iforce, amass, delt ) 156 CALL initbox( tau0, alat, at, ainv, taub, irb ) 194 IF ( tefield ) CALL efield_berry_setup( eigr, tau0 ) 195 IF ( tefield2 ) CALL efield_berry_setup2( eigr, tau0 ) 197 CALL plugin_init_ions( tau0 )
|
H A D | efield.f90 | 94 SUBROUTINE efield_berry_setup( eigr, tau0 ) argument 98 REAL(DP), INTENT(IN) :: tau0(:,:) local 172 USE ions_positions, ONLY: tau0 183 call berryion(tau0,fion,tfor.or.tprnfor,ipolp,evalue,enbi) 235 SUBROUTINE efield_berry_setup2( eigr, tau0 ) argument 239 REAL(DP), INTENT(IN) :: tau0(:,:) local 291 USE ions_positions, ONLY: tau0 302 call berryion(tau0,fion,tfor.or.tprnfor,ipolp2,evalue2,enbi)
|
H A D | smallbox_lib.f90 | 9 SUBROUTINE initbox ( tau0, alat, at, ainv, taub, irb ) argument 25 REAL(DP), INTENT(in) :: tau0(3,nat), at(3,3), ainv(3,3), alat local 50 x(i) = ainv(i,1)*tau0(1,ia) + & 51 & ainv(i,2)*tau0(2,ia) + & 52 & ainv(i,3)*tau0(3,ia)
|
H A D | fromscra.f90 | 16 USE ions_positions, ONLY : taus, tau0, tausm, vels, velsm, fion, fionm, & 109 CALL s_to_r( taus, tau0, nat, h ) 118 CALL initbox ( tau0, alat, at, ainv, taub, irb ) 124 CALL plugin_init_ions( tau0 ) 168 CALL randvel( tempw, tau0 , taum, nat, ityp, iforce, amass, delt ) 183 CALL efield_berry_setup( eigr, tau0 ) 186 CALL efield_berry_setup2( eigr, tau0 ) 216 & eigts1, eigts2, eigts3, irb, eigrb, sfac, tau0, fion )
|
H A D | ions_positions.f90 | 18 REAL(DP), TARGET, ALLOCATABLE :: tau0(:,:), taum(:,:), taup(:,:) variable 38 IF( ALLOCATED( tau0 ) ) DEALLOCATE( tau0 ) 53 ALLOCATE( tau0( 3, nat ) ) 74 IF( ALLOCATED( tau0 ) ) DEALLOCATE( tau0 )
|
H A D | berryion.f90 | 30 real(dp) tau0(3,*) local 53 temp = temp - ci*gmes*tau0(ipol,ia)*zv(is) 54 pola=pola+evalue*zv(is)*tau0(ipol,ia)!this is just the center of ionic charge
|
H A D | cpr.f90 | 270 CALL initbox( tau0, alat, at, ainv, taub, irb ) 309 CALL plugin_init_ions( tau0 ) 353 usrt_tau0(:,:) = tau0(:,:)/alat 429 CALL remove_tot_torque( nat, tau0, pmass(ityp(:)), fion ) 439 usrt_tau0(:,:) = tau0(:,:) 705 IF ( lwf ) CALL ef_enthalpy( enthal, tau0 ) 777 CALL mp_bcast( tau0, 0, inter_bgrp_comm ) 805 CALL initbox( tau0, alat, at, ainv, taub, irb ) 808 CALL r_to_s( tau0, taus, nat, ainv ) 816 CALL plugin_init_ions( tau0 ) [all …]
|
H A D | phasefactor.f90 | 11 subroutine phfac_x( tau0, ei1, ei2, ei3, eigr) argument 33 real(DP) tau0(3,nat) local 45 WRITE( stdout,*) ( ( tau0(i,isa), i=1, 3 ), isa=1, nat ) 47 CALL r_to_s( tau0, taus, nat, ainv )
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/PW/src/ |
H A D | make_pointlists.f90 | 104 REAL(DP), ALLOCATABLE :: tau0(:,:), tau_SoA(:,:), distmin(:), distances(:) local 108 ALLOCATE( tau0(3,nat), tau_SoA(nat,3), distances(nat) ) 113 tau0 = tau 114 CALL cryst_to_cart( nat, tau0, bg, -1 ) 117 tau_SoA(iat,ipol) = tau0(ipol,iat) 140 CALL compute_distances_SoA( tau0(1:3,iat), nat, tau_SoA, distances ) 200 DEALLOCATE( tau0, tau_SoA, distances )
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/Modules/ |
H A D | ions_base.f90 | 473 subroutine randvel( tempw, tau0, taum, nat, ityp, iforce, amass, delt ) argument 478 REAL(DP), intent(in) :: tau0(:,:) local 504 taum(i,ia)=tau0(i,ia)-iforce(i,ia)*alfar 518 REAL(DP), intent(in) :: tau0(:,:), taum(:,:), fion(:,:) local 535 taup(i,ia) = tau0(i,ia) + & 660 REAL(DP) FUNCTION compute_eextfor( tau0 ) 662 REAL(DP), OPTIONAL, INTENT(IN) :: tau0(:,:) local 667 IF( PRESENT( tau0 ) ) THEN 669 e = e + extfor( 3, i ) * tau0( 3, i ) & 670 + extfor( 2, i ) * tau0( 2, i ) & [all …]
|
/dports/science/octopus/octopus-10.5/testsuite/tutorials/ |
H A D | 07-octopus_basics-time_dependent_propagation.03-td_laser.inp | 28 tau0 = 0.5/eV 29 t0 = tau0 36 "envelope_cos" | tdf_cosinoidal | amplitude | tau0 | t0
|
/dports/math/jags/JAGS-4.3.0/src/modules/bugs/distributions/ |
H A D | DLnorm.cc | 60 double mu0 = MU(par0), tau0 = TAU(par0); in KL() local 63 return ((mu0 - mu1) * (mu0 - mu1) * tau1 + tau1/tau0 - 1 + in KL() 64 log(tau0/tau1)) / 2; in KL()
|
H A D | DNorm.cc | 90 double mu0 = MU(par0), tau0 = TAU(par0); in KL() local 93 return ((mu0 - mu1) * (mu0 - mu1) * tau1 + tau1/tau0 - 1 + in KL() 94 log(tau0/tau1)) / 2; in KL()
|
/dports/math/libflame/libflame-5.2.0/src/lapack/util/accum/tut/fc/flamec/ |
H A D | FLA_Accum_T_UT_fc_unb_var1.c | 19 FLA_Obj tauT, tau0, in FLA_Accum_T_UT_fc_unb_var1() local 45 FLA_Repart_2x1_to_3x1( tauT, &tau0, in FLA_Accum_T_UT_fc_unb_var1() 73 FLA_Cont_with_3x1_to_2x1( &tauT, tau0, in FLA_Accum_T_UT_fc_unb_var1()
|
/dports/math/libflame/libflame-5.2.0/src/lapack/util/accum/tut/fr/flamec/ |
H A D | FLA_Accum_T_UT_fr_unb_var1.c | 19 FLA_Obj tauT, tau0, in FLA_Accum_T_UT_fr_unb_var1() local 45 FLA_Repart_2x1_to_3x1( tauT, &tau0, in FLA_Accum_T_UT_fr_unb_var1() 73 FLA_Cont_with_3x1_to_2x1( &tauT, tau0, in FLA_Accum_T_UT_fr_unb_var1()
|
/dports/games/flightgear/flightgear-2020.3.11/src/FDM/YASim/ |
H A D | Propeller.cpp | 112 float tau0 = (0.25f * _j0) / (_etaC * _beta * (1 - _lambdaPeak)); in calc() local 114 torque = tau0 - tau0 * (lambda - 1) / (lambdaWM - 1); in calc()
|
/dports/science/R-cran-eco/eco/R/ |
H A D | eco.R | 2 context = FALSE, mu0 = 0, tau0 = 2, nu0 = 4, S0 = 10, argument 63 as.integer(verbose), as.integer(nu0), as.double(tau0), 79 as.integer(verbose), as.integer(nu0), as.double(tau0), 101 tau0 = tau0, mu0 = mu0, S0 = S0) nameattr
|
H A D | ecoNP.R | 2 context = FALSE, mu0 = 0, tau0 = 2, nu0 = 4, S0 = 10, argument 63 as.integer(verbose), as.integer(nu0), as.double(tau0), 83 as.integer(verbose), as.integer(nu0), as.double(tau0), 105 burin = burnin, thin = thin, nu0 = nu0, tau0 = tau0, nameattr
|
/dports/cad/ngspice_rework/ngspice-35/src/ciderlib/support/ |
H A D | mater.c | 44 info->tau0[ELEC] = TAU0_N_SI; in MATLdefaults() 45 info->tau0[HOLE] = TAU0_P_SI; in MATLdefaults() 97 info->tau0[ELEC] = TAU0_N_SI; in MATLdefaults() 98 info->tau0[HOLE] = TAU0_P_SI; in MATLdefaults() 150 info->tau0[ELEC] = TAU0_N_GA; in MATLdefaults() 151 info->tau0[HOLE] = TAU0_P_GA; in MATLdefaults() 241 info->tau0[ELEC] *= tmp1 / TNorm; in MATLtempDep() 242 info->tau0[HOLE] *= tmp1 / TNorm; in MATLtempDep() 348 fprintf(stdout, tabformat, "Tn0", info->tau0[ELEC] * TNorm, "s"); in printMaterialInfo() 349 fprintf(stdout, newformat, "Tp0", info->tau0[HOLE] * TNorm, "s"); in printMaterialInfo()
|
/dports/cad/ngspice_rework/ngspice-35/src/ciderlib/input/ |
H A D | matlset.c | 144 newMaterial->tau0[HOLE] = card->MATLtaup0; in MATLsetup() 147 newMaterial->tau0[ELEC] = card->MATLtaun0; in MATLsetup() 150 newMaterial->tau0[HOLE] = card->MATLtaup0; in MATLsetup()
|