このサブルーチンは、ロック変数が未定義になる原因となるネスト可能ロック変数を初期化します。変数 nvar は、アンロックされ、初期化されたネスト可能ロック変数でなければなりません。
引き数タイプおよび属性
整数タイプの kind omp_nest_lock_kind。
例
USE omp_lib INTEGER(kind=omp_nest_lock_kind) LOCK CALL omp_destroy_nest_lock(LOCK)