/[ascend]/trunk/base/generic/compiler/rel_blackbox.c
ViewVC logotype

Diff of /trunk/base/generic/compiler/rel_blackbox.c

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

revision 914 by johnpye, Thu Oct 26 13:35:25 2006 UTC revision 915 by johnpye, Sat Oct 28 07:06:22 2006 UTC
# Line 195  int BlackBoxCalcGradient(struct Instance Line 195  int BlackBoxCalcGradient(struct Instance
195      int updateNeeded, offset;      int updateNeeded, offset;
196      unsigned int k;      unsigned int k;
197      int nok = 0;      int nok = 0;
198      static int warnexpt;      static int warnexpt, warnfdiff;
199    
200      if(!warnexpt){      if(!warnexpt){
201          ERROR_REPORTER_HERE(ASC_PROG_WARNING,"Blackbox gradient is experimental (%s)",__FUNCTION__);          ERROR_REPORTER_HERE(ASC_PROG_WARNING,"Blackbox gradient is experimental (%s)",__FUNCTION__);
# Line 246  int BlackBoxCalcGradient(struct Instance Line 246  int BlackBoxCalcGradient(struct Instance
246                  , common->inputsJac, common->outputs, common->jacobian                  , common->inputsJac, common->outputs, common->jacobian
247              );              );
248          }else{          }else{
249              CONSOLE_DEBUG("COMPUTING FINITE-DIFFERENCE BLACK-BOX DERIVATIVE");              if(!warnfdiff){
250                    ERROR_REPORTER_HERE(ASC_PROG_WARNING,"Using finite-difference "
251                        " to compute derivatives for one or more black boxes in"
252                        " this model."
253                    );
254                    warnfdiff = 1;
255                }
256                            
257              nok = blackbox_fdiff(GetValueFunc(efunc), &(common->interp)              nok = blackbox_fdiff(GetValueFunc(efunc), &(common->interp)
258                  , common->inputsLen, common->outputsLen                  , common->inputsLen, common->outputsLen

Legend:
Removed from v.914  
changed lines
  Added in v.915

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