!
! Dummy parameters for CEED Fortran 77 stubs
!

!
! CeedMemType
!

      integer ceed_mem_host
      parameter(ceed_mem_host   = 0)

      integer ceed_mem_device
      parameter(ceed_mem_device = 1)

!
! CeedCopyMode
!

      integer ceed_copy_values
      parameter(ceed_copy_values = 0)

      integer ceed_use_pointer
      parameter(ceed_use_pointer = 1)

      integer ceed_own_pointer
      parameter(ceed_own_pointer = 2)

!
! CeedRequest related
!

      integer ceed_request_immediate
      parameter(ceed_request_immediate = -1)

      integer ceed_request_ordered
      parameter(ceed_request_ordered   = -2)

!
! Null
!

      integer ceed_null
      parameter(ceed_null = -3)

!
! CeedTransposeMode
!

      integer ceed_notranspose
      parameter(ceed_notranspose = 0)

      integer ceed_transpose
      parameter(ceed_transpose   = 1)

!
! CeedEvalMode
!

      integer ceed_eval_none
      parameter(ceed_eval_none   = 0 )

      integer ceed_eval_interp
      parameter(ceed_eval_interp = 1 )

      integer ceed_eval_grad
      parameter(ceed_eval_grad   = 2 )

      integer ceed_eval_div
      parameter(ceed_eval_div    = 4 )

      integer ceed_eval_curl
      parameter(ceed_eval_curl   = 8 )

      integer ceed_eval_weight
      parameter(ceed_eval_weight = 16)

!
! CeedQuadMode
!

      integer ceed_gauss
      parameter(ceed_gauss         = 0)

      integer ceed_gauss_lobatto
      parameter(ceed_gauss_lobatto = 1)

!
! CeedElemTopology
!

      integer ceed_line
      parameter(ceed_line        = X'10000' )

      integer ceed_triangle
      parameter(ceed_triangle    = X'20001' )

      integer ceed_quad
      parameter(ceed_quad        = X'20002' )

      integer ceed_tet
      parameter(ceed_tet         = X'30003' )

      integer ceed_pryamid
      parameter(ceed_pryamid     = X'30004' )

      integer ceed_prism
      parameter(ceed_prism       = X'30005' )

      integer ceed_hex
      parameter(ceed_hex         = X'30006' )

!
! OperatorFieldConstants
!

      integer ceed_basis_collocated
      parameter(ceed_basis_collocated     = -1)

      integer ceed_vector_active
      parameter(ceed_vector_active        = -1)

      integer ceed_vector_none
      parameter(ceed_vector_none          = -2)