|
[Sponsors] |
May 7, 2009, 03:38 |
Alter coordinate system
|
#1 |
New Member
DM
Join Date: Mar 2009
Location: GREECE
Posts: 13
Rep Power: 17 |
Does anyone know how I can command the change of coordinate system in a subroutine?
|
|
May 7, 2009, 10:22 |
|
#2 |
Senior Member
Aroon
Join Date: Apr 2009
Location: Racine WI
Posts: 148
Rep Power: 17 |
Changing can be coded using
csys,<Co-ordinate sys number> Is this what you are looking for? |
|
May 7, 2009, 13:46 |
|
#3 |
Senior Member
Pauli
Join Date: Mar 2009
Posts: 189
Rep Power: 17 |
Maybe, it depends upon what you are trying to accomplish.
Your post does not provide enough details. Which user subroutine? What are you trying to change? |
|
May 8, 2009, 05:00 |
|
#4 |
Member
Anton Lyaskin
Join Date: Mar 2009
Location: Samara, Russia
Posts: 66
Rep Power: 17 |
AFAIK all coordinates in user subroutines are treated in global cartesian (i.e. computational) system. So you need to recalculate everything yourself
|
|
May 11, 2009, 03:49 |
|
#5 |
Member
Oliver Lauer
Join Date: Mar 2009
Location: Coburg
Posts: 57
Rep Power: 17 |
There are two provided subroutines which could be used.
DIMENSION CIN(3),COUT(3) CALL GLOLOC(CIN,COUT,ICOR) CALL LOCGLO(COUT,CIN,ICOR) Example from newxyz.f: ICOR=5 do iv=1,nvert CIN(1)=VCORN(1,IV) CIN(2)=VCORN(2,IV) CIN(3)=VCORN(3,IV) CALL GLOLOC(CIN,COUT,ICOR) any operation on local coordinates possible COUT(2)=COUT(2)+OFFSET CALL LOCGLO(COUT,CIN,ICOR) VCORN(1,IV)=CIN(1) VCORN(2,IV)=CIN(2) VCORN(3,IV)=CIN(3) enddo Attention: all vertex values are in SI coordinates, local coordinate systems could be defined in mm |
|
|
|
Similar Threads | ||||
Thread | Thread Starter | Forum | Replies | Last Post |
CFX11 + Fortran compiler ? | Mohan | CFX | 20 | March 30, 2011 18:56 |
Coordinate System | selim | CFX | 1 | October 26, 2007 21:08 |
Equation in which coordinate system | zubin | Main CFD Forum | 8 | April 30, 2004 10:33 |
On Coordinate system used in Fluent | varghese | FLUENT | 9 | March 22, 2002 11:16 |
Coordinate system | Franch | Siemens | 2 | March 6, 2002 07:56 |