次のコードに遭遇しましたが、理解できません。それは何をするためのものか?
A(*)
do n=(k,k-1,j+1-k)
A(*)
「想定サイズ配列」の宣言 (の一部) のように見えます。これの典型的な使用法は、手続きへの仮引数の宣言です。サイズ引き継ぎ配列と「自動」配列を慎重に区別してください。サイズ引き継ぎ配列は、最新の Fortran では推奨されていませんが、FORTRAN77 以前のバリエーションでは一般的です。
do n=(k,k-1,j+1-k)
構文的に正しくないループ ステートメントのように見えます。正しい形式は、 size のストライドでdo n=k,k-1,j+1-k
範囲をループする whichです。[k,k-1]
j+1-k