fortranは値渡しじゃなくてアドレス渡しだから

ポインタをサブルーチンに渡して、
サブルーチンの中で指してる実体が変わると
サブルーチンを出たあとでも変わったまま

という理解でいいんでしょうか


組み合わせというのはsubroutineに渡す引数の組み合わせのことで

例えば
call AddParticleList(pwork, tmpnum, tmprr )
call PrintParticleList(proot, 6)
call FreeParticleList(proot)
と書いた時は

(A, P ,F)=(w, r , r )で
結果は�Bの
十回全てで、リストは表示されるが、解放はされない
となる。
というつもりです。

また、指摘された通り
subroutine PrintParticleList(dumwork,filenum)
でdumworkをtmpworkに入れるように書き換えて見ましたが
引数の組み合わせによっては>>924に書いた�@と�Aの
どちらかの結果になります。