Revision 1110 trunk/src/df1b2-separable/df1b2fn8.cpp

df1b2fn8.cpp (revision 1110)
24 24
 */
25 25
df1b2variable& df1b2variable::operator -= (const df1b2variable& _x)
26 26
{
27
  ADUNCONST(df1b2variable,x) 
27
  ADUNCONST(df1b2variable,x)
28 28
  double * xd=x.get_u_dot();
29 29
  double * zd=get_u_dot();
30 30
  *get_u()-=*x.get_u();
......
32 32
  {
33 33
    *zd++ -= *xd++;
34 34
  }
35
  
35

  
36 36
  // WRITE WHATEVER ON TAPE
37 37
  //df1b2tape->set_tapeinfo_header(&x,&z,this,xd);
38 38
  // save stuff for first reverse pass
......
48 48
 * Description not yet available.
49 49
 * \param
50 50
 */
51
int df1b2_gradlist::write_pass1_minuseq(const df1b2variable * _px, 
51
int df1b2_gradlist::write_pass1_minuseq(const df1b2variable * _px,
52 52
  df1b2variable * pz)
53 53
{
54 54
  ncount++;
......
57 57
    ncount_checker(ncount,ncount_check);
58 58
#endif
59 59
  //int nvar=df1b2variable::nvar;
60
  ADUNCONST(df1b2variable*,px) 
61
  fixed_smartlist & nlist=f1b2gradlist->nlist; 
62
  test_smartlist& list=f1b2gradlist->list; 
60
  ADUNCONST(df1b2variable*,px)
61
  fixed_smartlist & nlist=f1b2gradlist->nlist;
62
  test_smartlist& list=f1b2gradlist->list;
63 63

  
64 64
  int total_bytes=sizeof(df1b2_header)+sizeof(df1b2_header);
65 65
#if defined(SAFE_ALL)
......
72 72
#if defined(SAFE_ALL)
73 73
  memcpy(list,ids,slen);
74 74
#endif
75
  
75

  
76 76
  memcpy(list,(df1b2_header*)(px),sizeof(df1b2_header));
77 77
  memcpy(list,(df1b2_header*)(pz),sizeof(df1b2_header));
78 78

  
......
101 101
    read_pass1_minus_eq_3();
102 102
    break;
103 103
  default:
104
    cerr << "illegal value for df1b2variable::pass = " 
104
    cerr << "illegal value for df1b2variable::pass = "
105 105
         << df1b2variable::passnumber << endl;
106 106
    exit(1);
107 107
  }
......
117 117
  // the current entry+2 in bptr is the size of the record i.e
118 118
  // points to the next record
119 119
  int nvar=df1b2variable::nvar;
120
  fixed_smartlist & nlist=f1b2gradlist->nlist; 
121
  test_smartlist& list=f1b2gradlist->list; 
120
  fixed_smartlist & nlist=f1b2gradlist->nlist;
121
  test_smartlist& list=f1b2gradlist->list;
122 122
   // nlist-=sizeof(int);
123 123
  // get record size
124 124
  int num_bytes=nlist.bptr->numbytes;
......
137 137

  
138 138
  list.restoreposition(); // save pointer to beginning of record;
139 139
  int i;
140
  
140

  
141 141
  // Do first reverse paSS calculations
142 142
  // ****************************************************************
143 143
  // turn this off if no third derivatives are calculated
......
145 145
  // {
146 146
  // save for second reverse pass
147 147
  // save identifier 1
148
  //   fixed_smartlist2& nlist2=f1b2gradlist->nlist2; 
149
  //   test_smartlist& list2=f1b2gradlist->list2; 
148
  //   fixed_smartlist2& nlist2=f1b2gradlist->nlist2;
149
  //   test_smartlist& list2=f1b2gradlist->list2;
150 150
  //int total_bytes=2*nvar*sizeof(double);
151 151
// string identifier debug stuff
152 152
#if defined(SAFE_ALL)
......
166 166
  // }
167 167
  //
168 168
  // ****************************************************************
169
 
169

  
170 170
  for (i=0;i<nvar;i++)
171 171
  {
... This diff was truncated because it exceeds the maximum size that can be displayed.

Also available in: Unified diff