/[ascend]/trunk/ascend/compiler/test/test_autodiff.c
ViewVC logotype

Diff of /trunk/ascend/compiler/test/test_autodiff.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 2546 by jpye, Mon Jan 30 20:08:37 2012 UTC revision 2547 by jpye, Mon Jan 30 20:18:26 2012 UTC
# Line 502  static void AutomateDiffTest(struct Inst Line 502  static void AutomateDiffTest(struct Inst
502                  }                  }
503                  err = fabs(err);                  err = fabs(err);
504                  LOG(data,"<tr><td>Column</td><td>ASCEND(NONSAFE,REV)</td><td>YACAS</td><td>Percentage Mismatch</td></tr>\n");                  LOG(data,"<tr><td>Column</td><td>ASCEND(NONSAFE,REV)</td><td>YACAS</td><td>Percentage Mismatch</td></tr>\n");
505                  CU_ASSERT(err <= RAD_TOL);                  //CU_ASSERT(err <= RAD_TOL);
506                  if (err > RAD_TOL) {                  if (err > RAD_TOL) {
507                        CU_FAIL("error exceeded tolerance");
508                      data->d1errors_yacas ++;                      data->d1errors_yacas ++;
509                      LOG(data,"<tr bgcolor='yellow'><td><font color='red'>%lu</font></td><td><font color='red'>%21.17g</font></td><td><font color='red'>%21.17g</font></td><td><font color='red'>%.4g</font></td></tr>\n", i,gradients_rev[i],yacas_first_der, err*100);                      LOG(data,"<tr bgcolor='yellow'><td><font color='red'>%lu</font></td><td><font color='red'>%21.17g</font></td><td><font color='red'>%21.17g</font></td><td><font color='red'>%.4g</font></td></tr>\n", i,gradients_rev[i],yacas_first_der, err*100);
510                  }                  }
# Line 520  static void AutomateDiffTest(struct Inst Line 521  static void AutomateDiffTest(struct Inst
521          }          }
522          err = fabs(err);          err = fabs(err);
523          LOG(data,"<tr><td>Column</td><td>ASCEND(NONSAFE,REV)</td><td>ASCEND(NONSAFE,FWD)</td><td>Percentage Mismatch</td></tr>\n");          LOG(data,"<tr><td>Column</td><td>ASCEND(NONSAFE,REV)</td><td>ASCEND(NONSAFE,FWD)</td><td>Percentage Mismatch</td></tr>\n");
524          CU_ASSERT(err <= RAD_TOL);          //CU_ASSERT(err <= RAD_TOL);
525          if (err > RAD_TOL) {          if (err > RAD_TOL) {
526                CONSOLE_DEBUG("Failed tolerance in first deriv #%d",i);
527                CU_FAIL("Error exceeded tolerance");
528              data->d1errors ++;              data->d1errors ++;
529              LOG(data,"<tr bgcolor='yellow'><td><font color='red'>%lu</font></td><td><font color='red'>%21.17g</font></td><td><font color='red'>%21.17g</font></td><td><font color='red'>%.4g</font></td></tr>\n", i,gradients_rev[i],gradients_fwd[i], err*100);              LOG(data,"<tr bgcolor='yellow'><td><font color='red'>%lu</font></td><td><font color='red'>%21.17g</font></td><td><font color='red'>%21.17g</font></td><td><font color='red'>%.4g</font></td></tr>\n", i,gradients_rev[i],gradients_fwd[i], err*100);
530          }          }
# Line 561  static void AutomateDiffTest(struct Inst Line 564  static void AutomateDiffTest(struct Inst
564                          err = deriv_2nd[j];                          err = deriv_2nd[j];
565                      }                      }
566                      err = fabs(err);                      err = fabs(err);
567                      CU_ASSERT(err <= RAD_TOL);                      //CU_ASSERT(err <= RAD_TOL);
568                      if (err > RAD_TOL) {                      if(err > RAD_TOL) {
569                            CU_FAIL("error exceeded tolerance");
570                          data->d2errors_yacas ++;                          data->d2errors_yacas ++;
571                          LOG(data,"<tr bgcolor='yellow'><td><font color='red'>%lu</font></td><td><font color='red'>%lu</font></td><td><font color='red'>%21.17g</font></td><td><font color='red'>%21.17g</font></td><td><font color='red'>%.4g</font></td></tr>\n", i,j,deriv_2nd[j],yacas_second_der,err*100);                          LOG(data,"<tr bgcolor='yellow'><td><font color='red'>%lu</font></td><td><font color='red'>%lu</font></td><td><font color='red'>%21.17g</font></td><td><font color='red'>%21.17g</font></td><td><font color='red'>%.4g</font></td></tr>\n", i,j,deriv_2nd[j],yacas_second_der,err*100);
572                      }                      }

Legend:
Removed from v.2546  
changed lines
  Added in v.2547

john.pye@anu.edu.au
ViewVC Help
Powered by ViewVC 1.1.22