Fortran API functions for MMG3D library. More...

#include "libmmg3d_private.h"
#include "libmmg3d.h"

Include dependency graph for API_functionsf_3d.c:

Functions
	FORTRAN_VARIADIC (MMG3D_INIT_MESH, mmg3d_init_mesh,(const int starter,...), va_list argptr;int ier;va_start(argptr, starter);ier=MMG3D_Init_mesh_var(argptr);va_end(argptr);if(!ier) exit(EXIT_FAILURE);return;) FORTRAN_NAME(MMG3D_INIT_PARAMETERS

	FORTRAN_NAME (MMG3D_SET_INPUTMESHNAME, mmg3d_set_inputmeshname,(MMG5_pMesh mesh, char meshin, int strlen0, int retval),(mesh, meshin, strlen0, retval))

	FORTRAN_NAME (MMG3D_SET_INPUTSOLNAME, mmg3d_set_inputsolname,(MMG5_pMesh mesh, MMG5_pSol sol, char solin, int strlen0, int *retval),(mesh, sol, solin, strlen0, retval))

	FORTRAN_NAME (MMG3D_SET_OUTPUTMESHNAME, mmg3d_set_outputmeshname,(MMG5_pMesh mesh, char meshout, int strlen0, int retval),(mesh, meshout, strlen0, retval))

	FORTRAN_NAME (MMG3D_SET_OUTPUTSOLNAME, mmg3d_set_outputsolname,(MMG5_pMesh mesh, MMG5_pSol sol, char solout, int strlen0, int *retval),(mesh, sol, solout, strlen0, retval))

	FORTRAN_NAME (MMG3D_SET_SOLSIZE, mmg3d_set_solsize,(MMG5_pMesh mesh, MMG5_pSol sol, int typEntity, MMG5_int np, int typSol, int retval),(mesh, sol, typEntity, np, typSol, retval))

	FORTRAN_NAME (MMG3D_SET_SOLSATVERTICESSIZE, mmg3d_set_solsatverticessize,(MMG5_pMesh mesh, MMG5_pSol sol, int nsols, MMG5_int nentities, int typSol, int retval),(mesh, sol, nsols, nentities, typSol, retval))

	FORTRAN_NAME (MMG3D_SET_MESHSIZE, mmg3d_set_meshsize,(MMG5_pMesh mesh, MMG5_int np, MMG5_int ne, MMG5_int nprism, MMG5_int nt, MMG5_int nquad, MMG5_int na, int retval),(mesh, np, ne, nprism, nt, nquad, na, retval))

	FORTRAN_NAME (MMG3D_GET_SOLSIZE, mmg3d_get_solsize,(MMG5_pMesh mesh, MMG5_pSol sol, int typEntity, MMG5_int np, int typSol, int retval),(mesh, sol, typEntity, np, typSol, retval))

	FORTRAN_NAME (MMG3D_GET_SOLSATVERTICESSIZE, mmg3d_get_solsatverticessize,(MMG5_pMesh mesh, MMG5_pSol sol, int nsols, MMG5_int nentities, int typSol, int retval),(mesh, sol, nsols, nentities, typSol, retval))

	FORTRAN_NAME (MMG3D_GET_MESHSIZE, mmg3d_get_meshsize,(MMG5_pMesh mesh, MMG5_int np, MMG5_int ne, MMG5_int nprism, MMG5_int nt, MMG5_int nquad, MMG5_int na, int retval),(mesh, np, ne, nprism, nt, nquad, na, retval))

	FORTRAN_NAME (MMG3D_SET_VERTEX, mmg3d_set_vertex,(MMG5_pMesh mesh, double c0, double c1, double c2, MMG5_int ref, MMG5_int pos, int *retval),(mesh, c0, c1, c2, ref, pos, retval))

	FORTRAN_NAME (MMG3D_GET_VERTEX, mmg3d_get_vertex,(MMG5_pMesh mesh, double c0, double c1, double c2, MMG5_int ref, int isCorner, int isRequired, int retval),(mesh, c0, c1, c2, ref, isCorner, isRequired, retval))

	FORTRAN_NAME (MMG3D_GETBYIDX_VERTEX, mmg3d_getbyidx_vertex,(MMG5_pMesh mesh, double c0, double c1, double c2, MMG5_int ref, int isCorner, int isRequired, MMG5_int idx, int *retval),(mesh, c0, c1, c2, ref, isCorner, isRequired, idx, retval))

	FORTRAN_NAME (MMG3D_SET_VERTICES, mmg3d_set_vertices,(MMG5_pMesh mesh, double vertices, MMG5_int refs, int retval),(mesh, vertices, refs, retval))

	FORTRAN_NAME (MMG3D_GET_VERTICES, mmg3d_get_vertices,(MMG5_pMesh mesh, double vertices, MMG5_int refs, int areCorners, int areRequired, int retval),(mesh, vertices, refs, areCorners, areRequired, retval))

	FORTRAN_NAME (MMG3D_SET_TETRAHEDRON, mmg3d_set_tetrahedron,(MMG5_pMesh mesh, MMG5_int v0, MMG5_int v1, MMG5_int v2, MMG5_int v3, MMG5_int ref, MMG5_int pos, int retval),(mesh, v0, v1, v2, v3, ref, pos, retval))

	FORTRAN_NAME (MMG3D_SET_TETRAHEDRA, mmg3d_set_tetrahedra,(MMG5_pMesh mesh, MMG5_int tetra, MMG5_int refs, int retval),(mesh, tetra, refs, retval))

	FORTRAN_NAME (MMG3D_GET_TETRAHEDRON, mmg3d_get_tetrahedron,(MMG5_pMesh mesh, MMG5_int v0, MMG5_int v1, MMG5_int v2, MMG5_int v3, MMG5_int ref, int isRequired, int retval),(mesh, v0, v1, v2, v3, ref, isRequired, retval))

	FORTRAN_NAME (MMG3D_GET_TETRAHEDRA, mmg3d_get_tetrahedra,(MMG5_pMesh mesh, MMG5_int tetra, MMG5_int refs, int areRequired, int *retval),(mesh, tetra, refs, areRequired, retval))

	FORTRAN_NAME (MMG3D_SET_PRISM, mmg3d_set_prism,(MMG5_pMesh mesh, MMG5_int v0, MMG5_int v1, MMG5_int v2, MMG5_int v3, MMG5_int v4, MMG5_int v5, MMG5_int ref, MMG5_int pos, int retval),(mesh, v0, v1, v2, v3, v4, v5, ref, pos, retval))

	FORTRAN_NAME (MMG3D_SET_PRISMS, mmg3d_set_prisms,(MMG5_pMesh mesh, MMG5_int prisms, MMG5_int refs, int retval),(mesh, prisms, refs, retval))

	FORTRAN_NAME (MMG3D_GET_PRISM, mmg3d_get_prism,(MMG5_pMesh mesh, MMG5_int v0, MMG5_int v1, MMG5_int v2, MMG5_int v3, MMG5_int v4, MMG5_int v5, MMG5_int ref, int isRequired, int retval),(mesh, v0, v1, v2, v3, v4, v5, ref, isRequired, retval))

	FORTRAN_NAME (MMG3D_GET_PRISMS, mmg3d_get_prisms,(MMG5_pMesh mesh, MMG5_int prisms, MMG5_int refs, int areRequired, int *retval),(mesh, prisms, refs, areRequired, retval))

	FORTRAN_NAME (MMG3D_SET_TRIANGLE, mmg3d_set_triangle,(MMG5_pMesh mesh, MMG5_int v0, MMG5_int v1, MMG5_int v2, MMG5_int ref, MMG5_int pos, int *retval),(mesh, v0, v1, v2, ref, pos, retval))

	FORTRAN_NAME (MMG3D_GET_TRIANGLE, mmg3d_get_triangle,(MMG5_pMesh mesh, MMG5_int v0, MMG5_int v1, MMG5_int v2, MMG5_int ref, int isRequired, int *retval),(mesh, v0, v1, v2, ref, isRequired, retval))

	FORTRAN_NAME (MMG3D_SET_TRIANGLES, mmg3d_set_triangles,(MMG5_pMesh mesh, MMG5_int tria, MMG5_int refs, int retval),(mesh, tria, refs, retval))

	FORTRAN_NAME (MMG3D_GET_TRIANGLES, mmg3d_get_triangles,(MMG5_pMesh mesh, MMG5_int tria, MMG5_int refs, int areRequired, int *retval),(mesh, tria, refs, areRequired, retval))

	FORTRAN_NAME (MMG3D_SET_QUADRILATERAL, mmg3d_set_quadrilateral,(MMG5_pMesh mesh, MMG5_int v0, MMG5_int v1, MMG5_int v2, MMG5_int v3, MMG5_int ref, MMG5_int pos, int retval),(mesh, v0, v1, v2, v3, ref, pos, retval))

	FORTRAN_NAME (MMG3D_GET_QUADRILATERAL, mmg3d_get_quadrilateral,(MMG5_pMesh mesh, MMG5_int v0, MMG5_int v1, MMG5_int v2, MMG5_int v3, MMG5_int ref, int isRequired, int retval),(mesh, v0, v1, v2, v3, ref, isRequired, retval))

	FORTRAN_NAME (MMG3D_SET_QUADRILATERALS, mmg3d_set_quadrilaterals,(MMG5_pMesh mesh, MMG5_int quads, MMG5_int refs, int retval),(mesh, quads, refs, retval))

	FORTRAN_NAME (MMG3D_GET_QUADRILATERALS, mmg3d_get_quadrilaterals,(MMG5_pMesh mesh, MMG5_int quads, MMG5_int refs, int areRequired, int *retval),(mesh, quads, refs, areRequired, retval))

	FORTRAN_NAME (MMG3D_SET_EDGE, mmg3d_set_edge,(MMG5_pMesh mesh, MMG5_int v0, MMG5_int v1, MMG5_int ref, MMG5_int pos, int retval),(mesh, v0, v1, ref, pos, retval))

	FORTRAN_NAME (MMG3D_GET_EDGE, mmg3d_get_edge,(MMG5_pMesh mesh, MMG5_int e0, MMG5_int e1, MMG5_int ref, int isRidge, int isRequired, int *retval),(mesh, e0, e1, ref, isRidge, isRequired, retval))

	FORTRAN_NAME (MMG3D_SET_EDGES, mmg3d_set_edges,(MMG5_pMesh mesh, MMG5_int edges, MMG5_int refs, int retval),(mesh, edges, refs, retval))

	FORTRAN_NAME (MMG3D_GET_EDGES, mmg3d_get_edges,(MMG5_pMesh mesh, MMG5_int edges, MMG5_int refs, int areRidges, int areRequired, int retval),(mesh, edges, refs, areRidges, areRequired, retval))

	FORTRAN_NAME (MMG3D_SET_CORNER, mmg3d_set_corner,(MMG5_pMesh mesh, MMG5_int k, int *retval),(mesh, k, retval))

	FORTRAN_NAME (MMG3D_UNSET_CORNER, mmg3d_unset_corner,(MMG5_pMesh mesh, MMG5_int k, int *retval),(mesh, k, retval))

	FORTRAN_NAME (MMG3D_SET_REQUIREDVERTEX, mmg3d_set_requiredvertex,(MMG5_pMesh mesh, MMG5_int k, int *retval),(mesh, k, retval))

	FORTRAN_NAME (MMG3D_UNSET_REQUIREDVERTEX, mmg3d_unset_requiredvertex,(MMG5_pMesh mesh, MMG5_int k, int *retval),(mesh, k, retval))

	FORTRAN_NAME (MMG3D_SET_REQUIREDTETRAHEDRON, mmg3d_set_requiredtetrahedron,(MMG5_pMesh mesh, MMG5_int k, int *retval),(mesh, k, retval))

	FORTRAN_NAME (MMG3D_UNSET_REQUIREDTETRAHEDRON, mmg3d_unset_requiredtetrahedron,(MMG5_pMesh mesh, MMG5_int k, int *retval),(mesh, k, retval))

	FORTRAN_NAME (MMG3D_SET_REQUIREDTETRAHEDRA, mmg3d_set_requiredtetrahedra,(MMG5_pMesh mesh, MMG5_int reqIdx, MMG5_int nreq, int retval),(mesh, reqIdx, nreq, retval))

	FORTRAN_NAME (MMG3D_UNSET_REQUIREDTETRAHEDRA, mmg3d_unset_requiredtetrahedra,(MMG5_pMesh mesh, MMG5_int reqIdx, MMG5_int nreq, int retval),(mesh, reqIdx, nreq, retval))

	FORTRAN_NAME (MMG3D_SET_REQUIREDTRIANGLE, mmg3d_set_requiredtriangle,(MMG5_pMesh mesh, MMG5_int k, int *retval),(mesh, k, retval))

	FORTRAN_NAME (MMG3D_UNSET_REQUIREDTRIANGLE, mmg3d_unset_requiredtriangle,(MMG5_pMesh mesh, MMG5_int k, int *retval),(mesh, k, retval))

	FORTRAN_NAME (MMG3D_SET_REQUIREDTRIANGLES, mmg3d_set_requiredtriangles,(MMG5_pMesh mesh, MMG5_int reqIdx, MMG5_int nreq, int retval),(mesh, reqIdx, nreq, retval))

	FORTRAN_NAME (MMG3D_UNSET_REQUIREDTRIANGLES, mmg3d_unset_requiredtriangles,(MMG5_pMesh mesh, MMG5_int reqIdx, MMG5_int nreq, int retval),(mesh, reqIdx, nreq, retval))

	FORTRAN_NAME (MMG3D_SET_PARALLELTRIANGLE, mmg3d_set_paralleltriangle,(MMG5_pMesh mesh, MMG5_int k, int *retval),(mesh, k, retval))

	FORTRAN_NAME (MMG3D_UNSET_PARALLELTRIANGLE, mmg3d_unset_paralleltriangle,(MMG5_pMesh mesh, MMG5_int k, int *retval),(mesh, k, retval))

	FORTRAN_NAME (MMG3D_SET_PARALLELTRIANGLES, mmg3d_set_paralleltriangles,(MMG5_pMesh mesh, MMG5_int parIdx, MMG5_int npar, int retval),(mesh, parIdx, npar, retval))

	FORTRAN_NAME (MMG3D_UNSET_PARALLELTRIANGLES, mmg3d_unset_paralleltriangles,(MMG5_pMesh mesh, MMG5_int parIdx, MMG5_int npar, int retval),(mesh, parIdx, npar, retval))

	FORTRAN_NAME (MMG3D_SET_RIDGE, mmg3d_set_ridge,(MMG5_pMesh mesh, MMG5_int k, int *retval),(mesh, k, retval))

	FORTRAN_NAME (MMG3D_UNSET_RIDGE, mmg3d_unset_ridge,(MMG5_pMesh mesh, MMG5_int k, int *retval),(mesh, k, retval))

	FORTRAN_NAME (MMG3D_SET_REQUIREDEDGE, mmg3d_set_requirededge,(MMG5_pMesh mesh, MMG5_int k, int *retval),(mesh, k, retval))

	FORTRAN_NAME (MMG3D_UNSET_REQUIREDEDGE, mmg3d_unset_requirededge,(MMG5_pMesh mesh, MMG5_int k, int *retval),(mesh, k, retval))

	FORTRAN_NAME (MMG3D_SET_NORMALATVERTEX, mmg3d_set_normalatvertex,(MMG5_pMesh mesh, MMG5_int k, double n0, double n1, double n2, int retval),(mesh, k, n0, n1, n2, retval))

	FORTRAN_NAME (MMG3D_GET_NORMALATVERTEX, mmg3d_get_normalatvertex,(MMG5_pMesh mesh, MMG5_int k, double n0, double n1, double n2, int retval),(mesh, k, n0, n1, n2, retval))

	FORTRAN_NAME (MMG3D_GET_TETRAHEDRONQUALITY, mmg3d_get_tetrahedronquality,(MMG5_pMesh mesh, MMG5_pSol met, MMG5_int k, double retval),(mesh, met, k, retval))

	FORTRAN_NAME (MMG3D_SET_SCALARSOL, mmg3d_set_scalarsol,(MMG5_pSol met, double s, MMG5_int pos, int retval),(met, s, pos, retval))

	FORTRAN_NAME (MMG3D_GET_SCALARSOL, mmg3d_get_scalarsol,(MMG5_pSol met, double s, int *retval),(met, s, retval))

	FORTRAN_NAME (MMG3D_SET_SCALARSOLS, mmg3d_set_scalarsols,(MMG5_pSol met, double s, int *retval),(met, s, retval))

	FORTRAN_NAME (MMG3D_GET_SCALARSOLS, mmg3d_get_scalarsols,(MMG5_pSol met, double s, int *retval),(met, s, retval))

	FORTRAN_NAME (MMG3D_SET_VECTORSOL, mmg3d_set_vectorsol,(MMG5_pSol met, double vx, double vy, double vz, MMG5_int pos, int retval),(met, vx, vy, vz, pos, retval))

	FORTRAN_NAME (MMG3D_GET_VECTORSOL, mmg3d_get_vectorsol,(MMG5_pSol met, double vx, double vy, double vz, int *retval),(met, vx, vy, vz, retval))

	FORTRAN_NAME (MMG3D_SET_VECTORSOLS, mmg3d_set_vectorsols,(MMG5_pSol met, double sols, int *retval),(met, sols, retval))

	FORTRAN_NAME (MMG3D_GET_VECTORSOLS, mmg3d_get_vectorsols,(MMG5_pSol met, double sols, int *retval),(met, sols, retval))

	FORTRAN_NAME (MMG3D_SET_TENSORSOL, mmg3d_set_tensorsol,(MMG5_pSol met, double m11, double m12, double m13, double m22, double m23, double m33, MMG5_int pos, int *retval),(met, m11, m12, m13, m22, m23, m33, pos, retval))

	FORTRAN_NAME (MMG3D_GET_TENSORSOL, mmg3d_get_tensorsol,(MMG5_pSol met, double m11, double m12, double m13, double m22, double m23, double m33, int retval),(met, m11, m12, m13, m22, m23, m33, retval))

	FORTRAN_NAME (MMG3D_SET_TENSORSOLS, mmg3d_set_tensorsols,(MMG5_pSol met, double sols, int *retval),(met, sols, retval))

	FORTRAN_NAME (MMG3D_GET_TENSORSOLS, mmg3d_get_tensorsols,(MMG5_pSol met, double sols, int *retval),(met, sols, retval))

	FORTRAN_NAME (MMG3D_SET_ITHSOL_INSOLSATVERTICES, mmg3d_set_ithsol_insolsatvertices,(MMG5_pSol sol, MMG5_int i, double s, MMG5_int pos, int *retval),(sol, i, s, pos, retval))

	FORTRAN_NAME (MMG3D_GET_ITHSOL_INSOLSATVERTICES, mmg3d_get_ithsol_insolsatvertices,(MMG5_pSol sol, MMG5_int i, double s, MMG5_int pos, int *retval),(sol, i, s, pos, retval))

	FORTRAN_NAME (MMG3D_SET_ITHSOLS_INSOLSATVERTICES, mmg3d_set_ithsols_insolsatvertices,(MMG5_pSol sol, MMG5_int i, double s, int retval),(sol, i, s, retval))

	FORTRAN_NAME (MMG3D_GET_ITHSOLS_INSOLSATVERTICES, mmg3d_get_ithsols_insolsatvertices,(MMG5_pSol sol, MMG5_int i, double s, int retval),(sol, i, s, retval))

	FORTRAN_NAME (MMG3D_SET_HANDGIVENMESH, mmg3d_set_handgivenmesh,(MMG5_pMesh *mesh),(mesh))

	FORTRAN_NAME (MMG3D_CHK_MESHDATA, mmg3d_chk_meshdata,(MMG5_pMesh mesh, MMG5_pSol met, int *retval),(mesh, met, retval))

	FORTRAN_NAME (MMG3D_ADD_TETRAHEDRON, mmg3d_add_tetrahedron,(MMG5_pMesh mesh, MMG5_int v0, MMG5_int v1, MMG5_int v2, MMG5_int v3, MMG5_int ref, int *retval),(mesh, v0, v1, v2, v3, ref, retval))

	FORTRAN_NAME (MMG3D_ADD_VERTEX, mmg3d_add_vertex,(MMG5_pMesh mesh, double c0, double c1, double c2, MMG5_int ref, MMG5_int retval),(mesh, c0, c1, c2, ref, retval))

	FORTRAN_NAME (MMG3D_SET_IPARAMETER, mmg3d_set_iparameter,(MMG5_pMesh mesh, MMG5_pSol sol, int iparam, MMG5_int val, int *retval),(mesh, sol, iparam, val, retval))

	FORTRAN_NAME (MMG3D_GET_IPARAMETER, mmg3d_get_iparameter,(MMG5_pMesh mesh, int iparam, MMG5_int *retval),(mesh, iparam, retval))

	FORTRAN_NAME (MMG3D_SET_DPARAMETER, mmg3d_set_dparameter,(MMG5_pMesh mesh, MMG5_pSol sol, int dparam, double val, int *retval),(mesh, sol, dparam, val, retval))

	FORTRAN_NAME (MMG3D_SET_LOCALPARAMETER, mmg3d_set_localparameter,(MMG5_pMesh mesh, MMG5_pSol sol, int typ, MMG5_int ref, double hmin, double hmax, double hausd, int retval),(mesh, sol, typ, ref, hmin, hmax, hausd, retval))

	FORTRAN_NAME (MMG3D_SET_MULTIMAT, mmg3d_set_multimat,(MMG5_pMesh mesh, MMG5_pSol sol, MMG5_int ref, int split, MMG5_int rin, MMG5_int rex, int *retval),(mesh, sol, ref, split, rin, rex, retval))

	FORTRAN_NAME (MMG3D_SET_LSBASEREFERENCE, mmg3d_set_lsbasereference,(MMG5_pMesh mesh, MMG5_pSol sol, int br, int retval),(mesh, sol, br, retval))

	FORTRAN_NAME (MMG3D_FREE_ALLSOLS, mmg3d_free_allsols,(MMG5_pMesh mesh, MMG5_pSol sol, int *retval),(mesh, sol, retval))

	FORTRAN_VARIADIC (MMG3D_FREE_ALL, mmg3d_free_all,(const int starter,...), va_list argptr;int ier;va_start(argptr, starter);ier=MMG3D_Free_all_var(argptr);va_end(argptr);if(!ier) exit(EXIT_FAILURE);return;) FORTRAN_VARIADIC(MMG3D_FREE_STRUCTURES

	va_start (argptr, starter)

	va_end (argptr)

	if (!ier) exit(EXIT_FAILURE)

	FORTRAN_VARIADIC (MMG3D_FREE_NAMES, mmg3d_free_names,(const int starter,...), va_list argptr;int ier;va_start(argptr, starter);ier=MMG3D_Free_names_var(argptr);va_end(argptr);if(!ier) exit(EXIT_FAILURE);return;) FORTRAN_NAME(MMG3D_LOADMESH

	MMG5_SAFE_MALLOC (tmp, *strlen0+1, char, return)

	strncpy (tmp, filename, *strlen0)

	MMG5_SAFE_FREE (tmp)

	FORTRAN_NAME (MMG3D_LOADVTUMESH, mmg3d_loadvtumesh,(MMG5_pMesh mesh, MMG5_pSol sol, char filename, int strlen0, int *retval),(mesh, sol, filename, strlen0, retval))

	FORTRAN_NAME (MMG3D_LOADVTUMESH_AND_ALLDATA, mmg3d_loadvtumesh_and_alldata,(MMG5_pMesh mesh, MMG5_pSol sol, char filename, int strlen0, int *retval),(mesh, sol, filename, strlen0, retval))

	FORTRAN_NAME (MMG3D_LOADVTKMESH, mmg3d_loadvtkmesh,(MMG5_pMesh mesh, MMG5_pSol sol, char filename, int strlen0, int *retval),(mesh, sol, filename, strlen0, retval))

	FORTRAN_NAME (MMG3D_LOADVTKMESH_AND_ALLDATA, mmg3d_loadvtkmesh_and_alldata,(MMG5_pMesh mesh, MMG5_pSol sol, char filename, int strlen0, int *retval),(mesh, sol, filename, strlen0, retval))

	FORTRAN_NAME (MMG3D_LOADMSHMESH, mmg3d_loadmshmesh,(MMG5_pMesh mesh, MMG5_pSol sol, char filename, int strlen0, int *retval),(mesh, sol, filename, strlen0, retval))

	FORTRAN_NAME (MMG3D_LOADGENERICMESH, mmg3d_loadgenericmesh,(MMG5_pMesh mesh, MMG5_pSol sol, char filename, int strlen0, int *retval),(mesh, sol, filename, strlen0, retval))

	FORTRAN_NAME (MMG3D_LOADMSHMESH_AND_ALLDATA, mmg3d_loadmshmesh_and_alldata,(MMG5_pMesh mesh, MMG5_pSol sol, char filename, int strlen0, int *retval),(mesh, sol, filename, strlen0, retval))

	FORTRAN_NAME (MMG3D_SAVEMESH, mmg3d_savemesh,(MMG5_pMesh mesh, char filename, int strlen0, int retval),(mesh, filename, strlen0, retval))

	FORTRAN_NAME (MMG3D_SAVEVTKMESH, mmg3d_savevtkmesh,(MMG5_pMesh mesh, MMG5_pSol sol, char filename, int strlen0, int *retval),(mesh, sol, filename, strlen0, retval))

	FORTRAN_NAME (MMG3D_SAVEVTKMESH_AND_ALLDATA, mmg3d_savevtkmesh_and_alldata,(MMG5_pMesh mesh, MMG5_pSol sol, char filename, int strlen0, int *retval),(mesh, sol, filename, strlen0, retval))

	FORTRAN_NAME (MMG3D_SAVEVTUMESH, mmg3d_savevtumesh,(MMG5_pMesh mesh, MMG5_pSol sol, char filename, int strlen0, int *retval),(mesh, sol, filename, strlen0, retval))

	FORTRAN_NAME (MMG3D_SAVEVTUMESH_AND_ALLDATA, mmg3d_savevtumesh_and_alldata,(MMG5_pMesh mesh, MMG5_pSol sol, char filename, int strlen0, int *retval),(mesh, sol, filename, strlen0, retval))

	FORTRAN_NAME (MMG3D_SAVEMSHMESH, mmg3d_savemshmesh,(MMG5_pMesh mesh, MMG5_pSol sol, char filename, int strlen0, int *retval),(mesh, sol, filename, strlen0, retval))

	FORTRAN_NAME (MMG3D_SAVEMSHMESH_AND_ALLDATA, mmg3d_savemshmesh_and_alldata,(MMG5_pMesh mesh, MMG5_pSol sol, char filename, int strlen0, int *retval),(mesh, sol, filename, strlen0, retval))

	FORTRAN_NAME (MMG3D_SAVETETGENMESH, mmg3d_savetetgenmesh,(MMG5_pMesh mesh, char meshin, int strlen0, int retval),(mesh, meshin, strlen0, retval))

	FORTRAN_NAME (MMG3D_SAVEGENERICMESH, mmg3d_savegenericmesh,(MMG5_pMesh mesh, MMG5_pSol sol, char filename, int strlen0, int *retval),(mesh, sol, filename, strlen0, retval))

	FORTRAN_NAME (MMG3D_LOADSOL, mmg3d_loadsol,(MMG5_pMesh mesh, MMG5_pSol met, char filename, int strlen0, int *retval),(mesh, met, filename, strlen0, retval))

	FORTRAN_NAME (MMG3D_LOADALLSOLS, mmg3d_loadallsols,(MMG5_pMesh mesh, MMG5_pSol sol, char filename, int strlen0, int *retval),(mesh, sol, filename, strlen0, retval))

	FORTRAN_NAME (MMG3D_SAVESOL, mmg3d_savesol,(MMG5_pMesh mesh, MMG5_pSol met, char filename, int strlen0, int *retval),(mesh, met, filename, strlen0, retval))

	FORTRAN_NAME (MMG3D_SAVEALLSOLS, mmg3d_saveallsols,(MMG5_pMesh mesh, MMG5_pSol sol, char filename, int strlen0, int *retval),(mesh, sol, filename, strlen0, retval))

	FORTRAN_NAME (MMG3D_SWITCH_METRIC_STORAGE, mmg3d_swith_metricstorage,(MMG5_pMesh mesh, MMG5_pSol met, int *retval),(mesh, met, retval))

	FORTRAN_NAME (MMG3D_CLEAN_ISOSURF, mmg3d_clean_isosurf,(MMG5_pMesh mesh, int retval),(mesh, retval))

Variables
	mmg3d_init_parameters

MMG5_pMesh *	mesh

	return

	mmg3d_free_structures

const int	starter

const int va_list	argptr

int	ier = MMG3D_Free_structures_var(argptr)

	mmg3d_loadmesh

MMG5_pMesh char *	filename

MMG5_pMesh char int *	strlen0

MMG5_pMesh char int int *	retval

	tmp [*strlen0] = '\0'

Detailed Description

Fortran API functions for MMG3D library.

Author: Algiane Froehly (Inria/UBordeaux)

Version: 5

Date: 01 2014

Copyright: GNU Lesser General Public License.

Warning: Use the MMG3D_ prefix: MMG5_ prefix will became obsolete soon...

Note: Please, refer to the mmg3d/libmmg3d.h file for functions documentation.

Define the Fortran API functions for MMG3D library: adds function definitions with upcase, underscore and double underscore to match any fortran compiler.

Definition in file API_functionsf_3d.c.

Function Documentation