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.

Check out some Fortran code in full color syntax. Check out some Fortran code in full color syntax.
%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)
  • " noheader="on"}%

Current Tags:
create new tag
, view all tags
Topic revision: r3 - 2007-10-11 - 11:32:16 - AlistairRevell
Main Web
12 Dec 2017

Site

Manchester CfdTm
Code_Saturne

Ongoing Projects

ATAAC
KNOO

Previous Projects

DESider
FLOMANIA

Useful Links:

User Directory
Photo Wall
Upcoming Events
Add Event
 

Computational Fluid Dynamics and Turbulence Mechanics
@ the University of Manchester
Copyright © by the contributing authors. Unless noted otherwise, all material on this web site is the property of the contributing authors.