cv3a_compress.F90 File Reference

Go to the source code of this file.

Functions/Subroutines
subroutine	cv3a_compress (len, nloc, ncum, nd, ntra, compress, iflag1, nk1, icb1, icbs1, plcl1, tnk1, qnk1, gznk1, hnk1, unk1, vnk1, wghti1, pbase1, buoybase1, t1, q1, qs1, t1_wake, q1_wake, qs1_wake, s1_wake, u1, v1, gz1, th1, th1_wake, tra1, h1, lv1, lf1, cpn1, p1, ph1, tv1, tp1, tvp1, clw1, h1_wake, lv1_wake, lf1_wake, cpn1_wake, tv1_wake, sig1, w01, ptop21, Ale1, Alp1, omega1, iflag, nk, icb, icbs, plcl, tnk, qnk, gznk, hnk, unk, vnk, wghti, pbase, buoybase, t, q, qs, t_wake, q_wake, qs_wake, s_wake, u, v, gz, th, th_wake, tra, h, lv, lf, cpn, p, ph, tv, tp, tvp, clw, h_wake, lv_wake, lf_wake, cpn_wake, tv_wake, sig, w0, ptop2, Ale, Alp, omega)

Function/Subroutine Documentation

subroutine cv3a_compress	(	integer, intent(in)	len,
		integer, intent(in)	nloc,
		integer, intent(inout)	ncum,
		integer, intent(in)	nd,
		integer, intent(in)	ntra,
		logical, intent(in)	compress,
		integer, dimension (len), intent(in)	iflag1,
		integer, dimension (len), intent(in)	nk1,
		integer, dimension (len), intent(in)	icb1,
		integer, dimension (len), intent(in)	icbs1,
		real, dimension (len), intent(in)	plcl1,
		real, dimension (len), intent(in)	tnk1,
		real, dimension (len), intent(in)	qnk1,
		real, dimension (len), intent(in)	gznk1,
		real, dimension (len), intent(in)	hnk1,
		real, dimension (len), intent(in)	unk1,
		real, dimension (len), intent(in)	vnk1,
		real, dimension(len, nd), intent(in)	wghti1,
		real, dimension (len), intent(in)	pbase1,
		real, dimension (len), intent(in)	buoybase1,
		real, dimension (len, nd), intent(in)	t1,
		real, dimension (len, nd), intent(in)	q1,
		real, dimension (len, nd), intent(in)	qs1,
		real, dimension (len, nd), intent(in)	t1_wake,
		real, dimension (len, nd), intent(in)	q1_wake,
		real, dimension (len, nd), intent(in)	qs1_wake,
		real, dimension (len), intent(in)	s1_wake,
		real, dimension (len, nd), intent(in)	u1,
		real, dimension (len, nd), intent(in)	v1,
		real, dimension (len, nd), intent(in)	gz1,
		real, dimension (len, nd), intent(in)	th1,
		real, dimension (len, nd), intent(in)	th1_wake,
		real, dimension (len, nd,ntra), intent(in)	tra1,
		real, dimension (len, nd), intent(in)	h1,
		real, dimension (len, nd), intent(in)	lv1,
		real, dimension (len, nd), intent(in)	lf1,
		real, dimension (len, nd), intent(in)	cpn1,
		real, dimension (len, nd), intent(in)	p1,
		real, dimension(len, nd+1), intent(in)	ph1,
		real, dimension (len, nd), intent(in)	tv1,
		real, dimension (len, nd), intent(in)	tp1,
		real, dimension (len, nd), intent(in)	tvp1,
		real, dimension (len, nd), intent(in)	clw1,
		real, dimension (len, nd), intent(in)	h1_wake,
		real, dimension (len, nd), intent(in)	lv1_wake,
		real, dimension (len, nd), intent(in)	lf1_wake,
		real, dimension (len, nd), intent(in)	cpn1_wake,
		real, dimension (len, nd), intent(in)	tv1_wake,
		real, dimension (len, nd), intent(in)	sig1,
		real, dimension (len, nd), intent(in)	w01,
		real, dimension (len), intent(in)	ptop21,
		real, dimension (len), intent(in)	Ale1,
		real, dimension (len), intent(in)	Alp1,
		real, dimension (len, nd), intent(in)	omega1,
		integer, dimension (nloc), intent(out)	iflag,
		integer, dimension (nloc), intent(out)	nk,
		integer, dimension (nloc), intent(out)	icb,
		integer, dimension (nloc), intent(out)	icbs,
		real, dimension (nloc), intent(out)	plcl,
		real, dimension (nloc), intent(out)	tnk,
		real, dimension (nloc), intent(out)	qnk,
		real, dimension (nloc), intent(out)	gznk,
		real, dimension (nloc), intent(out)	hnk,
		real, dimension (nloc), intent(out)	unk,
		real, dimension (nloc), intent(out)	vnk,
		real, dimension (nloc, nd), intent(out)	wghti,
		real, dimension (nloc), intent(out)	pbase,
		real, dimension (nloc), intent(out)	buoybase,
		real, dimension (nloc, nd), intent(out)	t,
		real, dimension (nloc, nd), intent(out)	q,
		real, dimension (nloc, nd), intent(out)	qs,
		real, dimension (nloc, nd), intent(out)	t_wake,
		real, dimension (nloc, nd), intent(out)	q_wake,
		real, dimension (nloc, nd), intent(out)	qs_wake,
		real, dimension (nloc), intent(out)	s_wake,
		real, dimension (nloc, nd), intent(out)	u,
		real, dimension (nloc, nd), intent(out)	v,
		real, dimension (nloc, nd), intent(out)	gz,
		real, dimension (nloc, nd), intent(out)	th,
		real, dimension (nloc, nd), intent(out)	th_wake,
		real, dimension (nloc, nd,ntra), intent(out)	tra,
		real, dimension (nloc, nd), intent(out)	h,
		real, dimension (nloc, nd), intent(out)	lv,
		real, dimension (nloc, nd), intent(out)	lf,
		real, dimension (nloc, nd), intent(out)	cpn,
		real, dimension (nloc, nd), intent(out)	p,
		real, dimension (nloc, nd+1), intent(out)	ph,
		real, dimension (nloc, nd), intent(out)	tv,
		real, dimension (nloc, nd), intent(out)	tp,
		real, dimension (nloc, nd), intent(out)	tvp,
		real, dimension (nloc, nd), intent(out)	clw,
		real, dimension (nloc, nd), intent(out)	h_wake,
		real, dimension (nloc, nd), intent(out)	lv_wake,
		real, dimension (nloc, nd), intent(out)	lf_wake,
		real, dimension (nloc, nd), intent(out)	cpn_wake,
		real, dimension (nloc, nd), intent(out)	tv_wake,
		real, dimension (nloc, nd), intent(out)	sig,
		real, dimension (nloc, nd), intent(out)	w0,
		real, dimension (nloc), intent(out)	ptop2,
		real, dimension (nloc), intent(out)	Ale,
		real, dimension (nloc), intent(out)	Alp,
		real, dimension (nloc, nd), intent(out)	omega
	)

Parameters

[in]	iflag1	jyg
[in]	nk1	jyg
[in]	icb1	jyg
[in]	icbs1	jyg

jyg

jyg

Definition at line 22 of file cv3a_compress.F90.

Here is the call graph for this function:

Here is the caller graph for this function: