1. C++ / Говнокод #16712

    +51

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    QVector<double*>*** ElemBoundCond = tbc->getElementsBC();
    QVector<double*>* preNodalVals = tbc->getPreNodalValues();
    QVector<double*>* nodalForces = tbc->getNodalForces();

    long elems = grid->getElemsNumber();
    long nodes = grid->getNodesNumber();
    long** Elements = grid->getElems();
    double** Nodes = grid->getNodes();
    long* ElemMaters = grid->getElemsMaterials();
    long NBW = grid->getBandWidth();

    emit signal_addLineToCalculationProtocol(">>> Solve heat problem ");

    long    NS[4],//+numbers of 4 nodes
            NCL = 1,//number or unknown values per node (1 for thermal analysis)
            ni, nj, nk,//face nodes
            gnN, dN;
    double  ESM[4][4],//+element stiffness matrix
            EF[4],//+element force matrix
            **C,//matrix conteins X, Y, Z coordinates, rows like |1 Xi Yi Zi|
            **CA,//conteins columns like |ai bi ci di|
            //*GF,//band matrix, pointers to Global Force and Global Sriffness Matrices in A
            V36,//+hexa and 36 element volume
            S_3,//face area div 3
            hS_3, hS_6, hS_12,//h * face area div 6 and div 12
            hST_3,//h * face area * T / 3
            qS_3;//q * face area / 3
    QVector<double*>* fcond;
    MaterialsDatabase* matdb = MaterialsDatabase::getInstance();
    double  Kxx, Kyy, Kzz;//thermal condactivities in X, Y and Z axes

    И снова фортранщина.

    Запостил: Abbath, 17 Сентября 2014

    Комментарии (2) RSS

    Добавить комментарий