Changeset 26737
- Timestamp:
- 12/14/21 18:46:39 (3 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk-jpl/src/jl/usr/triangle.jl
r26629 r26737 8 8 numberofpoints :: Cint 9 9 numberofpointattributes :: Cint 10 10 11 11 trianglelist :: Ptr{Cint} 12 12 triangleattributelist :: Ptr{Cdouble} … … 16 16 numberofcorners :: Cint 17 17 numberoftriangleattributes :: Cint 18 18 19 19 segmentlist :: Ptr{Cint} 20 20 segmentmarkerlist :: Ptr{Cint} … … 153 153 triangle_switches = "pQzDq30ia"*@sprintf("%lf",area) #replace V by Q to quiet down the logging 154 154 #rc=ccall( (:triangulate,"libtriangle"), 155 rc=ccall( (:triangulate, "../../externalpackages/triangle/src/libtriangle.dylib"),155 rc=ccall( (:triangulate,issmdir()*"/externalpackages/triangle/src/libtriangle.dylib"), 156 156 Cint, ( Cstring, Ref{CTriangulateIO}, Ref{CTriangulateIO}, Ref{CTriangulateIO}), 157 157 triangle_switches, Ref(ctio_in), Ref(ctio_out), Ref(vor_out)) … … 161 161 triangles = convert(Array{Cint,2}, Base.unsafe_wrap(Array, ctio_out.trianglelist, (3,Int(ctio_out.numberoftriangles)), own=true))' .+1 162 162 segments = convert(Array{Cint,2}, Base.unsafe_wrap(Array, ctio_out.segmentlist, (2,Int(ctio_out.numberofsegments)), own=true))' .+1 163 163 164 164 #assign output 165 165 md.mesh = Mesh2dTriangle()
Note:
See TracChangeset
for help on using the changeset viewer.