-6.4 次元の名前を変更する： NF_RENAME

関数 NF_RENAME_DIM は開かれた書きこみステータスにあるNetCDFファイル中の次元の名前を変更します。新しい名前が古い名前よりも長い場合にはNetCDFファイルは定義モードになければなりません。他に同名の次元がある場合にはその名前に変更することはできません。

INTEGER FUNCTION NF_RENAME_DIM (INTEGER NCID, INTEGER DIMID,

CHARACTER*(*) NAME)

NCID	以前の NF_OPEN or NF_CREATE 呼び出しで返されたNetCDF ID。
DIMID	以前の NF_INQ_DIMID 又は NF_DEF_DIM 呼び出しによって返された次元ID。
NAME	新規の次元名。

エラーが発生していない場合には関数 NF_RENAME_DIM は NF_NOERR 値を返します。それ以外の場合には返されたステータスがエラーが発生したことを示します。エラーの原因としては：

指定されたNetCDFファイルに対して次元ＩＤが無効である。

指定された NetCDF ID が開かれているNetCDFファイルを参照していない。

新規の次元名が旧次元名よりも長く、さらにNetCDFファイルが定義モードに入っていない。

この例では NF_RENAME_DIM を使用して既存のNetCDFファイル foo.nc 中の次元 lat を latitude に変更します：

INCLUDE 'netcdf.inc'

...

INTEGER STATUS, NCID, LATID

...

STATUS = NF_OPEN('foo.nc', NF_WRITE, NCID)

IF (STATUS .NE. NF_NOERR) CALL HANDLE_ERR(STATUS)

...

! 次元の名前を変更するために定義モードに入る

IF (STATUS .NE. NF_NOERR) CALL HANDLE_ERR(STATUS)

STATUS = NF_INQ_DIMID(NCID, 'lat', LATID)

IF (STATUS .NE. NF_NOERR) CALL HANDLE_ERR(STATUS)

STATUS = NF_RENAME_DIM(NCID, LATID, 'latitude')

IF (STATUS .NE. NF_NOERR) CALL HANDLE_ERR(STATUS)

! 定義モードから抜ける

STATUS = NF_ENDDEF(NCID)

IF (STATUS .NE. NF_NOERR) CALL HANDLE_ERR(STATUS)