CFD Online Logo CFD Online URL
www.cfd-online.com
[Sponsors]
Home > Forums > Main CFD Forum

How can generate Uniform Cartesian grid?

Register Blogs Members List Search Today's Posts Mark Forums Read

Reply
 
LinkBack Thread Tools Display Modes
Old   January 16, 2008, 05:49
Default Re: How can generate Uniform Cartesian grid?
  #21
Harry
Guest
 
Posts: n/a
Rt, Have you sent me your simple-version code? I guess you miss ed my last message. My email address is s.b.kuang@gmail.com. Thanks for your help. Cheers, Harry
  Reply With Quote

Old   January 17, 2008, 04:50
Default Re: How can generate Uniform Cartesian grid?
  #22
BastiL
Guest
 
Posts: n/a
I am also interested in the changes done for compiling the code with gfortran. I am struggeling with that.
  Reply With Quote

Old   January 17, 2008, 18:40
Default Re: How can generate Uniform Cartesian grid?
  #23
marco
Guest
 
Posts: n/a
For these errors:

1)

IF(FLG_OCTREE) CALL MAKE_REMAINED_LEVELS

1 Error: ELSE IF clause at (1) requires a scalar LOGICAL expression In file CartGen.f90:139 you have to add ".EQ.1" to the if condition, that should be as IF(TRUE) ....

2) DO WHILE(FLG)

1 Error: Exit condition of DO WHILE loop at (1) must be a scalar LOGICAL expression In file CartGen.f90:1298

for this the same as before.

3) delete line 129 and 141 for TIMEF()

4) opening STL file change ACCESS and FORM:

!OPEN(UNIT=1,FILE=FNAME(IFF),ACCESS='DIRECT',FORM= 'BINARY',RECL=2) OPEN(UNIT=1,FILE=FNAME(IFF),ACCESS='STREAM',FORM=' UNFORMATTED',RECL=2)

5) the same for this line:

OPEN(UNIT=1,FILE=FNAME(IFF),ACCESS='STREAM',FORM=' UNFORMATTED',RECL=2) !OPEN(UNIT=1,FILE=FNAME(IFF),ACCESS='DIRECT',FORM= 'BINARY',RECL=2)

6) change line 1707 and 1855 :

!open(unit=ivtk,file=VTKFILE,form='binary',convert ='BIG_ENDIAN') OPEN(unit=ivtk,file=VTKFILE,ACCESS='STREAM',FORM=' UNFORMATTED')

but when I generate the binary VTK file I'm not be able to read it with paraview. I don't know if this is due to this last modification. Reading gfortran documentation CONVERT should be available, but only deleting it I compile the code.

My e-mail is: iota2@libero.it

  Reply With Quote

Reply

Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Pressure instability with rhoSimpleFoam daniel_mills OpenFOAM Running, Solving & CFD 44 February 17, 2011 18:08
Problems with Turbulence Modeling ezsoal OpenFOAM Running, Solving & CFD 4 November 26, 2009 16:12
FOAM FATAL IO ERRORsimpleFoam hariya03 OpenFOAM Running, Solving & CFD 6 July 16, 2008 08:03
RasInterFoam STRANGE RESULTS AT BOUNDARY kumar2 OpenFOAM Running, Solving & CFD 8 March 24, 2008 19:38
On grid independent solution for pulsatile flow David FLUENT 4 June 8, 2005 16:20


All times are GMT -4. The time now is 22:07.