c -- bdrysout.h -- c Output context and boundaries real ccc1( nvar, npx, npy, 1-nbdyf:npz+nbdyf+1 ) real xl(nvar,nbdyf, npy, 1-nbdyf:npz+nbdyf+1 ) real xr(nvar,nbdyf, npy, 1-nbdyf:npz+nbdyf+1 ) real yb(nvar, npx, nbdyf, 1-nbdyf:npz+nbdyf+1 ) real yt(nvar, npx, nbdyf, 1-nbdyf:npz+nbdyf+1 ) real xlyb(nvar,nbdyf,nbdyf,1-nbdyf:npz+nbdyf+1) real xlyt(nvar,nbdyf,nbdyf,1-nbdyf:npz+nbdyf+1) real xryt(nvar,nbdyf,nbdyf,1-nbdyf:npz+nbdyf+1) real xryb(nvar,nbdyf,nbdyf,1-nbdyf:npz+nbdyf+1) common /bdrysout/ ccc1, xl,xr,yb,yt, xlyb,xlyt,xryt,xryb