Changeset 14222


Ignore:
Timestamp:
Nov 29, 2019 9:27:41 AM (6 days ago)
Author:
Christian Andersson
Message:

More cleanup of the C-code generation after review comments, ticket:5882

Location:
branches/dev-cw-2719/Compiler
Files:
7 edited

Legend:

Unmodified
Added
Removed
  • branches/dev-cw-2719/Compiler/ModelicaCBackEnd/src/jastadd/CCodeGen/CCodeGen.jrag

    r14219 r14222  
    280280
    281281    eq FVariable.name_C()           = isForIndex() ?
    282                                         C_LOOP_INDEX + "_r1[" + myFVForLoopDepth() + "]" :
     282                                        C_LOOP_INDEX + "_r1[" + (myForLoopDepth()-1) + "]" :
    283283                                        name_C("");
    284284    eq FStringVariable.name_C()     = name_C("_s_" + variabilityCausality_C());
  • branches/dev-cw-2719/Compiler/ModelicaCBackEnd/src/jastadd/CCodeGen/CCodeGenNames.jrag

    r14219 r14222  
    6868    eq FForStmt.getChild().myForLoopDepth() = myForLoopDepth() + 1;
    6969   
    70     inh int FAbstractVariable.myFVForLoopDepth();
    71     eq ASTNode.getChild().myFVForLoopDepth()       = 0;
    72     eq FForStmt.getChild().myFVForLoopDepth() = myForLoopDepth();
     70    inh int FVariable.myForLoopDepth();
    7371   
    7472    private CodeGenContext FClass.codeGenContext = new CodeGenContext();
  • branches/dev-cw-2719/Compiler/ModelicaCBackEnd/test/modelica/CCodeGenArrayTests.mo

    r14218 r14222  
    798798    JMI_DEF(REA, y_v)
    799799    JMI_DEF(REA, temp_1_v)
    800      jmi_real_t _for_loop_variables_r1[2];
    801      jmi_int_t _for_loop_variables_i1[2];
    802      jmi_int_t _for_loop_variables_i2[2];
     800    jmi_real_t _for_loop_variables_r1[2];
     801    jmi_int_t _for_loop_variables_i1[2];
     802    jmi_int_t _for_loop_variables_i2[2];
    803803    _for_loop_variables_i2[0] = 0;
    804804    _for_loop_variables_i1[0] = floor((jmi_array_size(r_a, 0)) - (1));
     
    808808        _for_loop_variables_i1[1] = floor((jmi_array_size(jmi_array_rec_1(r_a, _for_loop_variables_r1[0])->x, 0)) - (1));
    809809        for (_for_loop_variables_r1[1] = 1; _for_loop_variables_i2[1] <= _for_loop_variables_i1[1]; _for_loop_variables_r1[1] = 1 + (++(_for_loop_variables_i2[1]))) {
    810             temp_1_v = temp_1_v + jmi_array_val_1(jmi_array_rec_1(r_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[0]);
     810            temp_1_v = temp_1_v + jmi_array_val_1(jmi_array_rec_1(r_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[1]);
    811811        }
    812812        y_v = y_v + temp_1_v;
  • branches/dev-cw-2719/Compiler/ModelicaCBackEnd/test/modelica/CCodeGenCompositeStatementTests.mo

    r14218 r14222  
    9090    JMI_ARR(STACK, jmi_real_t, jmi_array_t, tmp_2, 1, 1)
    9191    JMI_ARR(STACK, R_0_r, R_0_ra, temp_1_a, 2, 1)
    92      jmi_real_t _for_loop_variables_r1[2];
    93      jmi_int_t _for_loop_variables_i1[2];
    94      jmi_int_t _for_loop_variables_i2[2];
     92    jmi_real_t _for_loop_variables_r1[2];
     93    jmi_int_t _for_loop_variables_i1[2];
     94    jmi_int_t _for_loop_variables_i2[2];
    9595    if (y_a == NULL) {
    9696        JMI_ARRAY_INIT_1(STACK, R_0_r, R_0_ra, y_an, 2, 1, 2)
     
    110110        _for_loop_variables_i1[1] = floor((1) - (1));
    111111        for (_for_loop_variables_r1[1] = 1; _for_loop_variables_i2[1] <= _for_loop_variables_i1[1]; _for_loop_variables_r1[1] = 1 + (++(_for_loop_variables_i2[1]))) {
    112             jmi_array_ref_1(jmi_array_rec_1(y_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[0]) = jmi_array_val_1(jmi_array_rec_1(temp_1_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[0]);
     112            jmi_array_ref_1(jmi_array_rec_1(y_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[1]) = jmi_array_val_1(jmi_array_rec_1(temp_1_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[1]);
    113113        }
    114114    }
     
    165165    JMI_ARR(STACK, jmi_real_t, jmi_array_t, temp_1_a, 1, 1)
    166166    JMI_ARR(STACK, R3_2_r, R3_2_ra, temp_2_a, 2, 1)
    167      jmi_real_t _for_loop_variables_r1[2];
    168      jmi_int_t _for_loop_variables_i1[2];
    169      jmi_int_t _for_loop_variables_i2[2];
     167    jmi_real_t _for_loop_variables_r1[2];
     168    jmi_int_t _for_loop_variables_i1[2];
     169    jmi_int_t _for_loop_variables_i2[2];
    170170    JMI_ARRAY_INIT_1(STACK, jmi_real_t, jmi_array_t, tmp_3, 1, 1, 1)
    171171    tmp_2->x = tmp_3;
     
    209209        _for_loop_variables_i1[1] = floor((1) - (1));
    210210        for (_for_loop_variables_r1[1] = 1; _for_loop_variables_i2[1] <= _for_loop_variables_i1[1]; _for_loop_variables_r1[1] = 1 + (++(_for_loop_variables_i2[1]))) {
    211             jmi_array_ref_1(jmi_array_rec_1(y_a, _for_loop_variables_r1[0])->r->r->x, _for_loop_variables_r1[0]) = jmi_array_val_1(jmi_array_rec_1(temp_2_a, _for_loop_variables_r1[0])->r->r->x, _for_loop_variables_r1[0]);
     211            jmi_array_ref_1(jmi_array_rec_1(y_a, _for_loop_variables_r1[0])->r->r->x, _for_loop_variables_r1[1]) = jmi_array_val_1(jmi_array_rec_1(temp_2_a, _for_loop_variables_r1[0])->r->r->x, _for_loop_variables_r1[1]);
    212212        }
    213213        jmi_array_rec_1(y_a, _for_loop_variables_r1[0])->r->x = jmi_array_rec_1(temp_2_a, _for_loop_variables_r1[0])->r->x;
     
    247247    JMI_ARR(STACK, jmi_real_t, jmi_array_t, tmp_1, 1, 1)
    248248    JMI_ARR(STACK, R1_0_r, R1_0_ra, temp_1_a, 1, 1)
    249      jmi_real_t _for_loop_variables_r1[2];
    250      jmi_int_t _for_loop_variables_i1[2];
    251      jmi_int_t _for_loop_variables_i2[2];
     249    jmi_real_t _for_loop_variables_r1[2];
     250    jmi_int_t _for_loop_variables_i1[2];
     251    jmi_int_t _for_loop_variables_i2[2];
    252252    if (y_a == NULL) {
    253253        JMI_ARRAY_INIT_1(STACK, R1_0_r, R1_0_ra, y_an, 1, 1, 1)
     
    264264        _for_loop_variables_i1[1] = floor((1) - (1));
    265265        for (_for_loop_variables_r1[1] = 1; _for_loop_variables_i2[1] <= _for_loop_variables_i1[1]; _for_loop_variables_r1[1] = 1 + (++(_for_loop_variables_i2[1]))) {
    266             jmi_array_ref_1(jmi_array_rec_1(y_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[0]) = jmi_array_val_1(jmi_array_rec_1(temp_1_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[0]);
     266            jmi_array_ref_1(jmi_array_rec_1(y_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[1]) = jmi_array_val_1(jmi_array_rec_1(temp_1_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[1]);
    267267        }
    268268    }
     
    307307    JMI_ARR(STACK, R2_1_r, R2_1_ra, temp_1_a, 1, 1)
    308308    JMI_ARR(STACK, R1_0_r, R1_0_ra, temp_2_a, 1, 1)
    309      jmi_real_t _for_loop_variables_r1[3];
    310      jmi_int_t _for_loop_variables_i1[3];
    311      jmi_int_t _for_loop_variables_i2[3];
     309    jmi_real_t _for_loop_variables_r1[3];
     310    jmi_int_t _for_loop_variables_i1[3];
     311    jmi_int_t _for_loop_variables_i2[3];
    312312    if (y_a == NULL) {
    313313        JMI_ARRAY_INIT_1(STACK, R2_1_r, R2_1_ra, y_an, 1, 1, 1)
     
    331331            _for_loop_variables_i1[2] = floor((1) - (1));
    332332            for (_for_loop_variables_r1[2] = 1; _for_loop_variables_i2[2] <= _for_loop_variables_i1[2]; _for_loop_variables_r1[2] = 1 + (++(_for_loop_variables_i2[2]))) {
    333                 jmi_array_ref_1(jmi_array_rec_1(jmi_array_rec_1(y_a, _for_loop_variables_r1[0])->r1, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[0]) = jmi_array_val_1(jmi_array_rec_1(jmi_array_rec_1(temp_1_a, _for_loop_variables_r1[0])->r1, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[0]);
     333                jmi_array_ref_1(jmi_array_rec_1(jmi_array_rec_1(y_a, _for_loop_variables_r1[0])->r1, _for_loop_variables_r1[1])->x, _for_loop_variables_r1[2]) = jmi_array_val_1(jmi_array_rec_1(jmi_array_rec_1(temp_1_a, _for_loop_variables_r1[0])->r1, _for_loop_variables_r1[1])->x, _for_loop_variables_r1[2]);
    334334            }
    335335        }
  • branches/dev-cw-2719/Compiler/ModelicaCBackEnd/test/modelica/CCodeGenExternalTests.mo

    r14218 r14222  
    22402240    JMI_DEF(INT_EXT, tmp_10)
    22412241    extern void dgeev_(const char*, const char*, int*, double*, int*, double*, double*, double*, int*, double*, int*, double*, int*, int*);
    2242      jmi_real_t _for_loop_variables_r1[2];
    2243      jmi_int_t _for_loop_variables_i1[2];
    2244      jmi_int_t _for_loop_variables_i2[2];
     2242    jmi_real_t _for_loop_variables_r1[2];
     2243    jmi_int_t _for_loop_variables_i1[2];
     2244    jmi_int_t _for_loop_variables_i2[2];
    22452245    if (eigenReal_a == NULL) {
    22462246        JMI_ARRAY_INIT_1(HEAP, jmi_real_t, jmi_array_t, eigenReal_an, jmi_array_size(A_a, 0), 1, jmi_array_size(A_a, 0))
     
    22652265        _for_loop_variables_i1[1] = floor((jmi_array_size(A_a, 0)) - (1));
    22662266        for (_for_loop_variables_r1[1] = 1; _for_loop_variables_i2[1] <= _for_loop_variables_i1[1]; _for_loop_variables_r1[1] = 1 + (++(_for_loop_variables_i2[1]))) {
    2267             jmi_array_ref_2(Awork_a, _for_loop_variables_r1[0], _for_loop_variables_r1[0]) = jmi_array_val_2(A_a, _for_loop_variables_r1[0], _for_loop_variables_r1[0]);
     2267            jmi_array_ref_2(Awork_a, _for_loop_variables_r1[0], _for_loop_variables_r1[1]) = jmi_array_val_2(A_a, _for_loop_variables_r1[0], _for_loop_variables_r1[1]);
    22682268        }
    22692269    }
  • branches/dev-cw-2719/Compiler/ModelicaCBackEnd/test/modelica/CCodeGenTests.mo

    r14218 r14222  
    908908    JMI_DEF(REA, t_v)
    909909    JMI_ARR(STACK, jmi_real_t, jmi_array_t, temp_1_a, 1, 2)
    910      jmi_real_t _for_loop_variables_r1[2];
    911      jmi_int_t _for_loop_variables_i1[2];
    912      jmi_int_t _for_loop_variables_i2[2];
     910    jmi_real_t _for_loop_variables_r1[2];
     911    jmi_int_t _for_loop_variables_i1[2];
     912    jmi_int_t _for_loop_variables_i2[2];
    913913    if (y_a == NULL) {
    914914        JMI_ARRAY_INIT_2(STACK, jmi_real_t, jmi_array_t, y_an, 1, 2, 1, 1)
     
    922922        _for_loop_variables_i1[1] = floor((1) - (1));
    923923        for (_for_loop_variables_r1[1] = 1; _for_loop_variables_i2[1] <= _for_loop_variables_i1[1]; _for_loop_variables_r1[1] = 1 + (++(_for_loop_variables_i2[1]))) {
    924             jmi_array_ref_2(temp_1_a, _for_loop_variables_r1[0], _for_loop_variables_r1[0]) = jmi_array_val_2(x_a, _for_loop_variables_r1[0], _for_loop_variables_r1[0]);
     924            jmi_array_ref_2(temp_1_a, _for_loop_variables_r1[0], _for_loop_variables_r1[1]) = jmi_array_val_2(x_a, _for_loop_variables_r1[1], _for_loop_variables_r1[0]);
    925925        }
    926926    }
     
    935935    JMI_ARR(STACK, jmi_real_t, jmi_array_t, temp_1_a, 1, 2)
    936936    JMI_ARR(STACK, jmi_real_t, jmi_array_t, temp_2_a, 1, 1)
    937      jmi_real_t _for_loop_variables_r1[2];
    938      jmi_int_t _for_loop_variables_i1[2];
    939      jmi_int_t _for_loop_variables_i2[2];
     937    jmi_real_t _for_loop_variables_r1[2];
     938    jmi_int_t _for_loop_variables_i1[2];
     939    jmi_int_t _for_loop_variables_i2[2];
    940940    if (y_a == NULL) {
    941941        JMI_ARRAY_INIT_2(STACK, jmi_real_t, jmi_array_t, y_an, 1, 2, 1, 1)
     
    956956        _for_loop_variables_i1[1] = floor((1) - (1));
    957957        for (_for_loop_variables_r1[1] = 1; _for_loop_variables_i2[1] <= _for_loop_variables_i1[1]; _for_loop_variables_r1[1] = 1 + (++(_for_loop_variables_i2[1]))) {
    958             jmi_array_ref_2(y_a, _for_loop_variables_r1[0], _for_loop_variables_r1[0]) = jmi_array_val_2(temp_1_a, _for_loop_variables_r1[0], _for_loop_variables_r1[0]);
     958            jmi_array_ref_2(y_a, _for_loop_variables_r1[0], _for_loop_variables_r1[1]) = jmi_array_val_2(temp_1_a, _for_loop_variables_r1[0], _for_loop_variables_r1[1]);
    959959        }
    960960    }
     
    967967    JMI_DEF(REA, y_v)
    968968    JMI_DEF(REA, temp_1_v)
    969      jmi_real_t _for_loop_variables_r1[2];
    970      jmi_int_t _for_loop_variables_i1[2];
    971      jmi_int_t _for_loop_variables_i2[2];
     969    jmi_real_t _for_loop_variables_r1[2];
     970    jmi_int_t _for_loop_variables_i1[2];
     971    jmi_int_t _for_loop_variables_i2[2];
    972972    temp_1_v = 0.0;
    973973    _for_loop_variables_i2[0] = 0;
     
    977977        _for_loop_variables_i1[1] = floor((jmi_array_size(x_a, 1)) - (1));
    978978        for (_for_loop_variables_r1[1] = 1; _for_loop_variables_i2[1] <= _for_loop_variables_i1[1]; _for_loop_variables_r1[1] = 1 + (++(_for_loop_variables_i2[1]))) {
    979             temp_1_v = temp_1_v + jmi_array_val_2(x_a, _for_loop_variables_r1[0], _for_loop_variables_r1[0]);
     979            temp_1_v = temp_1_v + jmi_array_val_2(x_a, _for_loop_variables_r1[0], _for_loop_variables_r1[1]);
    980980        }
    981981    }
     
    48614861    JMI_ARR(STACK, jmi_real_t, jmi_array_t, temp_3_a, 3, 1)
    48624862    JMI_ARR(STACK, jmi_real_t, jmi_array_t, temp_4_a, 3, 1)
    4863      jmi_real_t _for_loop_variables_r1[2];
    4864      jmi_int_t _for_loop_variables_i1[2];
    4865      jmi_int_t _for_loop_variables_i2[2];
     4863    jmi_real_t _for_loop_variables_r1[2];
     4864    jmi_int_t _for_loop_variables_i1[2];
     4865    jmi_int_t _for_loop_variables_i2[2];
    48664866    out_v = 1.0;
    48674867    JMI_ARRAY_INIT_1(STACK, jmi_real_t, jmi_array_t, temp_1_a, 2, 1, 2)
     
    48864886        _for_loop_variables_i1[1] = floor((3) - (1));
    48874887        for (_for_loop_variables_r1[1] = 1; _for_loop_variables_i2[1] <= _for_loop_variables_i1[1]; _for_loop_variables_r1[1] = 1 + (++(_for_loop_variables_i2[1]))) {
    4888             jmi_array_ref_1(temp_4_a, _for_loop_variables_r1[0]) = 7 + (_for_loop_variables_r1[0] - 1);
     4888            jmi_array_ref_1(temp_4_a, _for_loop_variables_r1[1]) = 7 + (_for_loop_variables_r1[1] - 1);
    48894889        }
    48904890        out_v = func_CCodeGenTests_CArrayInput8_f2_exp1(temp_4_a);
     
    49054905    JMI_DEF(REA, out_v)
    49064906    JMI_DEF(REA, temp_1_v)
    4907      jmi_real_t _for_loop_variables_r1[1];
    4908      jmi_int_t _for_loop_variables_i1[1];
    4909      jmi_int_t _for_loop_variables_i2[1];
     4907    jmi_real_t _for_loop_variables_r1[1];
     4908    jmi_int_t _for_loop_variables_i1[1];
     4909    jmi_int_t _for_loop_variables_i2[1];
    49104910    temp_1_v = 0.0;
    49114911    _for_loop_variables_i2[0] = 0;
     
    54075407    JMI_ARR(STACK, jmi_real_t, jmi_array_t, temp_4_a, 2, 1)
    54085408    JMI_ARR(STACK, jmi_real_t, jmi_array_t, temp_5_a, 2, 1)
    5409      jmi_real_t _for_loop_variables_r1[3];
    5410      jmi_int_t _for_loop_variables_i1[3];
    5411      jmi_int_t _for_loop_variables_i2[3];
     5409    jmi_real_t _for_loop_variables_r1[3];
     5410    jmi_int_t _for_loop_variables_i1[3];
     5411    jmi_int_t _for_loop_variables_i2[3];
    54125412    if (y_a == NULL) {
    54135413        JMI_ARRAY_INIT_2(HEAP, jmi_real_t, jmi_array_t, y_an, jmi_array_size(x_a, 0) * 2, 2, jmi_array_size(x_a, 0), 2)
     
    54425442            _for_loop_variables_i1[2] = floor((2) - (1));
    54435443            for (_for_loop_variables_r1[2] = 1; _for_loop_variables_i2[2] <= _for_loop_variables_i1[2]; _for_loop_variables_r1[2] = 1 + (++(_for_loop_variables_i2[2]))) {
    5444                 temp_2_v = temp_2_v + jmi_array_val_2(x_a, _for_loop_variables_r1[0], _for_loop_variables_r1[0]) * jmi_array_val_2(temp_3_a, _for_loop_variables_r1[0], _for_loop_variables_r1[0]);
     5444                temp_2_v = temp_2_v + jmi_array_val_2(x_a, _for_loop_variables_r1[0], _for_loop_variables_r1[2]) * jmi_array_val_2(temp_3_a, _for_loop_variables_r1[2], _for_loop_variables_r1[1]);
    54455445            }
    5446             jmi_array_ref_2(temp_1_a, _for_loop_variables_r1[0], _for_loop_variables_r1[0]) = temp_2_v;
     5446            jmi_array_ref_2(temp_1_a, _for_loop_variables_r1[0], _for_loop_variables_r1[1]) = temp_2_v;
    54475447        }
    54485448    }
     
    54535453        _for_loop_variables_i1[1] = floor((2) - (1));
    54545454        for (_for_loop_variables_r1[1] = 1; _for_loop_variables_i2[1] <= _for_loop_variables_i1[1]; _for_loop_variables_r1[1] = 1 + (++(_for_loop_variables_i2[1]))) {
    5455             jmi_array_ref_2(y_a, _for_loop_variables_r1[0], _for_loop_variables_r1[0]) = jmi_array_val_2(temp_1_a, _for_loop_variables_r1[0], _for_loop_variables_r1[0]);
     5455            jmi_array_ref_2(y_a, _for_loop_variables_r1[0], _for_loop_variables_r1[1]) = jmi_array_val_2(temp_1_a, _for_loop_variables_r1[0], _for_loop_variables_r1[1]);
    54565456        }
    54575457    }
     
    56895689    JMI_ARR(HEAP, jmi_real_t, jmi_array_t, temp_1_a, -1, 2)
    56905690    JMI_ARR(HEAP, jmi_real_t, jmi_array_t, temp_2_a, -1, 2)
    5691      jmi_real_t _for_loop_variables_r1[2];
    5692      jmi_int_t _for_loop_variables_i1[2];
    5693      jmi_int_t _for_loop_variables_i2[2];
     5691    jmi_real_t _for_loop_variables_r1[2];
     5692    jmi_int_t _for_loop_variables_i1[2];
     5693    jmi_int_t _for_loop_variables_i2[2];
    56945694    if (y_a == NULL) {
    56955695        JMI_ARRAY_INIT_2(HEAP, jmi_real_t, jmi_array_t, y_an, jmi_array_size(i1_a, 0) * jmi_array_size(i1_a, 0), 2, jmi_array_size(i1_a, 0), jmi_array_size(i1_a, 0))
     
    57045704        _for_loop_variables_i1[1] = floor((jmi_array_size(i2_a, 0)) - (1));
    57055705        for (_for_loop_variables_r1[1] = 1; _for_loop_variables_i2[1] <= _for_loop_variables_i1[1]; _for_loop_variables_r1[1] = 1 + (++(_for_loop_variables_i2[1]))) {
    5706             jmi_array_ref_2(temp_2_a, _for_loop_variables_r1[0], _for_loop_variables_r1[0]) = jmi_array_val_2(x_a, jmi_array_val_1(i1_a, _for_loop_variables_r1[0]), jmi_array_val_1(i2_a, _for_loop_variables_r1[0]));
     5706            jmi_array_ref_2(temp_2_a, _for_loop_variables_r1[0], _for_loop_variables_r1[1]) = jmi_array_val_2(x_a, jmi_array_val_1(i1_a, _for_loop_variables_r1[0]), jmi_array_val_1(i2_a, _for_loop_variables_r1[1]));
    57075707        }
    57085708    }
     
    57135713        _for_loop_variables_i1[1] = floor((jmi_array_size(i2_a, 0)) - (1));
    57145714        for (_for_loop_variables_r1[1] = 1; _for_loop_variables_i2[1] <= _for_loop_variables_i1[1]; _for_loop_variables_r1[1] = 1 + (++(_for_loop_variables_i2[1]))) {
    5715             jmi_array_ref_2(temp_1_a, _for_loop_variables_r1[0], _for_loop_variables_r1[0]) = jmi_array_val_2(temp_2_a, _for_loop_variables_r1[0], _for_loop_variables_r1[0]);
     5715            jmi_array_ref_2(temp_1_a, _for_loop_variables_r1[0], _for_loop_variables_r1[1]) = jmi_array_val_2(temp_2_a, _for_loop_variables_r1[0], _for_loop_variables_r1[1]);
    57165716        }
    57175717    }
     
    57225722        _for_loop_variables_i1[1] = floor((jmi_array_size(i1_a, 0)) - (1));
    57235723        for (_for_loop_variables_r1[1] = 1; _for_loop_variables_i2[1] <= _for_loop_variables_i1[1]; _for_loop_variables_r1[1] = 1 + (++(_for_loop_variables_i2[1]))) {
    5724             jmi_array_ref_2(y_a, _for_loop_variables_r1[0], _for_loop_variables_r1[0]) = jmi_array_val_2(temp_1_a, _for_loop_variables_r1[0], _for_loop_variables_r1[0]);
     5724            jmi_array_ref_2(y_a, _for_loop_variables_r1[0], _for_loop_variables_r1[1]) = jmi_array_val_2(temp_1_a, _for_loop_variables_r1[1], _for_loop_variables_r1[0]);
    57255725        }
    57265726    }
     
    57575757    JMI_ARR(HEAP, jmi_real_t, jmi_array_t, temp_1_a, -1, 2)
    57585758    JMI_ARR(HEAP, jmi_real_t, jmi_array_t, temp_2_a, -1, 2)
    5759      jmi_real_t _for_loop_variables_r1[2];
    5760      jmi_int_t _for_loop_variables_i1[2];
    5761      jmi_int_t _for_loop_variables_i2[2];
     5759    jmi_real_t _for_loop_variables_r1[2];
     5760    jmi_int_t _for_loop_variables_i1[2];
     5761    jmi_int_t _for_loop_variables_i2[2];
    57625762    if (y_a == NULL) {
    57635763        JMI_ARRAY_INIT_2(HEAP, jmi_real_t, jmi_array_t, y_an, (jmi_array_size(i1_a, 0) * 2 - 2) * jmi_array_size(i1_a, 0), 2, jmi_array_size(i1_a, 0) * 2 - 2, jmi_array_size(i1_a, 0))
     
    57725772        _for_loop_variables_i1[1] = floor((jmi_array_size(i2_a, 0)) - (1));
    57735773        for (_for_loop_variables_r1[1] = 1; _for_loop_variables_i2[1] <= _for_loop_variables_i1[1]; _for_loop_variables_r1[1] = 1 + (++(_for_loop_variables_i2[1]))) {
    5774             jmi_array_ref_2(temp_2_a, _for_loop_variables_r1[0], _for_loop_variables_r1[0]) = jmi_array_val_2(x_a, jmi_array_val_1(i1_a, _for_loop_variables_r1[0]), jmi_array_val_1(i2_a, _for_loop_variables_r1[0]));
     5774            jmi_array_ref_2(temp_2_a, _for_loop_variables_r1[0], _for_loop_variables_r1[1]) = jmi_array_val_2(x_a, jmi_array_val_1(i1_a, _for_loop_variables_r1[0]), jmi_array_val_1(i2_a, _for_loop_variables_r1[1]));
    57755775        }
    57765776    }
     
    57815781        _for_loop_variables_i1[1] = floor((jmi_array_size(i2_a, 0)) - (1));
    57825782        for (_for_loop_variables_r1[1] = 1; _for_loop_variables_i2[1] <= _for_loop_variables_i1[1]; _for_loop_variables_r1[1] = 1 + (++(_for_loop_variables_i2[1]))) {
    5783             jmi_array_ref_2(temp_1_a, _for_loop_variables_r1[0], _for_loop_variables_r1[0]) = jmi_array_val_2(temp_2_a, _for_loop_variables_r1[0], _for_loop_variables_r1[0]);
     5783            jmi_array_ref_2(temp_1_a, _for_loop_variables_r1[0], _for_loop_variables_r1[1]) = jmi_array_val_2(temp_2_a, _for_loop_variables_r1[0], _for_loop_variables_r1[1]);
    57845784        }
    57855785    }
     
    57905790        _for_loop_variables_i1[1] = floor((jmi_array_size(i1_a, 0)) - (1));
    57915791        for (_for_loop_variables_r1[1] = 1; _for_loop_variables_i2[1] <= _for_loop_variables_i1[1]; _for_loop_variables_r1[1] = 1 + (++(_for_loop_variables_i2[1]))) {
    5792             jmi_array_ref_2(y_a, _for_loop_variables_r1[0], _for_loop_variables_r1[0]) = jmi_array_val_2(temp_1_a, _for_loop_variables_r1[0], _for_loop_variables_r1[0]);
     5792            jmi_array_ref_2(y_a, _for_loop_variables_r1[0], _for_loop_variables_r1[1]) = jmi_array_val_2(temp_1_a, _for_loop_variables_r1[1], _for_loop_variables_r1[0]);
    57935793        }
    57945794    }
     
    58365836    JMI_ARR(STACK, R2_0_r, R2_0_ra, temp_2_a, 1, 1)
    58375837    JMI_ARR(STACK, jmi_real_t, jmi_array_t, temp_3_a, 1, 1)
    5838      jmi_real_t _for_loop_variables_r1[4];
    5839      jmi_int_t _for_loop_variables_i1[4];
    5840      jmi_int_t _for_loop_variables_i2[4];
     5838    jmi_real_t _for_loop_variables_r1[4];
     5839    jmi_int_t _for_loop_variables_i1[4];
     5840    jmi_int_t _for_loop_variables_i2[4];
    58415841    if (o_a == NULL) {
    58425842        JMI_ARRAY_INIT_2(HEAP, R1_1_r, R1_1_ra, o_an, m_v * m_v, 2, m_v, m_v)
     
    58605860            JMI_ARRAY_INIT_1(STACK, R2_0_r, R2_0_ra, temp_2_a, 1, 1, 1)
    58615861            JMI_ARRAY_INIT_1(STACK, jmi_real_t, jmi_array_t, temp_3_a, 1, 1, 1)
    5862             jmi_array_ref_1(temp_3_a, 1) = _for_loop_variables_r1[0] * _for_loop_variables_r1[0];
     5862            jmi_array_ref_1(temp_3_a, 1) = _for_loop_variables_r1[0] * _for_loop_variables_r1[1];
    58635863            JMI_ARRAY_INIT_1(HEAP, jmi_real_t, jmi_array_t, jmi_array_rec_1(temp_2_a, 1)->y, 1, 1, 1)
    58645864            _for_loop_variables_i2[2] = 0;
    58655865            _for_loop_variables_i1[2] = floor((1) - (1));
    58665866            for (_for_loop_variables_r1[2] = 1; _for_loop_variables_i2[2] <= _for_loop_variables_i1[2]; _for_loop_variables_r1[2] = 1 + (++(_for_loop_variables_i2[2]))) {
    5867                 jmi_array_ref_1(jmi_array_rec_1(temp_2_a, 1)->y, _for_loop_variables_r1[0]) = jmi_array_val_1(temp_3_a, _for_loop_variables_r1[0]);
     5867                jmi_array_ref_1(jmi_array_rec_1(temp_2_a, 1)->y, _for_loop_variables_r1[2]) = jmi_array_val_1(temp_3_a, _for_loop_variables_r1[2]);
    58685868            }
    5869             JMI_ARRAY_INIT_1(HEAP, R2_0_r, R2_0_ra, jmi_array_rec_1(temp_1_a, _for_loop_variables_r1[0])->x, 1, 1, 1)
     5869            JMI_ARRAY_INIT_1(HEAP, R2_0_r, R2_0_ra, jmi_array_rec_1(temp_1_a, _for_loop_variables_r1[1])->x, 1, 1, 1)
    58705870            _for_loop_variables_i2[2] = 0;
    58715871            _for_loop_variables_i1[2] = floor((1) - (1));
    58725872            for (_for_loop_variables_r1[2] = 1; _for_loop_variables_i2[2] <= _for_loop_variables_i1[2]; _for_loop_variables_r1[2] = 1 + (++(_for_loop_variables_i2[2]))) {
    5873                 JMI_ARRAY_INIT_1(HEAP, jmi_real_t, jmi_array_t, jmi_array_rec_1(jmi_array_rec_1(temp_1_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[0])->y, 1, 1, 1)
     5873                JMI_ARRAY_INIT_1(HEAP, jmi_real_t, jmi_array_t, jmi_array_rec_1(jmi_array_rec_1(temp_1_a, _for_loop_variables_r1[1])->x, _for_loop_variables_r1[2])->y, 1, 1, 1)
    58745874                _for_loop_variables_i2[3] = 0;
    58755875                _for_loop_variables_i1[3] = floor((1) - (1));
    58765876                for (_for_loop_variables_r1[3] = 1; _for_loop_variables_i2[3] <= _for_loop_variables_i1[3]; _for_loop_variables_r1[3] = 1 + (++(_for_loop_variables_i2[3]))) {
    5877                     jmi_array_ref_1(jmi_array_rec_1(jmi_array_rec_1(temp_1_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[0])->y, _for_loop_variables_r1[0]) = jmi_array_val_1(jmi_array_rec_1(temp_2_a, _for_loop_variables_r1[0])->y, _for_loop_variables_r1[0]);
     5877                    jmi_array_ref_1(jmi_array_rec_1(jmi_array_rec_1(temp_1_a, _for_loop_variables_r1[1])->x, _for_loop_variables_r1[2])->y, _for_loop_variables_r1[3]) = jmi_array_val_1(jmi_array_rec_1(temp_2_a, _for_loop_variables_r1[2])->y, _for_loop_variables_r1[3]);
    58785878                }
    58795879            }
     
    58885888                _for_loop_variables_i1[3] = floor((1) - (1));
    58895889                for (_for_loop_variables_r1[3] = 1; _for_loop_variables_i2[3] <= _for_loop_variables_i1[3]; _for_loop_variables_r1[3] = 1 + (++(_for_loop_variables_i2[3]))) {
    5890                     jmi_array_ref_1(jmi_array_rec_1(jmi_array_rec_2(o_a, _for_loop_variables_r1[0], _for_loop_variables_r1[0])->x, _for_loop_variables_r1[0])->y, _for_loop_variables_r1[0]) = jmi_array_val_1(jmi_array_rec_1(jmi_array_rec_1(temp_1_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[0])->y, _for_loop_variables_r1[0]);
     5890                    jmi_array_ref_1(jmi_array_rec_1(jmi_array_rec_2(o_a, _for_loop_variables_r1[0], _for_loop_variables_r1[1])->x, _for_loop_variables_r1[2])->y, _for_loop_variables_r1[3]) = jmi_array_val_1(jmi_array_rec_1(jmi_array_rec_1(temp_1_a, _for_loop_variables_r1[1])->x, _for_loop_variables_r1[2])->y, _for_loop_variables_r1[3]);
    58915891                }
    58925892            }
     
    61476147    JMI_ARR(HEAP, jmi_real_t, jmi_array_t, y_an, -1, 1)
    61486148    JMI_ARR(HEAP, jmi_real_t, jmi_array_t, temp_1_a, -1, 1)
    6149      jmi_real_t _for_loop_variables_r1[2];
    6150      jmi_int_t _for_loop_variables_i1[2];
    6151      jmi_int_t _for_loop_variables_i2[2];
     6149    jmi_real_t _for_loop_variables_r1[2];
     6150    jmi_int_t _for_loop_variables_i1[2];
     6151    jmi_int_t _for_loop_variables_i2[2];
    61526152    if (y_a == NULL) {
    61536153        JMI_ARRAY_INIT_1(HEAP, jmi_real_t, jmi_array_t, y_an, jmi_array_size(x_a, 0) * 2, 1, jmi_array_size(x_a, 0) * 2)
     
    61616161        _for_loop_variables_i1[1] = floor((jmi_array_size(x_a, 0)) - (1));
    61626162        for (_for_loop_variables_r1[1] = 1; _for_loop_variables_i2[1] <= _for_loop_variables_i1[1]; _for_loop_variables_r1[1] = 1 + (++(_for_loop_variables_i2[1]))) {
    6163             jmi_array_ref_1(temp_1_a, _for_loop_variables_r1[0]) = jmi_array_val_1(x_a, _for_loop_variables_r1[0]);
     6163            jmi_array_ref_1(temp_1_a, _for_loop_variables_r1[1]) = jmi_array_val_1(x_a, _for_loop_variables_r1[1]);
    61646164        }
    61656165        _for_loop_variables_i2[1] = 0;
    61666166        _for_loop_variables_i1[1] = floor((JMI_MAX_EQUATION(_for_loop_variables_r1[0], 0.0)) - (1));
    61676167        for (_for_loop_variables_r1[1] = 1; _for_loop_variables_i2[1] <= _for_loop_variables_i1[1]; _for_loop_variables_r1[1] = 1 + (++(_for_loop_variables_i2[1]))) {
    6168             jmi_array_ref_1(temp_1_a, _for_loop_variables_r1[0] + jmi_array_size(x_a, 0)) = _for_loop_variables_r1[0];
     6168            jmi_array_ref_1(temp_1_a, _for_loop_variables_r1[1] + jmi_array_size(x_a, 0)) = _for_loop_variables_r1[1];
    61696169        }
    61706170        _for_loop_variables_i2[1] = 0;
    61716171        _for_loop_variables_i1[1] = floor((jmi_array_size(x_a, 0) * 2) - (1));
    61726172        for (_for_loop_variables_r1[1] = 1; _for_loop_variables_i2[1] <= _for_loop_variables_i1[1]; _for_loop_variables_r1[1] = 1 + (++(_for_loop_variables_i2[1]))) {
    6173             jmi_array_ref_1(y_a, _for_loop_variables_r1[0]) = jmi_array_val_1(temp_1_a, _for_loop_variables_r1[0]);
     6173            jmi_array_ref_1(y_a, _for_loop_variables_r1[1]) = jmi_array_val_1(temp_1_a, _for_loop_variables_r1[1]);
    61746174        }
    61756175    }
     
    65626562    JMI_ARR(STACK, B_0_r, B_0_ra, temp_3_a, 2, 1)
    65636563    JMI_ARR(STACK, B_0_r, B_0_ra, temp_4_a, 2, 1)
    6564      jmi_real_t _for_loop_variables_r1[2];
    6565      jmi_int_t _for_loop_variables_i1[2];
    6566      jmi_int_t _for_loop_variables_i2[2];
     6564    jmi_real_t _for_loop_variables_r1[2];
     6565    jmi_int_t _for_loop_variables_i1[2];
     6566    jmi_int_t _for_loop_variables_i2[2];
    65676567    JMI_ARRAY_INIT_1(STACK, A_1_r, A_1_ra, x_a, 3, 1, 3)
    65686568    JMI_ARRAY_INIT_1(STACK, B_0_r, B_0_ra, tmp_1, 2, 1, 2)
     
    65956595        _for_loop_variables_i1[1] = floor((2) - (1));
    65966596        for (_for_loop_variables_r1[1] = 1; _for_loop_variables_i2[1] <= _for_loop_variables_i1[1]; _for_loop_variables_r1[1] = 1 + (++(_for_loop_variables_i2[1]))) {
    6597             jmi_array_rec_1(jmi_array_rec_1(x_a, _for_loop_variables_r1[0])->b, _for_loop_variables_r1[0])->c = jmi_array_rec_1(jmi_array_rec_1(temp_1_a, _for_loop_variables_r1[0])->b, _for_loop_variables_r1[0])->c;
     6597            jmi_array_rec_1(jmi_array_rec_1(x_a, _for_loop_variables_r1[0])->b, _for_loop_variables_r1[1])->c = jmi_array_rec_1(jmi_array_rec_1(temp_1_a, _for_loop_variables_r1[0])->b, _for_loop_variables_r1[1])->c;
    65986598        }
    65996599    }
     
    68306830    JMI_ARR(STACK, B_0_r, B_0_ra, temp_3_a, 2, 1)
    68316831    JMI_ARR(STACK, B_0_r, B_0_ra, temp_4_a, 2, 1)
    6832      jmi_real_t _for_loop_variables_r1[2];
    6833      jmi_int_t _for_loop_variables_i1[2];
    6834      jmi_int_t _for_loop_variables_i2[2];
     6832    jmi_real_t _for_loop_variables_r1[2];
     6833    jmi_int_t _for_loop_variables_i1[2];
     6834    jmi_int_t _for_loop_variables_i2[2];
    68356835    if (x_a == NULL) {
    68366836        JMI_ARRAY_INIT_1(STACK, A_1_r, A_1_ra, x_an, 3, 1, 3)
     
    68666866        _for_loop_variables_i1[1] = floor((2) - (1));
    68676867        for (_for_loop_variables_r1[1] = 1; _for_loop_variables_i2[1] <= _for_loop_variables_i1[1]; _for_loop_variables_r1[1] = 1 + (++(_for_loop_variables_i2[1]))) {
    6868             jmi_array_rec_1(jmi_array_rec_1(x_a, _for_loop_variables_r1[0])->b, _for_loop_variables_r1[0])->c = jmi_array_rec_1(jmi_array_rec_1(temp_1_a, _for_loop_variables_r1[0])->b, _for_loop_variables_r1[0])->c;
     6868            jmi_array_rec_1(jmi_array_rec_1(x_a, _for_loop_variables_r1[0])->b, _for_loop_variables_r1[1])->c = jmi_array_rec_1(jmi_array_rec_1(temp_1_a, _for_loop_variables_r1[0])->b, _for_loop_variables_r1[1])->c;
    68696869        }
    68706870    }
     
    1375813758    JMI_DEF(INT_EXT, tmp_6)
    1375913759    extern void dgesv_(int*, int*, double*, int*, int*, double*, int*, int*);
    13760      jmi_real_t _for_loop_variables_r1[2];
    13761      jmi_int_t _for_loop_variables_i1[2];
    13762      jmi_int_t _for_loop_variables_i2[2];
     13760    jmi_real_t _for_loop_variables_r1[2];
     13761    jmi_int_t _for_loop_variables_i1[2];
     13762    jmi_int_t _for_loop_variables_i2[2];
    1376313763    if (x_a == NULL) {
    1376413764        JMI_ARRAY_INIT_1(HEAP, jmi_real_t, jmi_array_t, x_an, jmi_array_size(A_a, 0), 1, jmi_array_size(A_a, 0))
     
    1377713777        _for_loop_variables_i1[1] = floor((jmi_array_size(A_a, 0)) - (1));
    1377813778        for (_for_loop_variables_r1[1] = 1; _for_loop_variables_i2[1] <= _for_loop_variables_i1[1]; _for_loop_variables_r1[1] = 1 + (++(_for_loop_variables_i2[1]))) {
    13779             jmi_array_ref_2(Awork_a, _for_loop_variables_r1[0], _for_loop_variables_r1[0]) = jmi_array_val_2(A_a, _for_loop_variables_r1[0], _for_loop_variables_r1[0]);
     13779            jmi_array_ref_2(Awork_a, _for_loop_variables_r1[0], _for_loop_variables_r1[1]) = jmi_array_val_2(A_a, _for_loop_variables_r1[0], _for_loop_variables_r1[1]);
    1378013780        }
    1378113781    }
     
    1385413854    JMI_DEF(INT_EXT, tmp_6)
    1385513855    extern void dgesv_(int*, int*, double*, int*, int*, double*, int*, int*);
    13856      jmi_real_t _for_loop_variables_r1[2];
    13857      jmi_int_t _for_loop_variables_i1[2];
    13858      jmi_int_t _for_loop_variables_i2[2];
     13856    jmi_real_t _for_loop_variables_r1[2];
     13857    jmi_int_t _for_loop_variables_i1[2];
     13858    jmi_int_t _for_loop_variables_i2[2];
    1385913859    if (X_a == NULL) {
    1386013860        JMI_ARRAY_INIT_2(HEAP, jmi_real_t, jmi_array_t, X_an, jmi_array_size(A_a, 0) * jmi_array_size(B_a, 1), 2, jmi_array_size(A_a, 0), jmi_array_size(B_a, 1))
     
    1386713867        _for_loop_variables_i1[1] = floor((jmi_array_size(B_a, 1)) - (1));
    1386813868        for (_for_loop_variables_r1[1] = 1; _for_loop_variables_i2[1] <= _for_loop_variables_i1[1]; _for_loop_variables_r1[1] = 1 + (++(_for_loop_variables_i2[1]))) {
    13869             jmi_array_ref_2(X_a, _for_loop_variables_r1[0], _for_loop_variables_r1[0]) = jmi_array_val_2(B_a, _for_loop_variables_r1[0], _for_loop_variables_r1[0]);
     13869            jmi_array_ref_2(X_a, _for_loop_variables_r1[0], _for_loop_variables_r1[1]) = jmi_array_val_2(B_a, _for_loop_variables_r1[0], _for_loop_variables_r1[1]);
    1387013870        }
    1387113871    }
     
    1387713877        _for_loop_variables_i1[1] = floor((jmi_array_size(A_a, 0)) - (1));
    1387813878        for (_for_loop_variables_r1[1] = 1; _for_loop_variables_i2[1] <= _for_loop_variables_i1[1]; _for_loop_variables_r1[1] = 1 + (++(_for_loop_variables_i2[1]))) {
    13879             jmi_array_ref_2(Awork_a, _for_loop_variables_r1[0], _for_loop_variables_r1[0]) = jmi_array_val_2(A_a, _for_loop_variables_r1[0], _for_loop_variables_r1[0]);
     13879            jmi_array_ref_2(Awork_a, _for_loop_variables_r1[0], _for_loop_variables_r1[1]) = jmi_array_val_2(A_a, _for_loop_variables_r1[0], _for_loop_variables_r1[1]);
    1388013880        }
    1388113881    }
  • branches/dev-cw-2719/Compiler/ModelicaMiddleEnd/test/modelica/Differentiation.mo

    r14218 r14222  
    31913191    JMI_DEF(REA, y_v)
    31923192    JMI_ARR(STACK, R_0_r, R_0_ra, temp_1_a, 1, 1)
    3193      jmi_real_t _for_loop_variables_r1[2];
    3194      jmi_int_t _for_loop_variables_i1[2];
    3195      jmi_int_t _for_loop_variables_i2[2];
     3193    jmi_real_t _for_loop_variables_r1[2];
     3194    jmi_int_t _for_loop_variables_i1[2];
     3195    jmi_int_t _for_loop_variables_i2[2];
    31963196    JMI_ARRAY_INIT_1(STACK, R_0_r, R_0_ra, rt_a, 1, 1, 1)
    31973197    JMI_ARRAY_INIT_1(STACK, jmi_real_t, jmi_array_t, tmp_1, 1, 1, 1)
     
    32053205        _for_loop_variables_i1[1] = floor((1) - (1));
    32063206        for (_for_loop_variables_r1[1] = 1; _for_loop_variables_i2[1] <= _for_loop_variables_i1[1]; _for_loop_variables_r1[1] = 1 + (++(_for_loop_variables_i2[1]))) {
    3207             jmi_array_ref_1(jmi_array_rec_1(rt_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[0]) = jmi_array_val_1(jmi_array_rec_1(temp_1_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[0]);
     3207            jmi_array_ref_1(jmi_array_rec_1(rt_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[1]) = jmi_array_val_1(jmi_array_rec_1(temp_1_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[1]);
    32083208        }
    32093209    }
     
    32313231    JMI_ARR(STACK, R_0_r, R_0_ra, y_an, 1, 1)
    32323232    JMI_ARR(STACK, jmi_real_t, jmi_array_t, tmp_1, 1, 1)
    3233      jmi_real_t _for_loop_variables_r1[2];
    3234      jmi_int_t _for_loop_variables_i1[2];
    3235      jmi_int_t _for_loop_variables_i2[2];
     3233    jmi_real_t _for_loop_variables_r1[2];
     3234    jmi_int_t _for_loop_variables_i1[2];
     3235    jmi_int_t _for_loop_variables_i2[2];
    32363236    if (y_a == NULL) {
    32373237        JMI_ARRAY_INIT_1(STACK, R_0_r, R_0_ra, y_an, 1, 1, 1)
     
    32533253        _for_loop_variables_i1[1] = floor((1) - (1));
    32543254        for (_for_loop_variables_r1[1] = 1; _for_loop_variables_i2[1] <= _for_loop_variables_i1[1]; _for_loop_variables_r1[1] = 1 + (++(_for_loop_variables_i2[1]))) {
    3255             jmi_array_ref_1(jmi_array_rec_1(y_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[0]) = jmi_array_val_1(jmi_array_rec_1(x_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[0]);
     3255            jmi_array_ref_1(jmi_array_rec_1(y_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[1]) = jmi_array_val_1(jmi_array_rec_1(x_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[1]);
    32563256        }
    32573257    }
     
    32703270    JMI_ARR(STACK, R_0_r, R_0_ra, temp_1_a, 1, 1)
    32713271    JMI_ARR(STACK, R_0_r, R_0_ra, _der_temp_1_a, 1, 1)
    3272      jmi_real_t _for_loop_variables_r1[2];
    3273      jmi_int_t _for_loop_variables_i1[2];
    3274      jmi_int_t _for_loop_variables_i2[2];
     3272    jmi_real_t _for_loop_variables_r1[2];
     3273    jmi_int_t _for_loop_variables_i1[2];
     3274    jmi_int_t _for_loop_variables_i2[2];
    32753275    JMI_ARRAY_INIT_1(STACK, R_0_r, R_0_ra, rt_a, 1, 1, 1)
    32763276    JMI_ARRAY_INIT_1(STACK, jmi_real_t, jmi_array_t, tmp_1, 1, 1, 1)
     
    32893289        _for_loop_variables_i1[1] = floor((1) - (1));
    32903290        for (_for_loop_variables_r1[1] = 1; _for_loop_variables_i2[1] <= _for_loop_variables_i1[1]; _for_loop_variables_r1[1] = 1 + (++(_for_loop_variables_i2[1]))) {
    3291             jmi_array_ref_1(jmi_array_rec_1(_der_rt_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[0]) = jmi_array_val_1(jmi_array_rec_1(_der_temp_1_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[0]);
    3292             jmi_array_ref_1(jmi_array_rec_1(rt_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[0]) = jmi_array_val_1(jmi_array_rec_1(temp_1_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[0]);
     3291            jmi_array_ref_1(jmi_array_rec_1(_der_rt_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[1]) = jmi_array_val_1(jmi_array_rec_1(_der_temp_1_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[1]);
     3292            jmi_array_ref_1(jmi_array_rec_1(rt_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[1]) = jmi_array_val_1(jmi_array_rec_1(temp_1_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[1]);
    32933293        }
    32943294    }
     
    33193319    JMI_ARR(STACK, R_0_r, R_0_ra, y_a, 1, 1)
    33203320    JMI_ARR(STACK, jmi_real_t, jmi_array_t, tmp_2, 1, 1)
    3321      jmi_real_t _for_loop_variables_r1[2];
    3322      jmi_int_t _for_loop_variables_i1[2];
    3323      jmi_int_t _for_loop_variables_i2[2];
     3321    jmi_real_t _for_loop_variables_r1[2];
     3322    jmi_int_t _for_loop_variables_i1[2];
     3323    jmi_int_t _for_loop_variables_i2[2];
    33243324    JMI_ARRAY_INIT_1(STACK, R_0_r, R_0_ra, y_a, 1, 1, 1)
    33253325    JMI_ARRAY_INIT_1(STACK, jmi_real_t, jmi_array_t, tmp_2, 1, 1, 1)
     
    33443344        _for_loop_variables_i1[1] = floor((1) - (1));
    33453345        for (_for_loop_variables_r1[1] = 1; _for_loop_variables_i2[1] <= _for_loop_variables_i1[1]; _for_loop_variables_r1[1] = 1 + (++(_for_loop_variables_i2[1]))) {
    3346             jmi_array_ref_1(jmi_array_rec_1(_der_y_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[0]) = jmi_array_val_1(jmi_array_rec_1(_der_x_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[0]);
    3347             jmi_array_ref_1(jmi_array_rec_1(y_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[0]) = jmi_array_val_1(jmi_array_rec_1(x_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[0]);
     3346            jmi_array_ref_1(jmi_array_rec_1(_der_y_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[1]) = jmi_array_val_1(jmi_array_rec_1(_der_x_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[1]);
     3347            jmi_array_ref_1(jmi_array_rec_1(y_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[1]) = jmi_array_val_1(jmi_array_rec_1(x_a, _for_loop_variables_r1[0])->x, _for_loop_variables_r1[1]);
    33483348        }
    33493349    }
Note: See TracChangeset for help on using the changeset viewer.