← Back to branch summary

~ubuntu-branches/ubuntu/utopic/r-cran-genabel/utopic

« back to all changes in this revision

Viewing changes to src/dometa.cpp

  • Committer: Package Import Robot
  • Author(s): Andreas Tille, Charles Plessy, Andreas Tille
  • Date: 2014-08-07 17:30:04 UTC
  • mfrom: (1.1.6)
  • Revision ID: package-import@ubuntu.com-20140807173004-24c20tmrw61yl5dz
Tags: 1.8-0-1
[ Charles Plessy ]
* debian/control: removed myself from Uploaders.

[ Andreas Tille ]
* New upstream version
* Moved debian/upstream to debian/upstream/metadata
* cme fix dpkg-control
* More detailed copyright

Show diffs side-by-side

added added

removed removed

Lines of Context:
src/dometa.cpp
48
48
 
49
49
unsigned num_el = *num;
50
50
 
51
 
double se_set1, se_set2, wt2_set1, wt2_set2, invsumwt2;
 
51
 
 
52
double wt2_set1, wt2_set2, invsumwt2;
52
53
 
53
54
 
54
55
double *lambda_set1, *lambda_set2;
76
77
 
77
78
for(unsigned i=0 ; i<num_el ; i++)
78
79
        {
79
 
        se_set1 = sqrt(sebeta_set1[i]*sebeta_set1[i]*lambda_set1[i]);
80
 
        se_set2 = sqrt(sebeta_set2[i]*sebeta_set2[i]*lambda_set2[i]);
 
80
        //static double se_set1; 
 
81
        //static double se_set2; 
 
82
 
 
83
        //se_set1 = sqrt(sebeta_set1[i]*sebeta_set1[i]*lambda_set1[i]);
 
84
        //se_set2 = sqrt(sebeta_set2[i]*sebeta_set2[i]*lambda_set2[i]);
81
85
        
82
86
        wt2_set1 = 1./(sebeta_set1[i]*sebeta_set1[i]);
83
87
        wt2_set2 = 1./(sebeta_set2[i]*sebeta_set2[i]);