OMEGA Subroutine

public subroutine OMEGA(PS, DPSDL, DPSDM, DIV, U, V, BREITE, E, MLAT, A, B, NGI, NGJ, MKK)

Calculates $\omega$ in the hybrid ($\eta$-)coordinate system

Arguments

Type	Intent	Optional	Attributes		Name
real				::	PS(NGI)
real				::	DPSDL(NGI)
real				::	DPSDM(NGI)
real				::	DIV(NGI,MKK)
real				::	U(NGI,MKK)
real				::	V(NGI,MKK)
real				::	BREITE(NGJ)
real				::	E(NGI,MKK)
integer				::	MLAT(NGJ)
real				::	A(MKK+1)
real				::	B(MKK+1)
integer				::	NGI
integer				::	NGJ
integer				::	MKK

Contents

None