:ZHEMM( SIDE UPLO M N ALPHA A LDA B LDB BETA C LDC -- ) f"blas""ZHEMM"{ "CHARACTER*1" "CHARACTER*1" "INTEGER" "INTEGER" "DOUBLE-COMPLEX" "DOUBLE-COMPLEX(*)" "INTEGER" "DOUBLE-COMPLEX(*)" "INTEGER" "DOUBLE-COMPLEX" "DOUBLE-COMPLEX(*)" "INTEGER" }fortran-invoke;