diff options
Diffstat (limited to 'src/macro/CDXCDK_guts.h')
-rw-r--r-- | src/macro/CDXCDK_guts.h | 32 |
1 files changed, 16 insertions, 16 deletions
diff --git a/src/macro/CDXCDK_guts.h b/src/macro/CDXCDK_guts.h index 15ad9fc..7ddee37 100644 --- a/src/macro/CDXCDK_guts.h +++ b/src/macro/CDXCDK_guts.h @@ -16,22 +16,22 @@ #ifdef FCODE - CDXCDK_CDXCDKXX = DXDK_DXDKXX - 2D0*(CHR2_XXX*CDXCDK_KXX - & + CHR2_YXX*CDXCDK_KXY + CHR2_ZXX*CDXCDK_KXZ) - CDXCDK_CDXCDKYY = DXDK_DXDKYY - 2D0*(CHR2_XXY*CDXCDK_KXY - & + CHR2_YXY*CDXCDK_KYY + CHR2_ZXY*CDXCDK_KYZ) - CDXCDK_CDXCDKZZ = DXDK_DXDKZZ - 2D0*(CHR2_XXZ*CDXCDK_KXZ - & + CHR2_YXZ*CDXCDK_KYZ + CHR2_ZXZ*CDXCDK_KZZ) - - CDXCDK_CDXCDKXY = DXDK_DXDKXY - CHR2_XXY*CDXCDK_KXX - - & (CHR2_XXX + CHR2_YXY)*CDXCDK_KXY - CHR2_ZXY*CDXCDK_KXZ - - & CHR2_YXX*CDXCDK_KYY - CHR2_ZXX*CDXCDK_KYZ - CDXCDK_CDXCDKXZ = DXDK_DXDKXZ - CHR2_XXZ*CDXCDK_KXX - - & (CHR2_XXX + CHR2_ZXZ)*CDXCDK_KXZ - CHR2_YXZ*CDXCDK_KXY - - & CHR2_YXX*CDXCDK_KYZ - CHR2_ZXX*CDXCDK_KZZ - CDXCDK_CDXCDKYZ = DXDK_DXDKYZ - CHR2_XXZ*CDXCDK_KXY - - & CHR2_XXY*CDXCDK_KXZ - CHR2_YXZ*CDXCDK_KYY - - & (CHR2_YXY + CHR2_ZXZ)*CDXCDK_KYZ - CHR2_ZXY*CDXCDK_KZZ + CDXCDK_CDXCDKXX = DXDK_DXDKXX - 2D0*(CHR2_XXX*CDXCDK_KXX \ + + CHR2_YXX*CDXCDK_KXY + CHR2_ZXX*CDXCDK_KXZ) + CDXCDK_CDXCDKYY = DXDK_DXDKYY - 2D0*(CHR2_XXY*CDXCDK_KXY \ + + CHR2_YXY*CDXCDK_KYY + CHR2_ZXY*CDXCDK_KYZ) + CDXCDK_CDXCDKZZ = DXDK_DXDKZZ - 2D0*(CHR2_XXZ*CDXCDK_KXZ \ + + CHR2_YXZ*CDXCDK_KYZ + CHR2_ZXZ*CDXCDK_KZZ) + + CDXCDK_CDXCDKXY = DXDK_DXDKXY - CHR2_XXY*CDXCDK_KXX - \ + (CHR2_XXX + CHR2_YXY)*CDXCDK_KXY - CHR2_ZXY*CDXCDK_KXZ - \ + CHR2_YXX*CDXCDK_KYY - CHR2_ZXX*CDXCDK_KYZ + CDXCDK_CDXCDKXZ = DXDK_DXDKXZ - CHR2_XXZ*CDXCDK_KXX - \ + (CHR2_XXX + CHR2_ZXZ)*CDXCDK_KXZ - CHR2_YXZ*CDXCDK_KXY - \ + CHR2_YXX*CDXCDK_KYZ - CHR2_ZXX*CDXCDK_KZZ + CDXCDK_CDXCDKYZ = DXDK_DXDKYZ - CHR2_XXZ*CDXCDK_KXY - \ + CHR2_XXY*CDXCDK_KXZ - CHR2_YXZ*CDXCDK_KYY - \ + (CHR2_YXY + CHR2_ZXZ)*CDXCDK_KYZ - CHR2_ZXY*CDXCDK_KZZ #endif |