ポインタの配列を使用してFORTRANで隣接しない配列エントリを割り当てる方法

Question

連続したメモリブロックにない配列内の要素をリセットしたいと考えています。私は、ポインタ配列の私の理解として、彼らはメモリのコヒーレントブロックを指し示す必要があるので、ポインタ配列の代わりにポインタの配列を使用すると思った（例えばポインタ（1：10,1：10）=>ターゲット（1 ：次のように

私の簡単なテストプログラムである100））：

program test 
    implicit none 

    integer, target :: arr(4,4) 

    type ptr 
    integer, pointer :: p 
    end type ptr 

    type(ptr), dimension(2) :: idx 

    arr=0 

    idx(1)%p=>arr(2,2) 
    idx(2)%p=>arr(4,2) 

    idx(1)%p=5 ! this is okay 
    idx(2)%p=5 ! this is okay 
    idx(1:2)%p=5 ! this gives an error 

    print *,arr 

end program test 

最初の二つの文IDX（N）の％p = 5は大丈夫ですが、私はのチャンクを設定できるようにしたいです（1：n）％p = 5のスパンニングメソッドを使用して1つのステートメントに配列を作成しますが、これを行うと次のコンパイルエラーが発生します：

Error: Component to the right of a part reference with nonzero rank must not have the POINTER attribute at (1) 

何らかの方法でポインタを使用して配列エントリのチャンクの値を設定できますか？おそらくそれは、ポインタ配列ではなくポインタの配列で、実際に可能です...

私は、これはFortran: using a vector to index a multidimensional array

に関連していると思いますが、私はここでその答えを使用する方法を見ることができません。おそらく

Answer 1

拡張コメントではなく、その答えが、私は少し書式設定を必要とする...

それはポインタのFortranのサポート配列を考えていないのが最善です。あなたはすでにそれを把握しており、ポインターである要素を持つ型の各インスタンスの派生型の配列の通常の回避策を構築しました。あなたは、このような

arr([2,4],[2]) = 5 

（OK、第二の添え字は、縮退ベクトルのようなものですが、文が同じ効果を有することが意図されるなど、複数のベクトル添字を使用しない理由は完全には明らかではない何

は

ですポインタを使用するようにしよう。）あなたは、むしろ、あなたが

に代わり

arr(2:4:2,2) = 5 

を配列の添字三つ組を使用することができます場合はおそらく、あなたは私の微弱な提案はしません場合は、ポインタを使用しての必要性を表現するために、あまりにも遠く、あなたのニーズを簡素化しましたあなたの宣告されていないニーズ。