FORTRAN77では、いくつかのサブルーチンの間で共通の定数を使うとき
それぞれのサブルーチンで何回も同じ宣言をしなければいけないのですか？

このままだと定数の値を変えるのが非常に面倒なので
一回の宣言で済む方法を知りたいです