source: issm/oecreview/Archive/19101-20495/ISSM-19990-19991.diff@ 20498

Last change on this file since 20498 was 20498, checked in by Mathieu Morlighem, 9 years ago

CHG: done with Archive/19101-20495
File size: 687 bytes
RevLine 
[20498]1Index: ../trunk-jpl/src/c/classes/Elements/Tria.cpp
2===================================================================
3--- ../trunk-jpl/src/c/classes/Elements/Tria.cpp (revision 19990)
4+++ ../trunk-jpl/src/c/classes/Elements/Tria.cpp (revision 19991)
5@@ -3640,7 +3640,7 @@
6 if(computeelastic){
7 G_elastic = (love_k[nl-1]-love_h[nl-1])/2.0/sin(alpha/2.0);
8 if(legendre_precompute){
9- for(int n=0;n<nl;n++) G_elastic += deltalove[n]*legendre_coefficients[(int)((M-1)*(cosalpha+1.0)/2.0)*nl+n];
10+ for(int n=0;n<nl;n++) G_elastic += deltalove[n]*legendre_coefficients[reCast<int,IssmDouble>((M-1)*(cosalpha+1.0)/2.0)*nl+n];
11 }
12 else{
13 for(int n=0;n<nl;n++){
Note: See TracBrowser for help on using the repository browser.