mmgs
|
Fortran API functions for MMGS library. More...
#include "mmgs.h"
Functions | |
FORTRAN_VARIADIC (MMGS_INIT_MESH, mmgs_init_mesh,(const int starter,...), va_list argptr;int ier;va_start(argptr, starter);ier=MMGS_Init_mesh_var(argptr);va_end(argptr);if(!ier) exit(EXIT_FAILURE);return;) FORTRAN_NAME(MMGS_INIT_PARAMETERS | |
FORTRAN_NAME (MMGS_SET_INPUTMESHNAME, mmgs_set_inputmeshname,(MMG5_pMesh *mesh, char *meshin, int *strlen0, int *retval),(mesh, meshin, strlen0, retval)) | |
FORTRAN_NAME (MMGS_SET_INPUTSOLNAME, mmgs_set_inputsolname,(MMG5_pMesh *mesh, MMG5_pSol *sol, char *solin, int *strlen0, int *retval),(mesh, sol, solin, strlen0, retval)) | |
FORTRAN_NAME (MMGS_SET_OUTPUTMESHNAME, mmgs_set_outputmeshname,(MMG5_pMesh *mesh, char *meshout, int *strlen0, int *retval),(mesh, meshout, strlen0, retval)) | |
FORTRAN_NAME (MMGS_SET_OUTPUTSOLNAME, mmgs_set_outputsolname,(MMG5_pMesh *mesh, MMG5_pSol *sol, char *solout, int *strlen0, int *retval),(mesh, sol, solout, strlen0, retval)) | |
FORTRAN_NAME (MMGS_SET_SOLSIZE, mmgs_set_solsize,(MMG5_pMesh *mesh, MMG5_pSol *sol, int *typEntity, int *np, int *typSol, int *retval),(mesh, sol, typEntity, np, typSol, retval)) | |
FORTRAN_NAME (MMGS_SET_SOLSATVERTICESSIZE, mmgs_set_solsatverticessize,(MMG5_pMesh *mesh, MMG5_pSol *sol, int *nsols, int *nentities, int *typSol, int *retval),(mesh, sol, nsols, nentities, typSol, retval)) | |
FORTRAN_NAME (MMGS_SET_MESHSIZE, mmgs_set_meshsize,(MMG5_pMesh *mesh, int *np, int *nt, int *na, int *retval),(mesh, np, nt, na, retval)) | |
FORTRAN_NAME (MMGS_GET_SOLSIZE, mmgs_get_solsize,(MMG5_pMesh *mesh, MMG5_pSol *sol, int *typEntity, int *np, int *typSol, int *retval),(mesh, sol, typEntity, np, typSol, retval)) | |
FORTRAN_NAME (MMGS_GET_SOLSATVERTICESSIZE, mmgs_get_solsatverticessize,(MMG5_pMesh *mesh, MMG5_pSol *sol, int *nsols, int *nentities, int *typSol, int *retval),(mesh, sol, nsols, nentities, typSol, retval)) | |
FORTRAN_NAME (MMGS_GET_MESHSIZE, mmgs_get_meshsize,(MMG5_pMesh *mesh, int *np, int *nt, int *na, int *retval),(mesh, np, nt, na, retval)) | |
FORTRAN_NAME (MMGS_SET_VERTEX, mmgs_set_vertex,(MMG5_pMesh *mesh, double *c0, double *c1, double *c2, int *ref, int *pos, int *retval),(mesh, c0, c1, c2, ref, pos, retval)) | |
FORTRAN_NAME (MMGS_GET_VERTEX, mmgs_get_vertex,(MMG5_pMesh *mesh, double *c0, double *c1, double *c2, int *ref, int *isCorner, int *isRequired, int *retval),(mesh, c0, c1, c2, ref, isCorner, isRequired, retval)) | |
FORTRAN_NAME (MMGS_SET_VERTICES, mmgs_set_vertices,(MMG5_pMesh *mesh, double *vertices, int *refs, int *retval),(mesh, vertices, refs, retval)) | |
FORTRAN_NAME (MMGS_GET_VERTICES, mmgs_get_vertices,(MMG5_pMesh *mesh, double *vertices, int *refs, int *areCorners, int *areRequired, int *retval),(mesh, vertices, refs, areCorners, areRequired, retval)) | |
FORTRAN_NAME (MMGS_SET_TRIANGLE, mmgs_set_triangle,(MMG5_pMesh *mesh, int *v0, int *v1, int *v2, int *ref, int *pos, int *retval),(mesh, v0, v1, v2, ref, pos, retval)) | |
FORTRAN_NAME (MMGS_GET_TRIANGLE, mmgs_get_triangle,(MMG5_pMesh *mesh, int *v0, int *v1, int *v2, int *ref, int *isRequired, int *retval),(mesh, v0, v1, v2, ref, isRequired, retval)) | |
FORTRAN_NAME (MMGS_SET_TRIANGLES, mmgs_set_triangles,(MMG5_pMesh *mesh, int *tria, int *refs, int *retval),(mesh, tria, refs, retval)) | |
FORTRAN_NAME (MMGS_GET_TRIANGLES, mmgs_get_triangles,(MMG5_pMesh *mesh, int *tria, int *refs, int *areRequired, int *retval),(mesh, tria, refs, areRequired, retval)) | |
FORTRAN_NAME (MMGS_SET_EDGE, mmgs_set_edge,(MMG5_pMesh *mesh, int *v0, int *v1, int *ref, int *pos, int *retval),(mesh, v0, v1, ref, pos, retval)) | |
FORTRAN_NAME (MMGS_GET_EDGE, mmgs_get_edge,(MMG5_pMesh *mesh, int *e0, int *e1, int *ref, int *isRidge, int *isRequired, int *retval),(mesh, e0, e1, ref, isRidge, isRequired, retval)) | |
FORTRAN_NAME (MMGS_SET_EDGES, mmgs_set_edges,(MMG5_pMesh *mesh, int *edges, int *refs, int *retval),(mesh, edges, refs, retval)) | |
FORTRAN_NAME (MMGS_GET_EDGES, mmgs_get_edges,(MMG5_pMesh *mesh, int *edges, int *refs, int *areRidges, int *areRequired, int *retval),(mesh, edges, refs, areRidges, areRequired, retval)) | |
FORTRAN_NAME (MMGS_SET_CORNER, mmgs_set_corner,(MMG5_pMesh *mesh, int *k, int *retval),(mesh, k, retval)) | |
FORTRAN_NAME (MMGS_SET_REQUIREDVERTEX, mmgs_set_requiredvertex,(MMG5_pMesh *mesh, int *k, int *retval),(mesh, k, retval)) | |
FORTRAN_NAME (MMGS_SET_REQUIREDTRIANGLE, mmgs_set_requiredtriangle,(MMG5_pMesh *mesh, int *k, int *retval),(mesh, k, retval)) | |
FORTRAN_NAME (MMGS_SET_RIDGE, mmgs_set_ridge,(MMG5_pMesh *mesh, int *k, int *retval),(mesh, k, retval)) | |
FORTRAN_NAME (MMGS_SET_REQUIREDEDGE, mmgs_set_requirededge,(MMG5_pMesh *mesh, int *k, int *retval),(mesh, k, retval)) | |
FORTRAN_NAME (MMGS_SET_NORMALATVERTEX, mmgs_set_normalatvertex,(MMG5_pMesh *mesh, int *k, double *n0, double *n1, double *n2, int *retval),(mesh, k, n0, n1, n2, retval)) | |
FORTRAN_NAME (MMGS_GET_NORMALATVERTEX, mmgs_get_normalatvertex,(MMG5_pMesh *mesh, int *k, double *n0, double *n1, double *n2, int *retval),(mesh, k, n0, n1, n2, retval)) | |
FORTRAN_NAME (MMGS_SET_SCALARSOL, mmgs_set_scalarsol,(MMG5_pSol *met, double *s, int *pos, int *retval),(met, s, pos, retval)) | |
FORTRAN_NAME (MMGS_GET_SCALARSOL, mmgs_get_scalarsol,(MMG5_pSol *met, double *s, int *retval),(met, s, retval)) | |
FORTRAN_NAME (MMGS_SET_SCALARSOLS, mmgs_set_scalarsols,(MMG5_pSol *met, double *s, int *retval),(met, s, retval)) | |
FORTRAN_NAME (MMGS_GET_SCALARSOLS, mmgs_get_scalarsols,(MMG5_pSol *met, double *s, int *retval),(met, s, retval)) | |
FORTRAN_NAME (MMGS_SET_VECTORSOL, mmgs_set_vectorsol,(MMG5_pSol *met, double *vx, double *vy, double *vz, int *pos, int *retval),(met, vx, vy, vz, pos, retval)) | |
FORTRAN_NAME (MMGS_GET_VECTORSOL, mmgs_get_vectorsol,(MMG5_pSol *met, double *vx, double *vy, double *vz, int *retval),(met, vx, vy, vz, retval)) | |
FORTRAN_NAME (MMGS_SET_VECTORSOLS, mmgs_set_vectorsols,(MMG5_pSol *met, double *sols, int *retval),(met, sols, retval)) | |
FORTRAN_NAME (MMGS_GET_VECTORSOLS, mmgs_get_vectorsols,(MMG5_pSol *met, double *sols, int *retval),(met, sols, retval)) | |
FORTRAN_NAME (MMGS_SET_TENSORSOL, mmgs_set_tensorsol,(MMG5_pSol *met, double *m11, double *m12, double *m13, double *m22, double *m23, double *m33, int *pos, int *retval),(met, m11, m12, m13, m22, m23, m33, pos, retval)) | |
FORTRAN_NAME (MMGS_GET_TENSORSOL, mmgs_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 (MMGS_SET_TENSORSOLS, mmgs_set_tensorsols,(MMG5_pSol *met, double *sols, int *retval),(met, sols, retval)) | |
FORTRAN_NAME (MMGS_GET_TENSORSOLS, mmgs_get_tensorsols,(MMG5_pSol *met, double *sols, int *retval),(met, sols, retval)) | |
FORTRAN_NAME (MMGS_SET_ITHSOL_INSOLSATVERTICES, mmgs_set_ithsol_insolsatvertices,(MMG5_pSol *sol, int *i, double *s, int *pos, int *retval),(sol, i, s, pos, retval)) | |
FORTRAN_NAME (MMGS_GET_ITHSOL_INSOLSATVERTICES, mmgs_get_ithsol_insolsatvertices,(MMG5_pSol *sol, int *i, double *s, int *pos, int *retval),(sol, i, s, pos, retval)) | |
FORTRAN_NAME (MMGS_SET_ITHSOLS_INSOLSATVERTICES, mmgs_set_ithsols_insolsatvertices,(MMG5_pSol *sol, int *i, double *s, int *retval),(sol, i, s, retval)) | |
FORTRAN_NAME (MMGS_GET_ITHSOLS_INSOLSATVERTICES, mmgs_get_ithsols_insolsatvertices,(MMG5_pSol *sol, int *i, double *s, int *retval),(sol, i, s, retval)) | |
FORTRAN_NAME (MMGS_CHK_MESHDATA, mmgs_chk_meshdata,(MMG5_pMesh *mesh, MMG5_pSol *met, int *retval),(mesh, met, retval)) | |
FORTRAN_NAME (MMGS_SET_IPARAMETER, mmgs_set_iparameter,(MMG5_pMesh *mesh, MMG5_pSol *sol, int *iparam, int *val, int *retval),(mesh, sol, iparam, val, retval)) | |
FORTRAN_NAME (MMGS_GET_IPARAMETER, mmgs_get_iparameter,(MMG5_pMesh *mesh, int *iparam, int *retval),(mesh, iparam, retval)) | |
FORTRAN_NAME (MMGS_SET_DPARAMETER, mmgs_set_dparameter,(MMG5_pMesh *mesh, MMG5_pSol *sol, int *dparam, double *val, int *retval),(mesh, sol, dparam, val, retval)) | |
FORTRAN_NAME (MMGS_SET_LOCALPARAMETER, mmgs_set_localparameter,(MMG5_pMesh *mesh, MMG5_pSol *sol, int *typ, int *ref, double *hmin, double *hmax, double *hausd, int *retval),(mesh, sol, typ, ref, hmin, hmax, hausd, retval)) | |
FORTRAN_VARIADIC (MMGS_FREE_ALL, mmgs_free_all,(const int starter,...), va_list argptr;int ier;va_start(argptr, starter);ier=MMGS_Free_all_var(argptr);va_end(argptr);if(!ier) exit(EXIT_FAILURE);return;) FORTRAN_VARIADIC(MMGS_FREE_STRUCTURES | |
va_start (argptr, starter) | |
va_end (argptr) | |
if (!ier) exit(EXIT_FAILURE) | |
FORTRAN_VARIADIC (MMGS_FREE_NAMES, mmgs_free_names,(const int starter,...), va_list argptr;int ier;va_start(argptr, starter);ier=MMGS_Free_names_var(argptr);va_end(argptr);if(!ier) exit(EXIT_FAILURE);return;) FORTRAN_NAME(MMGS_LOADMESH | |
MMG5_SAFE_MALLOC (tmp, *strlen0+1, char, return) | |
strncpy (tmp, meshin, *strlen0) | |
MMG5_SAFE_FREE (tmp) | |
FORTRAN_NAME (MMGS_LOADMSHMESH, mmgs_loadmshmesh,(MMG5_pMesh *mesh, MMG5_pSol *sol, char *filename, int *strlen0, int *retval),(mesh, sol, filename, strlen0, retval)) | |
FORTRAN_NAME (MMGS_LOADMSHMESH_AND_ALLDATA, mmgs_loadmshmesh_and_alldata,(MMG5_pMesh *mesh, MMG5_pSol *sol, char *filename, int *strlen0, int *retval),(mesh, sol, filename, strlen0, retval)) | |
FORTRAN_NAME (MMGS_LOADSOL, mmgs_loadsol,(MMG5_pMesh *mesh, MMG5_pSol *met, char *meshin, int *strlen0, int *retval),(mesh, met, meshin, strlen0, retval)) | |
FORTRAN_NAME (MMGS_LOADALLSOLS, mmgs_loadallsols,(MMG5_pMesh *mesh, MMG5_pSol *sol, char *meshin, int *strlen0, int *retval),(mesh, sol, meshin, strlen0, retval)) | |
FORTRAN_NAME (MMGS_SAVEMESH, mmgs_savemesh,(MMG5_pMesh *mesh, char *meshin, int *strlen0, int *retval),(mesh, meshin, strlen0, retval)) | |
FORTRAN_NAME (MMGS_SAVEMSHMESH, mmgs_savemshmesh,(MMG5_pMesh *mesh, MMG5_pSol *sol, char *filename, int *strlen0, int *retval),(mesh, sol, filename, strlen0, retval)) | |
FORTRAN_NAME (MMGS_SAVESOL, mmgs_savesol,(MMG5_pMesh *mesh, MMG5_pSol *met, char *meshin, int *strlen0, int *retval),(mesh, met, meshin, strlen0, retval)) | |
FORTRAN_NAME (MMGS_SAVEALLSOLS, mmgs_saveallsols,(MMG5_pMesh *mesh, MMG5_pSol *sol, char *filename, int *strlen0, int *retval),(mesh, sol, filename, strlen0, retval)) | |
Variables | |
mmgs_init_parameters | |
MMG5_pMesh * | mesh |
return | |
mmgs_free_structures | |
const int | starter |
const int va_list | argptr |
int | ier = MMGS_Free_structures_var(argptr) |
mmgs_loadmesh | |
MMG5_pMesh char * | meshin |
MMG5_pMesh char int * | strlen0 |
MMG5_pMesh char int int * | retval |
tmp [*strlen0] = '\0' | |
Fortran API functions for MMGS library.
Define the Fortran API functions for MMGS library: adds function definitions with upcase, underscore and double underscore to match any fortran compiler.
FORTRAN_NAME | ( | MMGS_SET_INPUTMESHNAME | , |
mmgs_set_inputmeshname | , | ||
(MMG5_pMesh *mesh, char *meshin, int *strlen0, int *retval) | , | ||
(mesh, meshin, strlen0, retval) | |||
) |
See MMGS_Set_inputMeshName function in common/libmmgcommon.h file.
FORTRAN_NAME | ( | MMGS_SET_INPUTSOLNAME | , |
mmgs_set_inputsolname | , | ||
(MMG5_pMesh *mesh, MMG5_pSol *sol, char *solin, int *strlen0, int *retval) | , | ||
(mesh, sol, solin, strlen0, retval) | |||
) |
See MMGS_Set_inputSolName function in common/libmmgcommon.h file.
FORTRAN_NAME | ( | MMGS_SET_OUTPUTMESHNAME | , |
mmgs_set_outputmeshname | , | ||
(MMG5_pMesh *mesh, char *meshout, int *strlen0, int *retval) | , | ||
(mesh, meshout, strlen0, retval) | |||
) |
See MMGS_Set_outputMeshName function in mmgs/libmmgs.h or mmgs/libmmgs.h file.
FORTRAN_NAME | ( | MMGS_SET_OUTPUTSOLNAME | , |
mmgs_set_outputsolname | , | ||
(MMG5_pMesh *mesh, MMG5_pSol *sol, char *solout, int *strlen0, int *retval) | , | ||
(mesh, sol, solout, strlen0, retval) | |||
) |
See MMGS_Set_outputSolName function in common/libmmgcommon.h file.
FORTRAN_NAME | ( | MMGS_SET_SOLSIZE | , |
mmgs_set_solsize | , | ||
(MMG5_pMesh *mesh, MMG5_pSol *sol, int *typEntity, int *np, int *typSol, int *retval) | , | ||
(mesh, sol, typEntity, np, typSol, retval) | |||
) |
FORTRAN_NAME | ( | MMGS_SET_SOLSATVERTICESSIZE | , |
mmgs_set_solsatverticessize | , | ||
(MMG5_pMesh *mesh, MMG5_pSol *sol, int *nsols, int *nentities, int *typSol, int *retval) | , | ||
(mesh, sol, nsols, nentities, typSol, retval) | |||
) |
See MMGS_Set_solAtVerticesSize function in mmgs/libmmgs.h file.
FORTRAN_NAME | ( | MMGS_GET_SOLSIZE | , |
mmgs_get_solsize | , | ||
(MMG5_pMesh *mesh, MMG5_pSol *sol, int *typEntity, int *np, int *typSol, int *retval) | , | ||
(mesh, sol, typEntity, np, typSol, retval) | |||
) |
FORTRAN_NAME | ( | MMGS_GET_SOLSATVERTICESSIZE | , |
mmgs_get_solsatverticessize | , | ||
(MMG5_pMesh *mesh, MMG5_pSol *sol, int *nsols, int *nentities, int *typSol, int *retval) | , | ||
(mesh, sol, nsols, nentities, typSol, retval) | |||
) |
See MMGS_Get_solsatverticessize function in mmgs/libmmgs.h file.
FORTRAN_NAME | ( | MMGS_SET_VERTEX | , |
mmgs_set_vertex | , | ||
(MMG5_pMesh *mesh, double *c0, double *c1, double *c2, int *ref, int *pos, int *retval) | , | ||
(mesh, c0, c1, c2, ref, pos, retval) | |||
) |
FORTRAN_NAME | ( | MMGS_GET_VERTEX | , |
mmgs_get_vertex | , | ||
(MMG5_pMesh *mesh, double *c0, double *c1, double *c2, int *ref, int *isCorner, int *isRequired, int *retval) | , | ||
(mesh, c0, c1, c2, ref, isCorner, isRequired, retval) | |||
) |
FORTRAN_NAME | ( | MMGS_SET_VERTICES | , |
mmgs_set_vertices | , | ||
(MMG5_pMesh *mesh, double *vertices, int *refs, int *retval) | , | ||
(mesh, vertices, refs, retval) | |||
) |
FORTRAN_NAME | ( | MMGS_GET_VERTICES | , |
mmgs_get_vertices | , | ||
(MMG5_pMesh *mesh, double *vertices, int *refs, int *areCorners, int *areRequired, int *retval) | , | ||
(mesh, vertices, refs, areCorners, areRequired, retval) | |||
) |
FORTRAN_NAME | ( | MMGS_SET_TRIANGLE | , |
mmgs_set_triangle | , | ||
(MMG5_pMesh *mesh, int *v0, int *v1, int *v2, int *ref, int *pos, int *retval) | , | ||
(mesh, v0, v1, v2, ref, pos, retval) | |||
) |
FORTRAN_NAME | ( | MMGS_GET_TRIANGLE | , |
mmgs_get_triangle | , | ||
(MMG5_pMesh *mesh, int *v0, int *v1, int *v2, int *ref,int *isRequired, int *retval) | , | ||
(mesh, v0, v1, v2, ref, isRequired, retval) | |||
) |
FORTRAN_NAME | ( | MMGS_SET_TRIANGLES | , |
mmgs_set_triangles | , | ||
(MMG5_pMesh *mesh, int *tria, int *refs, int *retval) | , | ||
(mesh, tria, refs, retval) | |||
) |
FORTRAN_NAME | ( | MMGS_GET_TRIANGLES | , |
mmgs_get_triangles | , | ||
(MMG5_pMesh *mesh, int *tria, int *refs, int *areRequired, int *retval) | , | ||
(mesh, tria, refs, areRequired, retval) | |||
) |
FORTRAN_NAME | ( | MMGS_SET_EDGE | , |
mmgs_set_edge | , | ||
(MMG5_pMesh *mesh, int *v0, int *v1, int *ref, int *pos, int *retval) | , | ||
(mesh, v0, v1, ref, pos, retval) | |||
) |
FORTRAN_NAME | ( | MMGS_GET_EDGE | , |
mmgs_get_edge | , | ||
(MMG5_pMesh *mesh, int *e0, int *e1, int *ref,int *isRidge, int *isRequired, int *retval) | , | ||
(mesh, e0, e1, ref, isRidge, isRequired, retval) | |||
) |
FORTRAN_NAME | ( | MMGS_SET_EDGES | , |
mmgs_set_edges | , | ||
(MMG5_pMesh *mesh, int *edges, int *refs, int *retval) | , | ||
(mesh, edges, refs, retval) | |||
) |
FORTRAN_NAME | ( | MMGS_GET_EDGES | , |
mmgs_get_edges | , | ||
(MMG5_pMesh *mesh, int *edges, int *refs, int *areRidges, int *areRequired, int *retval) | , | ||
(mesh, edges, refs, areRidges, areRequired, retval) | |||
) |
FORTRAN_NAME | ( | MMGS_SET_CORNER | , |
mmgs_set_corner | , | ||
(MMG5_pMesh *mesh, int *k, int *retval) | , | ||
(mesh, k, retval) | |||
) |
FORTRAN_NAME | ( | MMGS_SET_REQUIREDVERTEX | , |
mmgs_set_requiredvertex | , | ||
(MMG5_pMesh *mesh, int *k, int *retval) | , | ||
(mesh, k, retval) | |||
) |
See MMGS_Set_requiredVertex function in mmgs/libmmgs.h file.
FORTRAN_NAME | ( | MMGS_SET_REQUIREDTRIANGLE | , |
mmgs_set_requiredtriangle | , | ||
(MMG5_pMesh *mesh, int *k, int *retval) | , | ||
(mesh, k, retval) | |||
) |
See MMGS_Set_requiredTriangle function in mmgs/libmmgs.h file.
FORTRAN_NAME | ( | MMGS_SET_RIDGE | , |
mmgs_set_ridge | , | ||
(MMG5_pMesh *mesh, int *k, int *retval) | , | ||
(mesh, k, retval) | |||
) |
FORTRAN_NAME | ( | MMGS_SET_REQUIREDEDGE | , |
mmgs_set_requirededge | , | ||
(MMG5_pMesh *mesh, int *k, int *retval) | , | ||
(mesh, k, retval) | |||
) |
See MMGS_Set_requiredEdge function in mmgs/libmmgs.h file.
FORTRAN_NAME | ( | MMGS_SET_NORMALATVERTEX | , |
mmgs_set_normalatvertex | , | ||
(MMG5_pMesh *mesh, int *k, double *n0, double *n1, double *n2, int *retval) | , | ||
(mesh, k, n0, n1, n2, retval) | |||
) |
See MMGS_Set_normalAtVertex function in mmgs/libmmgs.h file.
FORTRAN_NAME | ( | MMGS_GET_NORMALATVERTEX | , |
mmgs_get_normalatvertex | , | ||
(MMG5_pMesh *mesh, int *k, double *n0, double *n1, double *n2, int *retval) | , | ||
(mesh, k, n0, n1, n2, retval) | |||
) |
See MMGS_Get_normalAtVertex function in mmgs/libmmgs.h file.
FORTRAN_NAME | ( | MMGS_SET_VECTORSOL | , |
mmgs_set_vectorsol | , | ||
(MMG5_pSol *met, double *vx, double *vy, double *vz, int *pos, int *retval) | , | ||
(met, vx, vy, vz, pos, retval) | |||
) |
FORTRAN_NAME | ( | MMGS_GET_VECTORSOL | , |
mmgs_get_vectorsol | , | ||
(MMG5_pSol *met, double *vx, double *vy, double *vz, int *retval) | , | ||
(met, vx, vy, vz, retval) | |||
) |
FORTRAN_NAME | ( | MMGS_SET_VECTORSOLS | , |
mmgs_set_vectorsols | , | ||
(MMG5_pSol *met, double *sols, int *retval) | , | ||
(met, sols, retval) | |||
) |
FORTRAN_NAME | ( | MMGS_GET_VECTORSOLS | , |
mmgs_get_vectorsols | , | ||
(MMG5_pSol *met, double *sols, int *retval) | , | ||
(met, sols, retval) | |||
) |
FORTRAN_NAME | ( | MMGS_SET_TENSORSOL | , |
mmgs_set_tensorsol | , | ||
(MMG5_pSol *met, double *m11, double *m12, double *m13, double *m22, double *m23, double *m33, int *pos, int *retval) | , | ||
(met, m11, m12, m13, m22, m23, m33, pos, retval) | |||
) |
FORTRAN_NAME | ( | MMGS_GET_TENSORSOL | , |
mmgs_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 | ( | MMGS_SET_TENSORSOLS | , |
mmgs_set_tensorsols | , | ||
(MMG5_pSol *met, double *sols, int *retval) | , | ||
(met, sols, retval) | |||
) |
FORTRAN_NAME | ( | MMGS_GET_TENSORSOLS | , |
mmgs_get_tensorsols | , | ||
(MMG5_pSol *met, double *sols, int *retval) | , | ||
(met, sols, retval) | |||
) |
FORTRAN_NAME | ( | MMGS_SET_ITHSOL_INSOLSATVERTICES | , |
mmgs_set_ithsol_insolsatvertices | , | ||
(MMG5_pSol *sol, int *i, double *s, int *pos, int *retval) | , | ||
(sol, i, s, pos, retval) | |||
) |
See MMGS_Set_ithSol_solsAtVertices function in mmgs/libmmgs.h file.
FORTRAN_NAME | ( | MMGS_GET_ITHSOL_INSOLSATVERTICES | , |
mmgs_get_ithsol_insolsatvertices | , | ||
(MMG5_pSol *sol, int *i, double *s, int *pos, int *retval) | , | ||
(sol, i, s, pos, retval) | |||
) |
See MMGS_Get_ithSol_inSolsAtVertices function in mmgs/libmmgs.h file.
FORTRAN_NAME | ( | MMGS_SET_ITHSOLS_INSOLSATVERTICES | , |
mmgs_set_ithsols_insolsatvertices | , | ||
(MMG5_pSol *sol, int *i, double *s, int *retval) | , | ||
(sol, i, s, retval) | |||
) |
See MMGS_Set_ithSols_inSolsAtVertices function in mmgs/libmmgs.h file.
FORTRAN_NAME | ( | MMGS_GET_ITHSOLS_INSOLSATVERTICES | , |
mmgs_get_ithsols_insolsatvertices | , | ||
(MMG5_pSol *sol, int *i, double *s, int *retval) | , | ||
(sol, i, s, retval) | |||
) |
See MMGS_Get_ithSols_inSolsAtVertices function in mmgs/libmmgs.h file.
FORTRAN_NAME | ( | MMGS_CHK_MESHDATA | , |
mmgs_chk_meshdata | , | ||
(MMG5_pMesh *mesh, MMG5_pSol *met, int *retval) | , | ||
(mesh, met, retval) | |||
) |
FORTRAN_NAME | ( | MMGS_SET_IPARAMETER | , |
mmgs_set_iparameter | , | ||
(MMG5_pMesh *mesh, MMG5_pSol *sol, int *iparam, int *val, int *retval) | , | ||
(mesh, sol, iparam, val, retval) | |||
) |
FORTRAN_NAME | ( | MMGS_GET_IPARAMETER | , |
mmgs_get_iparameter | , | ||
(MMG5_pMesh *mesh, int *iparam, int *retval) | , | ||
(mesh, iparam, retval) | |||
) |
FORTRAN_NAME | ( | MMGS_SET_LOCALPARAMETER | , |
mmgs_set_localparameter | , | ||
(MMG5_pMesh *mesh, MMG5_pSol *sol, int *typ, int *ref, double *hmin, double *hmax, double *hausd, int *retval) | , | ||
(mesh, sol, typ, ref, hmin, hmax, hausd, retval) | |||
) |
See MMGS_Set_localParameter function in mmgs/libmmgs.h file.
FORTRAN_NAME | ( | MMGS_LOADMSHMESH | , |
mmgs_loadmshmesh | , | ||
(MMG5_pMesh *mesh, MMG5_pSol *sol, char *filename, int *strlen0, int *retval) | , | ||
(mesh, sol, filename, strlen0, retval) | |||
) |
FORTRAN_NAME | ( | MMGS_LOADMSHMESH_AND_ALLDATA | , |
mmgs_loadmshmesh_and_alldata | , | ||
(MMG5_pMesh *mesh, MMG5_pSol *sol, char *filename, int *strlen0, int *retval) | , | ||
(mesh, sol, filename, strlen0, retval) | |||
) |
See MMGS_loadMshMesh_and_allData function in mmgs/libmmgs.h file.
FORTRAN_NAME | ( | MMGS_SAVEMESH | , |
mmgs_savemesh | , | ||
(MMG5_pMesh *mesh, char *meshin, int *strlen0, int *retval) | , | ||
(mesh, meshin, strlen0, retval) | |||
) |
FORTRAN_NAME | ( | MMGS_SAVEMSHMESH | , |
mmgs_savemshmesh | , | ||
(MMG5_pMesh *mesh, MMG5_pSol *sol, char *filename, int *strlen0, int *retval) | , | ||
(mesh, sol, filename, strlen0, retval) | |||
) |
FORTRAN_NAME | ( | MMGS_SAVEALLSOLS | , |
mmgs_saveallsols | , | ||
(MMG5_pMesh *mesh, MMG5_pSol *sol, char *filename, int *strlen0, int *retval) | , | ||
(mesh, sol, filename, strlen0, retval) | |||
) |
FORTRAN_VARIADIC | ( | MMGS_INIT_MESH | , |
mmgs_init_mesh | , | ||
(const int starter,...) | , | ||
va_list argptr;int ier;va_start(argptr, starter); | ier = MMGS_Init_mesh_var(argptr); va_end(argptr); if ( !ier ) exit(EXIT_FAILURE); return; |
||
) |
See MMGS_Init_mesh function in common/libmmgcommon.h file.See MMGS_Init_parameters function in mmgs/libmmgs.h file.
FORTRAN_VARIADIC | ( | MMGS_FREE_ALL | , |
mmgs_free_all | , | ||
(const int starter,...) | , | ||
va_list argptr;int ier;va_start(argptr, starter); | ier = MMGS_Free_all_var(argptr); va_end(argptr); if ( !ier ) exit(EXIT_FAILURE); return; |
||
) |
See MMGS_Free_all function in mmgs/libmmgs.h file.See MMGS_Free_structures function in mmgs/libmmgs.h file.
FORTRAN_VARIADIC | ( | MMGS_FREE_NAMES | , |
mmgs_free_names | , | ||
(const int starter,...) | , | ||
va_list argptr;int ier;va_start(argptr, starter); | ier = MMGS_Free_names_var(argptr); va_end(argptr); if ( !ier ) exit(EXIT_FAILURE); return; |
||
) |
See MMGS_Free_names function in mmgs/libmmgs.h file.See MMGS_loadMesh function in mmgs/libmmgs.h file.
if | ( | ! | ier | ) |
MMG5_SAFE_FREE | ( | tmp | ) |
va_end | ( | argptr | ) |
const int va_list argptr |
ier = MMGS_Free_structures_var(argptr) |
MMG5_pMesh char int int mesh |
MMG5_pMesh char int int meshin |
mmgs_free_structures |
mmgs_init_parameters |
mmgs_loadmesh |
return |
const int starter |
MMG5_pMesh char int int strlen0 |
tmp[ *strlen0] = '\0' |