3
1
0
新人
使用道具 举报
01
==
02
! UMFPACK Fortran interface via the mUMFPACK module
03
! ======================================================================
04
! Version 1.0 (Apr 23, 2014) for UMFPACK version 5.6.2
05
06
! Compile with any Fortran compiler with support of iso_c_binding module
07
! and link with the UMFPACK C library:
08
! e.g., gfortran umfpack.f90 my_code.f90 -lumfpack
09
10
module
mUMFPACK
11
12
use
iso_c_binding
13
implicit
none
14
15
! private size constants
16
17
integer
,
parameter
private
::
i
4
=
&
! size of default integer
18
8
! size of long integer
19
ip
c_intptr_t
! size of pointers used in basic Fortran wrappers
20
r
! size of single precision real/complex
21
! size of double precision real/complex
22
23
! default pointers to UMFPACK Symbolic and Numeric objects
24
25
type
(
c_ptr
)
iSymbolic
c_null_ptr
iNumeric
26
27
28
! UMFPACK constants
29
30
31
! size of Info and Control arrays
490
大宗师
daniel1010 发表于 2019-1-4 15:51 我用这个来调用UMFPACK C library, 但是总是显示Fatal Error: Can't open module file 。。。 ps: 我是学 ...
本版积分规则 发表回复 回帖后跳转到最后一页
颁发给发帖量超过一定数量的坛友
颁发给论坛注册3年以上的网友
颁发给论坛热心帮助他人的网友
捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )
GMT+8, 2025-5-1 23:39
Powered by Discuz! X3.4
© 2013-2025 Comsenz Inc.