Ignore:
Timestamp:
Oct 18, 2013 6:21:31 PM (7 years ago)
Author:
bradbell
Message:

First versiont that actually skips operations (forward0sweep only).

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/opt_cond_exp/cppad/local/cskip_op.hpp

    r2968 r2969  
    123123        Base left, right;
    124124        if( arg[1] & 1 )
    125         {       CPPAD_ASSERT_UNKNOWN( size_t(arg[2]) < i_z );
     125        {       CPPAD_ASSERT_UNKNOWN( size_t(arg[2]) <= i_z );
    126126                left = taylor[ arg[2] * nc_taylor + 0 ];
    127127                CPPAD_ASSERT_UNKNOWN( IdenticalPar(left) );
     
    133133        }
    134134        if( arg[1] & 2 )
    135         {       CPPAD_ASSERT_UNKNOWN( size_t(arg[3]) < i_z );
     135        {       CPPAD_ASSERT_UNKNOWN( size_t(arg[3]) <= i_z );
    136136                right = taylor[ arg[3] * nc_taylor + 0 ];
    137137                CPPAD_ASSERT_UNKNOWN( IdenticalPar(right) );
     
    142142                CPPAD_ASSERT_UNKNOWN( IdenticalPar(right) );
    143143        }
     144
    144145
    145146        // initialize to avoid compiler warning
     
    177178        if( true_case )
    178179        {       for(size_t i = 0; i < size_t(arg[4]); i++)
    179                         cskip_var[ arg[5+i] ] = true;
     180                        cskip_var[ arg[6+i] ] = true;
    180181        }
    181182        else
    182183        {       for(size_t i = 0; i < size_t(arg[5]); i++)
    183                         cskip_var[ arg[5+arg[4]+i] ] = true;
     184                        cskip_var[ arg[6+arg[4]+i] ] = true;
    184185        }
    185186        return;
Note: See TracChangeset for help on using the changeset viewer.