Changeset 7374
- Timestamp:
- 02/07/11 13:25:46 (14 years ago)
- Location:
- issm/trunk/src/c/objects/Elements
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk/src/c/objects/Elements/Penta.cpp
r7373 r7374 540 540 /*}}}*/ 541 541 542 /*Skip if water element*/ 542 543 if(IsOnWater()) return; 543 544 … … 588 589 bedrock, in which case we spawn a tria element using the 3 first grids, and use it to build 589 590 the stiffness matrix. */ 590 if (!IsOnBed() || IsOnWater()) return NULL;591 if (!IsOnBed()) return NULL; 591 592 592 593 /*Depth Averaging Vx and Vy*/ … … 613 614 bedrock, in which case we spawn a tria element using the 3 first grids, and use it to build 614 615 the stiffness matrix. */ 615 if (!IsOnBed() || IsOnWater()) return NULL;616 if (!IsOnBed()) return NULL; 616 617 617 618 /*Depth Averaging Vx and Vy*/ … … 673 674 Tria* tria=pentabase->SpawnTria(0,1,2); //grids 0, 1 and 2 make the new tria. 674 675 675 /*Initialize Element matrix and return if necessary*/ 676 if(IsOnWater()) return NULL; 676 /*Initialize Element matrix*/ 677 677 ElementMatrix* Ke1=new ElementMatrix(pentabase->nodes,NUMVERTICES,this->parameters,MacAyealApproximationEnum); 678 678 ElementMatrix* Ke2=new ElementMatrix(this->nodes ,NUMVERTICES,this->parameters,PattynApproximationEnum); … … 730 730 731 731 /*Initialize Element matrix and return if necessary*/ 732 if(IsOn Water() || IsOnShelf() || !IsOnBed()) return NULL;732 if(IsOnShelf() || !IsOnBed()) return NULL; 733 733 734 734 Tria* tria=(Tria*)SpawnTria(0,1,2); //grids 0, 1 and 2 make the new tria. … … 875 875 /*If on water or not Stokes, skip stiffness: */ 876 876 inputs->GetParameterValue(&approximation,ApproximationEnum); 877 if(IsOn Water() || IsOnShelf() || !IsOnBed()) return NULL;877 if(IsOnShelf() || !IsOnBed()) return NULL; 878 878 ElementMatrix* Ke1=new ElementMatrix(this->nodes,NUMVERTICES,this->parameters,MacAyealApproximationEnum); 879 879 ElementMatrix* Ke2=new ElementMatrix(this->nodes,NUMVERTICES,this->parameters,StokesApproximationEnum); … … 1017 1017 double one0,one1; 1018 1018 1019 /*Initialize Element matrix and return if necessary*/ 1020 if(IsOnWater()) return NULL; 1019 /*Initialize Element matrix*/ 1021 1020 ElementMatrix* Ke=new ElementMatrix(nodes,NUMVERTICES,this->parameters,NoneApproximationEnum); 1022 1021 … … 1076 1075 bedrock, in which case we spawn a tria element using the 3 first grids, and use it to build 1077 1076 the stiffness matrix. */ 1078 if (!IsOnBed() || IsOnWater()) return NULL;1077 if (!IsOnBed()) return NULL; 1079 1078 1080 1079 /*Depth Averaging B*/ … … 1134 1133 tria=pentabase->SpawnTria(0,1,2); //grids 0, 1 and 2 make the new tria. 1135 1134 1136 /*Initialize Element matrix and return if necessary*/ 1137 if(IsOnWater()) return NULL; 1135 /*Initialize Element matrix*/ 1138 1136 ElementMatrix* Ke=new ElementMatrix(tria->nodes,NUMVERTICES2D,this->parameters,MacAyealApproximationEnum); 1139 1137 inputs->GetParameterValue(&approximation,ApproximationEnum); … … 1197 1195 1198 1196 /*Initialize Element matrix and return if necessary*/ 1199 if(IsOn Water() || IsOnShelf() || !IsOnBed()) return NULL;1197 if(IsOnShelf() || !IsOnBed()) return NULL; 1200 1198 1201 1199 /*Build a tria element using the 3 grids of the base of the penta. Then use … … 1278 1276 GaussPenta *gauss=NULL; 1279 1277 1280 /*Initialize Element matrix and return if necessary*/ 1281 if(IsOnWater()) return NULL; 1278 /*Initialize Element matrix*/ 1282 1279 ElementMatrix* Ke=new ElementMatrix(nodes,NUMVERTICES,this->parameters,PattynApproximationEnum); 1283 1280 … … 1327 1324 1328 1325 /*Initialize Element matrix and return if necessary*/ 1329 if(IsOn Water() || IsOnShelf() || !IsOnBed()) return NULL;1326 if(IsOnShelf() || !IsOnBed()) return NULL; 1330 1327 1331 1328 /*Build a tria element using the 3 grids of the base of the penta. Then use … … 1388 1385 /*If on water or not Stokes, skip stiffness: */ 1389 1386 inputs->GetParameterValue(&approximation,ApproximationEnum); 1390 if( IsOnWater() || (approximation!=StokesApproximationEnum && approximation!=MacAyealStokesApproximationEnum && approximation!=PattynStokesApproximationEnum)) return NULL;1387 if(approximation!=StokesApproximationEnum && approximation!=MacAyealStokesApproximationEnum && approximation!=PattynStokesApproximationEnum) return NULL; 1391 1388 ElementMatrix* Ke=new ElementMatrix(nodes,NUMVERTICES,this->parameters,StokesApproximationEnum); 1392 1389 … … 1456 1453 /*If on water or not Stokes, skip stiffness: */ 1457 1454 inputs->GetParameterValue(&approximation,ApproximationEnum); 1458 if(IsOn Water() || IsOnShelf() || !IsOnBed() || (approximation!=StokesApproximationEnum && approximation!=MacAyealStokesApproximationEnum && approximation!=PattynStokesApproximationEnum)) return NULL;1455 if(IsOnShelf() || !IsOnBed() || (approximation!=StokesApproximationEnum && approximation!=MacAyealStokesApproximationEnum && approximation!=PattynStokesApproximationEnum)) return NULL; 1459 1456 ElementMatrix* Ke=new ElementMatrix(nodes,NUMVERTICES,this->parameters,StokesApproximationEnum); 1460 1457 … … 1547 1544 GaussPenta *gauss=NULL; 1548 1545 1549 /*Initialize Element matrix and return if necessary*/ 1550 if(IsOnWater()) return NULL; 1546 /*Initialize Element matrix*/ 1551 1547 ElementMatrix* Ke=new ElementMatrix(nodes,NUMVERTICES,this->parameters,NoneApproximationEnum); 1552 1548 … … 1582 1578 ElementMatrix* Penta::CreateKMatrixDiagnosticVertSurface(void){ 1583 1579 1584 if (!IsOnSurface() || IsOnWater()) return NULL;1580 if (!IsOnSurface()) return NULL; 1585 1581 1586 1582 /*Call Tria function*/ … … 1596 1592 ElementMatrix* Penta::CreateKMatrixMelting(void){ 1597 1593 1598 if (!IsOnBed() || IsOnWater()) return NULL;1594 if (!IsOnBed()) return NULL; 1599 1595 1600 1596 Tria* tria=(Tria*)SpawnTria(0,1,2); //grids 0, 1 and 2 make the new tria. … … 1608 1604 ElementMatrix* Penta::CreateKMatrixPrognostic(void){ 1609 1605 1610 if (!IsOnBed() || IsOnWater()) return NULL;1606 if (!IsOnBed()) return NULL; 1611 1607 1612 1608 /*Depth Averaging Vx and Vy*/ … … 1629 1625 ElementMatrix* Penta::CreateKMatrixSlope(void){ 1630 1626 1631 if (!IsOnBed() || IsOnWater()) return NULL;1627 if (!IsOnBed()) return NULL; 1632 1628 1633 1629 Tria* tria=(Tria*)SpawnTria(0,1,2); //grids 0, 1 and 2 make the new tria. … … 1686 1682 GaussPenta *gauss=NULL; 1687 1683 1688 /*Initialize Element matrix and return if necessary*/ 1689 if(IsOnWater()) return NULL; 1684 /*Initialize Element matrix*/ 1690 1685 ElementMatrix* Ke=new ElementMatrix(nodes,NUMVERTICES,this->parameters,NoneApproximationEnum); 1691 1686 … … 1816 1811 ElementMatrix* Penta::CreateKMatrixThermalShelf(void){ 1817 1812 1818 if (!IsOnBed() || !IsOnShelf() || IsOnWater()) return NULL;1813 if (!IsOnBed() || !IsOnShelf()) return NULL; 1819 1814 1820 1815 /*Call Tria function*/ … … 1838 1833 /*}}}*/ 1839 1834 1835 /*Skip if water element*/ 1840 1836 if(IsOnWater()) return; 1841 1837 … … 1906 1902 ElementVector* Penta::CreatePVectorAdjointMacAyeal(){ 1907 1903 1908 if (!IsOnBed() || IsOnWater()) return NULL;1904 if (!IsOnBed()) return NULL; 1909 1905 1910 1906 /*Call Tria function*/ … … 1920 1916 ElementVector* Penta::CreatePVectorAdjointPattyn(void){ 1921 1917 1922 if (!IsOnSurface() || IsOnWater()) return NULL;1918 if (!IsOnSurface()) return NULL; 1923 1919 1924 1920 /*Call Tria function*/ … … 1934 1930 ElementVector* Penta::CreatePVectorBalancedthickness(void){ 1935 1931 1936 if (!IsOnBed() || IsOnWater()) return NULL;1932 if (!IsOnBed()) return NULL; 1937 1933 1938 1934 /*Depth Averaging Vx and Vy*/ … … 1956 1952 ElementVector* Penta::CreatePVectorBalancedvelocities(void){ 1957 1953 1958 if (!IsOnBed() || IsOnWater()) return NULL;1954 if (!IsOnBed()) return NULL; 1959 1955 1960 1956 /*Depth Averaging Vx and Vy*/ … … 2008 2004 2009 2005 /*Initialize Element vector and return if necessary*/ 2010 if(IsOnWater()) return NULL;2011 2006 inputs->GetParameterValue(&approximation,ApproximationEnum); 2012 2007 if(approximation!=MacAyealStokesApproximationEnum) return NULL; … … 2072 2067 2073 2068 /*Initialize Element vector and return if necessary*/ 2074 if( IsOnWater() ||!IsOnBed() || IsOnShelf()) return NULL;2069 if(!IsOnBed() || IsOnShelf()) return NULL; 2075 2070 inputs->GetParameterValue(&approximation,ApproximationEnum); 2076 2071 if(approximation!=MacAyealStokesApproximationEnum) return NULL; … … 2154 2149 2155 2150 /*Initialize Element vector and return if necessary*/ 2156 if(IsOnWater()) return NULL;2157 2151 inputs->GetParameterValue(&approximation,ApproximationEnum); 2158 2152 if(approximation!=PattynStokesApproximationEnum) return NULL; … … 2218 2212 2219 2213 /*Initialize Element vector and return if necessary*/ 2220 if( IsOnWater() ||!IsOnBed() || IsOnShelf()) return NULL;2214 if(!IsOnBed() || IsOnShelf()) return NULL; 2221 2215 inputs->GetParameterValue(&approximation,ApproximationEnum); 2222 2216 if(approximation!=PattynStokesApproximationEnum) return NULL; … … 2361 2355 GaussPenta* gauss=NULL; 2362 2356 2363 /*Initialize Element vector and return if necessary*/ 2364 if(IsOnWater()) return NULL; 2357 /*Initialize Element vector*/ 2365 2358 ElementVector* pe=new ElementVector(nodes,NUMVERTICES,this->parameters); 2366 2359 … … 2433 2426 ElementVector* Penta::CreatePVectorDiagnosticMacAyeal(void){ 2434 2427 2435 if (!IsOnBed() || IsOnWater()) return NULL;2428 if (!IsOnBed()) return NULL; 2436 2429 2437 2430 /*Call Tria function*/ … … 2459 2452 GaussPenta *gauss=NULL; 2460 2453 2461 /*Initialize Element vector and return if necessary*/ 2462 if(IsOnWater()) return NULL; 2454 /*Initialize Element vector*/ 2463 2455 ElementVector* pe=new ElementVector(nodes,NUMVERTICES,this->parameters,PattynApproximationEnum); 2464 2456 … … 2529 2521 2530 2522 /*Initialize Element vector and return if necessary*/ 2531 if(IsOnWater()) return NULL;2532 2523 inputs->GetParameterValue(&approximation,ApproximationEnum); 2533 2524 if(approximation!=StokesApproximationEnum && approximation!=MacAyealStokesApproximationEnum && approximation!=PattynStokesApproximationEnum) return NULL; … … 2599 2590 2600 2591 /*Initialize Element vector and return if necessary*/ 2601 if( IsOnWater() ||!IsOnBed() || !IsOnShelf()) return NULL;2592 if(!IsOnBed() || !IsOnShelf()) return NULL; 2602 2593 inputs->GetParameterValue(&approximation,ApproximationEnum); 2603 2594 if(approximation!=StokesApproximationEnum && approximation!=MacAyealStokesApproximationEnum && approximation!=PattynStokesApproximationEnum) return NULL; … … 2636 2627 ElementVector* Penta::CreatePVectorAdjointStokes(void){ 2637 2628 2638 if (!IsOnSurface() || IsOnWater()) return NULL;2629 if (!IsOnSurface()) return NULL; 2639 2630 2640 2631 /*Call Tria function*/ … … 2677 2668 GaussPenta *gauss=NULL; 2678 2669 2679 /*Initialize Element vector and return if necessary*/ 2680 if(IsOnWater()) return NULL; 2670 /*Initialize Element vector*/ 2681 2671 ElementVector* pe=new ElementVector(nodes,NUMVERTICES,this->parameters); 2682 2672 … … 2721 2711 ElementVector* Penta::CreatePVectorDiagnosticVertBase(void){ 2722 2712 2723 if (!IsOnBed() || IsOnWater()) return NULL;2713 if (!IsOnBed()) return NULL; 2724 2714 2725 2715 /*Call Tria function*/ … … 2740 2730 ElementVector* Penta::CreatePVectorPrognostic(void){ 2741 2731 2742 if (!IsOnBed() || IsOnWater()) return NULL;2732 if (!IsOnBed()) return NULL; 2743 2733 2744 2734 /*Depth Averaging Vx and Vy*/ … … 2762 2752 ElementVector* Penta::CreatePVectorSlope(void){ 2763 2753 2764 if (!IsOnBed() || IsOnWater()) return NULL;2754 if (!IsOnBed()) return NULL; 2765 2755 2766 2756 /*Call Tria function*/ … … 2812 2802 GaussPenta *gauss=NULL; 2813 2803 2814 /*Initialize Element vector and return if necessary*/ 2815 if(IsOnWater()) return NULL; 2804 /*Initialize Element vector*/ 2816 2805 ElementVector* pe=new ElementVector(nodes,NUMVERTICES,this->parameters); 2817 2806 … … 2880 2869 2881 2870 /* Ice/ocean heat exchange flux on ice shelf base */ 2882 if (!IsOnBed() || !IsOnShelf() || IsOnWater()) return NULL;2871 if (!IsOnBed() || !IsOnShelf()) return NULL; 2883 2872 2884 2873 /*Call Tria function*/ … … 2895 2884 2896 2885 /* Geothermal flux on ice sheet base and basal friction */ 2897 if (!IsOnBed() || IsOnShelf() || IsOnWater()) return NULL;2886 if (!IsOnBed() || IsOnShelf()) return NULL; 2898 2887 2899 2888 /*Call Tria function*/ -
issm/trunk/src/c/objects/Elements/Tria.cpp
r7373 r7374 388 388 /*}}}*/ 389 389 390 /*Skip if water element*/ 390 391 if(IsOnWater()) return; 391 392 … … 485 486 GaussTria *gauss = NULL; 486 487 487 /*Initialize Element matrix and return if necessary*/ 488 if(IsOnWater()) return NULL; 488 /*Initialize Element matrix*/ 489 489 ElementMatrix* Ke=new ElementMatrix(nodes,NUMVERTICES,this->parameters,NoneApproximationEnum); 490 490 … … 590 590 GaussTria *gauss=NULL; 591 591 592 /*Initialize Element matrix and return if necessary*/ 593 if(IsOnWater()) return NULL; 592 /*Initialize Element matrix*/ 594 593 ElementMatrix* Ke=new ElementMatrix(nodes,NUMVERTICES,this->parameters,NoneApproximationEnum); 595 594 … … 657 656 GaussTria *gauss=NULL; 658 657 659 /*Initialize Element matrix and return if necessary*/ 660 if(IsOnWater()) return NULL; 658 /*Initialize Element matrix*/ 661 659 ElementMatrix* Ke=new ElementMatrix(nodes,NUMVERTICES,this->parameters,NoneApproximationEnum); 662 660 … … 788 786 GaussTria *gauss = NULL; 789 787 790 /*Initialize Element matrix and return if necessary*/ 791 if(IsOnWater()) return NULL; 788 /*Initialize Element matrix*/ 792 789 ElementMatrix* Ke=new ElementMatrix(nodes,NUMVERTICES,this->parameters,MacAyealApproximationEnum); 793 790 … … 857 854 858 855 /*Initialize Element matrix and return if necessary*/ 859 if(IsOn Water() || IsOnShelf()) return NULL;856 if(IsOnShelf()) return NULL; 860 857 ElementMatrix* Ke=new ElementMatrix(nodes,NUMVERTICES,this->parameters,MacAyealApproximationEnum); 861 858 … … 928 925 929 926 /*Initialize Element matrix and return if necessary*/ 930 if(IsOn Water() || IsOnShelf()) return NULL;927 if(IsOnShelf()) return NULL; 931 928 ElementMatrix* Ke1=new ElementMatrix(nodes,NUMVERTICES,this->parameters,MacAyealApproximationEnum); 932 929 ElementMatrix* Ke2=new ElementMatrix(nodes,NUMVERTICES,this->parameters,PattynApproximationEnum); … … 1017 1014 1018 1015 /*Initialize Element matrix and return if necessary*/ 1019 if(IsOn Water() || IsOnShelf()) return NULL;1016 if(IsOnShelf()) return NULL; 1020 1017 ElementMatrix* Ke=new ElementMatrix(nodes,NUMVERTICES,this->parameters,PattynApproximationEnum); 1021 1018 … … 1076 1073 int i,connectivity; 1077 1074 1078 /*Initialize Element matrix and return if necessary*/ 1079 if(IsOnWater()) return NULL; 1075 /*Initialize Element matrix*/ 1080 1076 ElementMatrix* Ke=new ElementMatrix(nodes,NUMVERTICES,this->parameters,NoneApproximationEnum); 1081 1077 … … 1106 1102 double Ke_g[numdof][numdof]; //stiffness matrix evaluated at the gaussian point. 1107 1103 1108 /*Initialize Element matrix and return if necessary*/ 1109 if(IsOnWater()) return NULL; 1104 /*Initialize Element matrix*/ 1110 1105 ElementMatrix* Ke=new ElementMatrix(nodes,NUMVERTICES,this->parameters,NoneApproximationEnum); 1111 1106 … … 1155 1150 GaussTria *gauss=NULL; 1156 1151 1157 /*Initialize Element matrix and return if necessary*/ 1158 if(IsOnWater()) return NULL; 1152 /*Initialize Element matrix*/ 1159 1153 ElementMatrix* Ke=new ElementMatrix(nodes,NUMVERTICES,this->parameters,NoneApproximationEnum); 1160 1154 … … 1228 1222 GaussTria *gauss=NULL; 1229 1223 1230 /*Initialize Element matrix and return if necessary*/ 1231 if(IsOnWater()) return NULL; 1224 /*Initialize Element matrix*/ 1232 1225 ElementMatrix* Ke=new ElementMatrix(nodes,NUMVERTICES,this->parameters,NoneApproximationEnum); 1233 1226 … … 1347 1340 GaussTria *gauss=NULL; 1348 1341 1349 /*Initialize Element matrix and return if necessary*/ 1350 if(IsOnWater()) return NULL; 1342 /*Initialize Element matrix*/ 1351 1343 ElementMatrix* Ke=new ElementMatrix(nodes,NUMVERTICES,this->parameters,NoneApproximationEnum); 1352 1344 … … 1422 1414 GaussTria *gauss = NULL; 1423 1415 1424 /*Initialize Element matrix and return if necessary*/ 1425 if(IsOnWater()) return NULL; 1416 /*Initialize Element matrix*/ 1426 1417 ElementMatrix* Ke=new ElementMatrix(nodes,NUMVERTICES,this->parameters,NoneApproximationEnum); 1427 1418 … … 1470 1461 1471 1462 /*Initialize Element matrix and return if necessary*/ 1472 if( IsOnWater() ||!IsOnShelf()) return NULL;1463 if(!IsOnShelf()) return NULL; 1473 1464 ElementMatrix* Ke=new ElementMatrix(nodes,NUMVERTICES,this->parameters,NoneApproximationEnum); 1474 1465 … … 1520 1511 /*}}}*/ 1521 1512 1513 /*Skip if water element*/ 1522 1514 if(IsOnWater()) return; 1523 1515 … … 1586 1578 GaussTria* gauss=NULL; 1587 1579 1588 /*Initialize Element vector and return if necessary*/ 1589 if(IsOnWater()) return NULL; 1580 /*Initialize Element vector*/ 1590 1581 ElementVector* pe=new ElementVector(nodes,NUMVERTICES,this->parameters); 1591 1582 … … 1630 1621 GaussTria* gauss=NULL; 1631 1622 1632 /*Initialize Element vector and return if necessary*/ 1633 if(IsOnWater()) return NULL; 1623 /*Initialize Element vector*/ 1634 1624 ElementVector* pe=new ElementVector(nodes,NUMVERTICES,this->parameters); 1635 1625 … … 1674 1664 GaussTria* gauss=NULL; 1675 1665 1676 /*Initialize Element vector and return if necessary*/ 1677 if(IsOnWater()) return NULL; 1666 /*Initialize Element vector*/ 1678 1667 ElementVector* pe=new ElementVector(nodes,NUMVERTICES,this->parameters); 1679 1668 … … 1719 1708 GaussTria* gauss=NULL; 1720 1709 1721 /*Initialize Element vector and return if necessary*/ 1722 if(IsOnWater()) return NULL; 1710 /*Initialize Element vector*/ 1723 1711 ElementVector* pe=new ElementVector(nodes,NUMVERTICES,this->parameters); 1724 1712 … … 1780 1768 GaussTria* gauss=NULL; 1781 1769 1782 /*Initialize Element vector and return if necessary*/ 1783 if(IsOnWater()) return NULL; 1770 /*Initialize Element vector*/ 1784 1771 ElementVector* pe=new ElementVector(nodes,NUMVERTICES,this->parameters,MacAyealApproximationEnum); 1785 1772 … … 1847 1834 GaussTria* gauss=NULL; 1848 1835 1849 /*Initialize Element vector and return if necessary*/ 1850 if(IsOnWater()) return NULL; 1836 /*Initialize Element vector*/ 1851 1837 ElementVector* pe=new ElementVector(nodes,NUMVERTICES,this->parameters); 1852 1838 … … 1906 1892 GaussTria* gauss=NULL; 1907 1893 1908 /*Initialize Element vector and return if necessary*/ 1909 if(IsOnWater()) return NULL; 1894 /*Initialize Element vector*/ 1910 1895 ElementVector* pe=new ElementVector(nodes,NUMVERTICES,this->parameters); 1911 1896 … … 2087 2072 GaussTria* gauss=NULL; 2088 2073 2089 /*Initialize Element vector and return if necessary*/ 2090 if(IsOnWater()) return NULL; 2074 /*Initialize Element vector*/ 2091 2075 ElementVector* pe=new ElementVector(nodes,NUMVERTICES,this->parameters,StokesApproximationEnum); 2092 2076 … … 2257 2241 GaussTria* gauss=NULL; 2258 2242 2259 /*Initialize Element vector and return if necessary*/ 2260 if(IsOnWater()) return NULL; 2243 /*Initialize Element vector*/ 2261 2244 ElementVector* pe=new ElementVector(nodes,NUMVERTICES,this->parameters); 2262 2245 … … 2324 2307 GaussTria* gauss=NULL; 2325 2308 2326 /*Initialize Element vector and return if necessary*/ 2327 if(IsOnWater()) return NULL; 2309 /*Initialize Element vector*/ 2328 2310 ElementVector* pe=new ElementVector(nodes,NUMVERTICES,this->parameters); 2329 2311 … … 2373 2355 GaussTria* gauss=NULL; 2374 2356 2375 /*Initialize Element vector and return if necessary*/ 2376 if(IsOnWater()) return NULL; 2357 /*Initialize Element vector*/ 2377 2358 ElementVector* pe=new ElementVector(nodes,NUMVERTICES,this->parameters); 2378 2359 … … 2420 2401 GaussTria* gauss=NULL; 2421 2402 2422 /*Initialize Element vector and return if necessary*/ 2423 if(IsOnWater()) return NULL; 2403 /*Initialize Element vector*/ 2424 2404 ElementVector* pe=new ElementVector(nodes,NUMVERTICES,this->parameters); 2425 2405 … … 2475 2455 GaussTria* gauss=NULL; 2476 2456 2477 /*Initialize Element vector and return if necessary*/ 2478 if(IsOnWater()) return NULL; 2457 /*Initialize Element vector*/ 2479 2458 ElementVector* pe=new ElementVector(nodes,NUMVERTICES,this->parameters); 2480 2459 … … 2533 2512 GaussTria* gauss=NULL; 2534 2513 2535 /*Initialize Element vector and return if necessary*/ 2536 if(IsOnWater()) return NULL; 2514 /*Initialize Element vector*/ 2537 2515 ElementVector* pe=new ElementVector(nodes,NUMVERTICES,this->parameters); 2538 2516 … … 3043 3021 3044 3022 /*If on water, grad = 0: */ 3045 if(IsOnWater()) return;3023 if(IsOnWater()) return; 3046 3024 3047 3025 switch(control_type){
Note:
See TracChangeset
for help on using the changeset viewer.