関数は、次のように呼び出します。
INTEGER*4 rindex
n = rindex( a1, a2 )
a1
character
入力
文字列
a2
部分列
戻り値
INTEGER*4 または INTEGER*8
出力
n>0: a1 の中で最後に出現する a2 のインデックス
n=0: a1 の中に a2 が出現しない。64 ビット環境の場合は、INTEGER*8 が戻る。