#define BZ_TAU_PROFILING#include <blitz/array.h>BZ_USING_NAMESPACE(blitz)int main(){    TAU_PROFILE("main()", "int ()", TAU_DEFAULT);    const int N = 32;    Array<float,2> A(N,N), B(N,N), C(N,N), D(N,N), E(N,N);    A = 5.0;    B = 0.0;    C = 0.0;    for (int i=0; i < 20; ++i)    {        D = A + B + C;        D /= sum(pow2(D));        A = B * cos(D) + C * sin(D);        B += exp(-D);        float x = sum(A);        float y = sum(A+B);        float z = sum(sqr(A)+sqr(B));        C = x*A+y*B+z*C;        D = exp(-sqr(A)-sqr(B));        E = A + B + C + D;        float q = min(A);        float r = max(B);    }    return 0;}