Alter coordinate system

jimmer · May 7, 2009, 03:38

Does anyone know how I can command the change of coordinate system in a subroutine?

vishyaroon · May 7, 2009, 10:22

Changing can be coded using

csys,<Co-ordinate sys number>

Is this what you are looking for?

Pauli · May 7, 2009, 13:46

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?

A_Lyaskin · May 8, 2009, 05:00

AFAIK all coordinates in user subroutines are treated in global cartesian (i.e. computational) system. So you need to recalculate everything yourself

olauer · May 11, 2009, 03:49

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

May 7, 2009, 03:38	Alter coordinate system	#1
jimmer 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?

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

May 7, 2009, 10:22		#2
vishyaroon 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
Pauli 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
A_Lyaskin 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
olauer 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