/dports/comms/sdr-wspr/sdr-wspr-0.1.0/libwspr/ |
H A D | fchisq.f90 | 67 dphi3=twopi*dt*(a(1) + x*a(2) + p2*a(3) - 0.5*baud) 71 ws3=cmplx(cos(dphi3),sin(dphi3))
|
/dports/science/tinker/tinker/source/ |
H A D | etors1.f | 83 real*8 dphi1,dphi2,dphi3 local 218 dphi3 = 3.0d0 * (cosine3*s3 - sine3*c3) 227 dedphi = torsunit * (v1*dphi1 + v2*dphi2 + v3*dphi3 366 real*8 dphi1,dphi2,dphi3 local 528 dphi3 = 3.0d0 * (cosine3*s3 - sine3*c3) 552 dphi3 = dphi3 * damp3 561 dedphi = torsunit * (v1*dphi1 + v2*dphi2 + v3*dphi3
|
H A D | estrtor1.f | 48 real*8 dphi1,dphi2,dphi3 local 185 dphi3 = 3.0d0 * (cosine3*s3 - sine3*c3) 195 dedphi = storunit * dr * (v1*dphi1 + v2*dphi2 + v3*dphi3) 248 dedphi = storunit * dr * (v1*dphi1 + v2*dphi2 + v3*dphi3) 300 dedphi = storunit * dr * (v1*dphi1 + v2*dphi2 + v3*dphi3)
|
H A D | eimptor1.f | 53 real*8 dphi1,dphi2,dphi3 local 169 dphi3 = 3.0d0 * (cosine3*s3 - sine3*c3) 174 dedphi = itorunit * (v1*dphi1+v2*dphi2+v3*dphi3)
|
H A D | eangtor1.f | 53 real*8 dphi1,dphi2,dphi3 local 193 dphi3 = 3.0d0 * (cosine3*s3 - sine3*c3) 206 dedphi = atorunit * dt * (v1*dphi1 + v2*dphi2 + v3*dphi3) 260 dedphi = atorunit * dt * (v1*dphi1 + v2*dphi2 + v3*dphi3)
|
H A D | etors2.f | 79 real*8 dphi1,dphi2,dphi3 local 223 dphi3 = 3.0d0 * (cosine3*s3 - sine3*c3) 236 dedphi = torsunit * (v1*dphi1 + v2*dphi2 + v3*dphi3 790 real*8 dphi1,dphi2,dphi3 local 968 dphi3 = 3.0d0 * (cosine3*s3 - sine3*c3) 992 dphi3 = dphi3 * damp3 1005 dedphi = torsunit * (v1*dphi1 + v2*dphi2 + v3*dphi3
|
H A D | eimptor2.f | 49 real*8 dphi1,dphi2,dphi3 local 177 dphi3 = 3.0d0 * (cosine3*s3 - sine3*c3) 184 dedphi = itorunit * (v1*dphi1+v2*dphi2+v3*dphi3)
|
H A D | estrtor2.f | 55 real*8 dphi1,dphi2,dphi3 local 386 dphi3 = 3.0d0 * (cosine3*s3 - sine3*c3) 398 dedphi = storunit * (v1*dphi1 + v2*dphi2 + v3*dphi3) 852 dedphi = storunit * (v1*dphi1 + v2*dphi2 + v3*dphi3) 1305 dedphi = storunit * (v1*dphi1 + v2*dphi2 + v3*dphi3)
|
H A D | eangtor2.f | 71 real*8 dphi1,dphi2,dphi3 local 255 dphi3 = 3.0d0 * (cosine3*s3 - sine3*c3) 270 dedphi = atorunit * (v1*dphi1 + v2*dphi2 + v3*dphi3) 1063 dedphi = atorunit * (v1*dphi1 + v2*dphi2 + v3*dphi3)
|
/dports/science/lammps/lammps-stable_29Sep2021/src/OPENMP/ |
H A D | dihedral_class2_omp.cpp | 93 double sx12,sy1,sy2,sy12,sz1,sz2,sz12,dphi1,dphi2,dphi3; in eval() local 248 dphi3 = 3.0*phi - phi3[type]; in eval() 252 k3[type]*(1.0 - cos(dphi3)); in eval() 255 3.0*k3[type]*sin(dphi3); in eval()
|
/dports/comms/wsjtz/wsjtx/lib/wsprd/ |
H A D | wsprd.c | 216 dphi3, cdphi3, sdphi3; in sync_and_demodulate() local 246 dphi3=twopidt*(fp+df15); in sync_and_demodulate() 247 cdphi3=cos(dphi3); in sync_and_demodulate() 248 sdphi3=sin(dphi3); in sync_and_demodulate() 364 dphi3, cdphi3, sdphi3; in noncoherent_sequence_detection() local 389 dphi3=twopidt*(fp+df15); in noncoherent_sequence_detection() 390 cdphi3=cos(dphi3); in noncoherent_sequence_detection() 391 sdphi3=sin(dphi3); in noncoherent_sequence_detection()
|
/dports/science/tinker/tinker/other/ |
H A D | estrtor.full | 245 real*8 dphi1,dphi2,dphi3 371 dphi3 = 3.0d0 * (cosine3*s3 - sine3*c3) 386 & * (v1*dphi1 + v2*dphi2 + v3*dphi3) 391 & * (v1*dphi1 + v2*dphi2 + v3*dphi3) 473 & * (v1*dphi1 + v2*dphi2 + v3*dphi3) 560 & * (v1*dphi1 + v2*dphi2 + v3*dphi3) 727 real*8 dphi1,dphi2,dphi3 1055 dphi3 = 3.0d0 * (cosine3*s3 - sine3*c3) 1069 & * (v1*dphi1 + v2*dphi2 + v3*dphi3) 1083 & * (v1*dphi1 + v2*dphi2 + v3*dphi3) [all …]
|
H A D | eangtor.full | 246 real*8 dphi1,dphi2,dphi3 374 dphi3 = 3.0d0 * (cosine3*s3 - sine3*c3) 393 & * (v1*dphi1 + v2*dphi2 + v3*dphi3) 398 & * (v1*dphi1 + v2*dphi2 + v3*dphi3) 486 & * (v1*dphi1 + v2*dphi2 + v3*dphi3) 491 & * (v1*dphi1 + v2*dphi2 + v3*dphi3) 673 real*8 dphi1,dphi2,dphi3 853 dphi3 = 3.0d0 * (cosine3*s3 - sine3*c3) 870 & * (v1*dphi1 + v2*dphi2 + v3*dphi3) 876 & * (v1*dphi1 + v2*dphi2 + v3*dphi3) [all …]
|
/dports/science/lammps/lammps-stable_29Sep2021/src/CLASS2/ |
H A D | dihedral_class2.cpp | 113 double sx12,sy1,sy2,sy12,sz1,sz2,sz12,dphi1,dphi2,dphi3; in compute() local 271 dphi3 = 3.0*phi - phi3[type]; in compute() 275 k3[type]*(1.0 - cos(dphi3)); in compute() 278 3.0*k3[type]*sin(dphi3); in compute()
|
/dports/science/lammps/lammps-stable_29Sep2021/src/KOKKOS/ |
H A D | dihedral_class2_kokkos.cpp | 348 const F_FLOAT dphi3 = 3.0*phi - d_phi3[type]; in operator ()() local 352 d_k3[type]*(1.0 - cos(dphi3)); in operator ()() 355 3.0*d_k3[type]*sin(dphi3); in operator ()()
|