Commits

Lisandro Dalcin  committed e7f5a8f

Add IGAGetOrder()

  • Participants
  • Parent commits a11a4a6

Comments (0)

Files changed (2)

File include/petiga.h

 PETSC_EXTERN PetscErrorCode IGASetFieldName(IGA iga,PetscInt field,const char name[]);
 PETSC_EXTERN PetscErrorCode IGAGetFieldName(IGA iga,PetscInt field,const char *name[]);
 PETSC_EXTERN PetscErrorCode IGASetOrder(IGA iga,PetscInt order);
+PETSC_EXTERN PetscErrorCode IGAGetOrder(IGA iga,PetscInt *order);
 PETSC_EXTERN PetscErrorCode IGASetProcessors(IGA iga,PetscInt i,PetscInt processors);
 PETSC_EXTERN PetscErrorCode IGASetUseCollocation(IGA iga,PetscBool collocation);
 

File src/petiga.c

 }
 
 #undef  __FUNCT__
+#define __FUNCT__ "IGAGetOrder"
+PetscErrorCode IGAGetOrder(IGA iga,PetscInt *order)
+{
+  PetscFunctionBegin;
+  PetscValidHeaderSpecific(iga,IGA_CLASSID,1);
+  PetscValidIntPointer(order,2);
+  *order= iga->order;
+  PetscFunctionReturn(0);
+}
+
+#undef  __FUNCT__
 #define __FUNCT__ "IGASetProcessors"
 PetscErrorCode IGASetProcessors(IGA iga,PetscInt i,PetscInt processors)
 {