Changeset 18063 for issm/trunk-jpl/src/c/shared/Numerics/GaussPoints.cpp
- Timestamp:
- 05/26/14 21:05:52 (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/c/shared/Numerics/GaussPoints.cpp
r17865 r18063 9 9 10 10 /*General Gauss points*/ 11 /*FUNCTION GaussLegendreLinear {{{*/ 12 void GaussLegendreLinear( IssmPDouble** pxgaus, IssmPDouble** pxwgt, int ngaus){ 11 void GaussLegendreLinear( IssmPDouble** pxgaus, IssmPDouble** pxwgt, int ngaus){/*{{{*/ 13 12 /* Gauss-Legendre quadrature points. 14 13 … … 93 92 } 94 93 }/*}}}*/ 95 /*FUNCTION GaussLegendreTria{{{*/ 96 void GaussLegendreTria( int* pngaus, IssmDouble** pl1, IssmDouble** pl2, IssmDouble** pl3, IssmDouble** pwgt, int iord ) { 94 void GaussLegendreTria( int* pngaus, IssmDouble** pl1, IssmDouble** pl2, IssmDouble** pl3, IssmDouble** pwgt, int iord ) {/*{{{*/ 97 95 /*Gauss quadrature points for the triangle. 98 96 … … 1210 1208 return; 1211 1209 }/*}}}*/ 1212 /*FUNCTION GaussLegendreTetra{{{*/ 1213 void GaussLegendreTetra( int* pngaus, IssmDouble** pl1, IssmDouble** pl2, IssmDouble** pl3, IssmDouble** pl4, IssmDouble** pwgt, int iord ) { 1210 void GaussLegendreTetra( int* pngaus, IssmDouble** pl1, IssmDouble** pl2, IssmDouble** pl3, IssmDouble** pl4, IssmDouble** pwgt, int iord ) {/*{{{*/ 1214 1211 /* Gauss quadrature points for the tetrahedron. 1215 1212 … … 1473 1470 } 1474 1471 }/*}}}*/ 1475 /*FUNCTION GaussLobatto{{{*/ 1476 void GaussLobatto( IssmPDouble** pxgaus, IssmPDouble** pxwgt, int ngaus ) { 1472 void GaussLobatto( IssmPDouble** pxgaus, IssmPDouble** pxwgt, int ngaus ) {/*{{{*/ 1477 1473 /*Gauss-Lobatto quadrature points. 1478 1474 … … 1575 1571 1576 1572 }/*}}}*/ 1577 /*FUNCTION GaussRecur{{{*/ 1578 void GaussRecur( IssmPDouble* zero, IssmPDouble* weight, int n, IssmPDouble* alpha, IssmPDouble* beta ) { 1573 void GaussRecur( IssmPDouble* zero, IssmPDouble* weight, int n, IssmPDouble* alpha, IssmPDouble* beta ) {/*{{{*/ 1579 1574 /*Gauss quadrature points from recursion coefficients. 1580 1575 * … … 1698 1693 1699 1694 /*Element Gauss points TO BE REMOVED*/ 1700 /*FUNCTION gaussQuad{{{*/ 1701 void gaussQuad( IssmPDouble** pxgaus, IssmPDouble** pxwgt, IssmPDouble** pegaus, IssmPDouble** pewgt, int nigaus, int njgaus ) { 1695 void gaussQuad( IssmPDouble** pxgaus, IssmPDouble** pxwgt, IssmPDouble** pegaus, IssmPDouble** pewgt, int nigaus, int njgaus ) {/*{{{*/ 1702 1696 /*Gauss quadrature points for the quadrilaterial.*/ 1703 1697 … … 1706 1700 GaussLegendreLinear(pegaus, pewgt, njgaus); 1707 1701 }/*}}}*/ 1708 /*FUNCTION gaussHexa{{{*/ 1709 void gaussHexa( IssmPDouble** pxgaus, IssmPDouble** pxwgt, IssmPDouble** pegaus, IssmPDouble** pewgt, IssmPDouble** pzgaus, IssmPDouble ** pzwgt, int nigaus, int njgaus, int nkgaus ) { 1702 void gaussHexa( IssmPDouble** pxgaus, IssmPDouble** pxwgt, IssmPDouble** pegaus, IssmPDouble** pewgt, IssmPDouble** pzgaus, IssmPDouble ** pzwgt, int nigaus, int njgaus, int nkgaus ) {/*{{{*/ 1710 1703 /*Gauss quadrature points for the hexahedron.*/ 1711 1704
Note:
See TracChangeset
for help on using the changeset viewer.