Revision 1550 trunk/src/nh99/newmodm2.cpp

newmodm2.cpp (revision 1550)
43 43
    dmatrix h(1,nvar,1,nvar);
44 44
    //dmatrix gram(1,nvar-1,1,nvar-1);
45 45
    dvector ss(1,nvar);
46
    double minsize;
47 46
    ifs >> h;
48 47
    if (!ifs)
49 48
    {
......
65 64
    {
66 65
      ss(i)=norm(p(i));
67 66
    }
68
    minsize=min(ss);
69 67

  
70 68
  /*
69
    double minsize=min(ss);
71 70
    for (i=1;i<=nvar;i++)
72 71
    {
73 72
      if (ss(i)==minsize) break;

Also available in: Unified diff