C Copyright(C) 1999-2020 National Technology & Engineering Solutions C of Sandia, LLC (NTESS). Under the terms of Contract DE-NA0003525 with C NTESS, the U.S. Government retains certain rights in this software. C C See packages/seacas/LICENSE for details COMMON /XXXXX/ XXA, XXB, XXC, * XXSCAL, XYSCAL, XXSCL0, XYSCL0, XXOFFS, XYOFFS, * ISXWRP, XWARP, CONVEX LOGICAL ISXWRP, CONVEX