## Known Problems/Bugs

• Research Interests: Errors are observed on the CfdTmPeople page when certain punctuation characters are included into the Research Interests form of a users homepage. Specifically, the inclusion of a hyphen as in 'RANS-LES' corrupts the search algorithm on CfdTmPeople.

%SYNTAX{ syntax="fortran" }% c C------------------------- weak realisibility DO II = 1, 3 DO JJ = 1, 3 IF(II.NE.JJ)THEN IF(XRIJ(II,JJ).LT.0.D0)THEN XRIJ(II,JJ) = & MAX(XRIJ(II,JJ),-SQRT(XRIJ(II,II)*XRIJ(JJ,JJ))) ELSEIF(XRIJ(II,JJ).GE.0.D0)THEN XRIJ(II,JJ) = & MIN(XRIJ(II,JJ),SQRT(XRIJ(II,II)*XRIJ(JJ,JJ))) ENDIF ENDIF ENDDO ENDDO C C----------------------- ANISOTROPY C DO II = 1, 3 DO JJ = 1, 3 IF(II.EQ.JJ)THEN XAIJ(II,II) = (XRIJ(II,II)/XK)-TTD IF(ILIMAIJ.EQ.1)THEN XAIJ(II,II) = MIN(FTD,MAX(-TTD,XAIJ(II,II))) ENDIF AIJ(IEL,II) = XAIJ(II,II) ELSEIF(II.NE.JJ)THEN XAIJ(II,JJ) = (XRIJ(II,JJ)/XK) IF(ILIMAIJ.EQ.1)THEN XAIJ(II,JJ) = MIN(1.D0,MAX(-1.D0,XAIJ(II,JJ))) ENDIF ENDIF AINV2 = AINV2 + XAIJ(II,JJ)**2 ENDDO ENDDO C ABAR = SQRT(AINV2) AIJ(IEL,4) = XAIJ(1,2) AIJ(IEL,5) = XAIJ(1,3) AIJ(IEL,6) = XAIJ(2,3) C DO II = 1, 3 DO JJ = 1, 3 DO KK = 1, 3 SAA = SAA + XSIJ(II,JJ)*XAIJ(II,KK)*XAIJ(JJ,KK) SSA = SSA + XSIJ(II,JJ)*XAIJ(II,KK)*XSIJ(JJ,KK) SRA = SRA + XSIJ(II,JJ)*XAIJ(II,KK)*XWIJ(JJ,KK) ENDDO ENDDO ENDDO

%ENDSYNTAX%

• Mostpopular :
%MOSTPOPULAR{limit="10" format="
• \$web.\$topic (\$views)

Current Tags:
create new tag
, view all tags
Topic revision: r3 - 2007-10-11 - 11:32:16 - AlistairRevell
Main Web
23 Aug 2019

Manchester CfdTm
Code_Saturne

ATAAC
KNOO

DESider
FLOMANIA