Changeset ee60aa7 in sasmodels for sasmodels/models/parallelepiped.c
- Timestamp:
- Sep 10, 2018 2:16:46 PM (6 years ago)
- Branches:
- master, core_shell_microgels, magnetic_model, ticket-1257-vesicle-product, ticket_1156, ticket_1265_superball, ticket_822_more_unit_tests
- Children:
- d299327
- Parents:
- 3f818b2
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
sasmodels/models/parallelepiped.c
rd277229 ree60aa7 8 8 effective_radius(int mode, double length_a, double length_b, double length_c) 9 9 { 10 if (mode == 1) { 10 switch (mode) { 11 case 1: // equivalent sphere 11 12 return cbrt(0.75*length_a*length_b*length_c/M_PI); 12 } else if (mode == 2) {13 case 2: // half length_a 13 14 return 0.5 * length_a; 14 } else if (mode == 3) {15 case 3: // half length_b 15 16 return 0.5 * length_b; 16 } else if (mode == 4) {17 case 4: // half length_c 17 18 return 0.5 * length_c; 18 } else if (mode == 5) {19 case 5: // equivalent circular cross-section 19 20 return sqrt(length_a*length_b/M_PI); 20 } else if (mode == 6) {21 case 6: // half ab diagonal 21 22 return 0.5*sqrt(length_a*length_a + length_b*length_b); 22 } else {23 case 7: // half diagonal 23 24 return 0.5*sqrt(length_a*length_a + length_b*length_b + length_c*length_c); 24 25 } 25 26 } 26 27 27 28 28 static void
Note: See TracChangeset
for help on using the changeset viewer.