输入cuda API和输出应为Fortran接口信息 该脚本应该用pyparsing编写。 我需要帮助
Cuda API:
=========
cublasStatus_t
cublasDestroy(cublasHandle_t handle)
Fortan Interface:
=================
function cublasDestroy(handle) bind(c, name="cublasDestroy")
use iso_c_binding
use cuda_blas_enums
implicit none
integer(kind(CUBLAS_STATUS_SUCCESS)) :: cublasDestroy
type(c_ptr), value :: handle
end function cublasDestroy