source:
issm/oecreview/Archive/25834-26739/ISSM-26244-26245.diff@
27230
Last change on this file since 27230 was 26740, checked in by , 3 years ago | |
---|---|
File size: 1.5 KB |
-
../trunk-jpl/src/c/classes/Node.cpp
790 790 /*}}}*/ 791 791 int Node::FSize(void){/*{{{*/ 792 792 793 _assert_(this && this->gdoflist);793 _assert_(this!=NULL && this->gdoflist); 794 794 795 795 int fsize = 0; 796 796 for(int i=0;i<this->gsize;i++) if(this->f_set[i]) fsize++; … … 799 799 /*}}}*/ 800 800 int Node::SSize(void){/*{{{*/ 801 801 802 _assert_(this && this->s_set);802 _assert_(this!=NULL && this->s_set); 803 803 804 804 int ssize = 0; 805 805 for(int i=0;i<this->gsize;i++) if(this->s_set[i]) ssize++; -
../trunk-jpl/src/c/cores/love_core.cpp
130 130 int nt=nfreq/2/NTit; 131 131 132 132 indf=d*nfreq+t*2*NTit; 133 doubletype LoveM[NTit];133 doubletype* LoveM = xNew<doubletype>(NTit); 134 134 135 135 for (int M=1;M<NTit+1;M++){ 136 136 LoveM[M-1]=0.0; … … 857 857 858 858 if(VerboseModule() && info!=0){ 859 859 _printf0_("love core warning in DGESV : LAPACK linear equation solver couldn't resolve the system"); 860 printf("%s %s %s %s\n", "i","j","yi[i+nyi*j]","rhs[i]");860 _printf_("i j yi[i+nyi*j] rhs[i]"); 861 861 for (int i=0;i<nyi;i++){ 862 862 for (int j=0;j<nyi;j++){ 863 printf("%i %i %e %e\n", i,j,yi[i+nyi*j],rhs[i]);863 _printf_(i<<" "<<j<<" "<<yi[i+nyi*j]<<" "<<rhs[i]<<"\n"); 864 864 } 865 865 } 866 866 }
Note:
See TracBrowser
for help on using the repository browser.