test_fclayer_delta_propagation.cpp

#include <Pds/Ra>
#include <Pds/Nn>
 
int main(void)
{        
    Pds::Vector X="1 4 1 2 -1";
    X.Print("<<X>>\n");
    Pds::Vector Y="-1 1";
    Y.Print("<<Y>>\n");
    
    Pds::FCLayer L1=Pds::FCLayer(5,8,Pds::Sigmoid,Pds::DSigmoid);
    Pds::FCLayer L2=Pds::FCLayer(8,2,Pds::Sigmoid,Pds::DSigmoid);
    
    Pds::Vector A1(8), Z1(8);        
    L1.Evaluate(X,A1,Z1);
    A1.Print("\n<<A1>>\n");
    Z1.Print("<<Z1>>\n");
        
    Pds::Vector A2(2), Z2(2);        
    L2.Evaluate(A1,A2,Z2);
    A2.Print("\n<<A2>>\n");
    Z2.Print("<<Z2>>\n");
    
    Pds::Vector d2=(A2-Y);
    d2.Print("\n<<d2>>\n");
    
    Pds::Vector d1(8);
    L2.DeltaPropagation(d2,Z1,d1);
    d1.Print("<<d1>>\n");
    
    L2.DeltaPropagationSigmoid(d2,A1,d1);
    d1.Print("<<d1>>\n");
    return 0;
}