#ifdef GM_K3D
COMMON /GM_K3D/ K3D, modesC, modesW, modesS, Rdef, gradf
#if ((defined GM_K3D) ! (defined GM_K3D_PASSIVE))