31.2.6　定数の畳み込み

式の中に複数の定数があった場合，計算可能な範囲でコンパイラが定数同士の演算を計算することによって式を単純化します。

（最適化前）

COMPUTE C = 1 + 3.
COMPUTE D = 0.1415926 + 3.0000000 + A.

（最適化後）

MOVE    4 TO C.
COMPUTE D = 3.1415926 + A.

最適化条件

COBOLの演算順序に従った演算の過程で定数同士の演算が発生する場合だけ，この最適化は行われます。