gbar_to_g_kxkyz Subroutine

private subroutine gbar_to_g_kxkyz(g, apar, facapar)

adjust apar part of Zs / Ts

Arguments

Type	Intent	Optional	Attributes		Name
complex,	intent(inout),		dimension(:, :, kxkyz_lo%llim_proc:)	::	g
complex,	intent(in),		dimension(:, :, -nzgrid:, :)	::	apar
real,	intent(in)			::	facapar