Changeset 50beefe in sasmodels
- Timestamp:
- Mar 22, 2017 8:24:42 PM (8 years ago)
- Branches:
- master, core_shell_microgels, costrafo411, magnetic_model, ticket-1257-vesicle-product, ticket_1156, ticket_1265_superball, ticket_822_more_unit_tests
- Children:
- b260926
- Parents:
- 61104c8
- Location:
- sasmodels/models
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
sasmodels/models/bcc_paracrystal.c
r4962519 r50beefe 90 90 double theta, double phi, double psi) 91 91 { 92 double q, cos_a1, cos_a2, cos_a3;93 ORIENT_ASYMMETRIC(qx, qy, theta, phi, psi, q, cos_a3, cos_a2, cos_a1);92 double q, zhat, yhat, xhat; 93 ORIENT_ASYMMETRIC(qx, qy, theta, phi, psi, q, xhat, yhat, zhat); 94 94 95 const double a1 = + cos_a3 - cos_a1 + cos_a2;96 const double a2 = + cos_a3 + cos_a1 - cos_a2;97 const double a3 = - cos_a3 + cos_a1 + cos_a2;95 const double a1 = +xhat - zhat + yhat; 96 const double a2 = +xhat + zhat - yhat; 97 const double a3 = -xhat + zhat + yhat; 98 98 99 99 const double qd = 0.5*q*dnn; -
sasmodels/models/fcc_paracrystal.c
r4962519 r50beefe 90 90 double theta, double phi, double psi) 91 91 { 92 double q, cos_a1, cos_a2, cos_a3;93 ORIENT_ASYMMETRIC(qx, qy, theta, phi, psi, q, cos_a3, cos_a2, cos_a1);92 double q, zhat, yhat, xhat; 93 ORIENT_ASYMMETRIC(qx, qy, theta, phi, psi, q, xhat, yhat, zhat); 94 94 95 const double a1 = cos_a2 + cos_a3;96 const double a2 = cos_a3 + cos_a1;97 const double a3 = cos_a2 + cos_a1;95 const double a1 = yhat + xhat; 96 const double a2 = xhat + zhat; 97 const double a3 = yhat + zhat; 98 98 const double qd = 0.5*q*dnn; 99 99 const double arg = 0.5*square(qd*d_factor)*(a1*a1 + a2*a2 + a3*a3); -
sasmodels/models/sc_paracrystal.c
r4962519 r50beefe 111 111 double psi) 112 112 { 113 double q, cos_a1, cos_a2, cos_a3;114 ORIENT_ASYMMETRIC(qx, qy, theta, phi, psi, q, cos_a3, cos_a2, cos_a1);113 double q, zhat, yhat, xhat; 114 ORIENT_ASYMMETRIC(qx, qy, theta, phi, psi, q, xhat, yhat, zhat); 115 115 116 116 const double qd = q*dnn; … … 118 118 const double tanh_qd = tanh(arg); 119 119 const double cosh_qd = cosh(arg); 120 const double Zq = tanh_qd/(1. - cos(qd* cos_a1)/cosh_qd)121 * tanh_qd/(1. - cos(qd* cos_a2)/cosh_qd)122 * tanh_qd/(1. - cos(qd* cos_a3)/cosh_qd);120 const double Zq = tanh_qd/(1. - cos(qd*zhat)/cosh_qd) 121 * tanh_qd/(1. - cos(qd*yhat)/cosh_qd) 122 * tanh_qd/(1. - cos(qd*xhat)/cosh_qd); 123 123 124 124 const double Fq = sphere_form(q, radius, sphere_sld, solvent_sld)*Zq;
Note: See TracChangeset
for help on using the changeset viewer.