Lines Matching refs:FORTRAN_NULL
20 #define FORTRAN_NULL -3 macro
96 if (*ceed == FORTRAN_NULL) return; in fCeedDestroy()
100 *ceed = FORTRAN_NULL; in fCeedDestroy()
206 if (*vec == FORTRAN_NULL) return; in fCeedVectorDestroy()
210 *vec = FORTRAN_NULL; in fCeedVectorDestroy()
483 if (*elem == FORTRAN_NULL) return; in fCeedElemRestrictionDestroy()
487 *elem = FORTRAN_NULL; in fCeedElemRestrictionDestroy()
638 if (*basis == FORTRAN_NULL) return; in fCeedBasisDestroy()
642 *basis = FORTRAN_NULL; in fCeedBasisDestroy()
715 if (*ctx == FORTRAN_NULL) return; in fCeedQFunctionContextDestroy()
719 *ctx = FORTRAN_NULL; in fCeedQFunctionContextDestroy()
892 in[0] = *u == FORTRAN_NULL ? NULL : CeedVector_dict[*u]; in fCeedQFunctionApply()
893 in[1] = *u1 == FORTRAN_NULL ? NULL : CeedVector_dict[*u1]; in fCeedQFunctionApply()
894 in[2] = *u2 == FORTRAN_NULL ? NULL : CeedVector_dict[*u2]; in fCeedQFunctionApply()
895 in[3] = *u3 == FORTRAN_NULL ? NULL : CeedVector_dict[*u3]; in fCeedQFunctionApply()
896 in[4] = *u4 == FORTRAN_NULL ? NULL : CeedVector_dict[*u4]; in fCeedQFunctionApply()
897 in[5] = *u5 == FORTRAN_NULL ? NULL : CeedVector_dict[*u5]; in fCeedQFunctionApply()
898 in[6] = *u6 == FORTRAN_NULL ? NULL : CeedVector_dict[*u6]; in fCeedQFunctionApply()
899 in[7] = *u7 == FORTRAN_NULL ? NULL : CeedVector_dict[*u7]; in fCeedQFunctionApply()
900 in[8] = *u8 == FORTRAN_NULL ? NULL : CeedVector_dict[*u8]; in fCeedQFunctionApply()
901 in[9] = *u9 == FORTRAN_NULL ? NULL : CeedVector_dict[*u9]; in fCeedQFunctionApply()
902 in[10] = *u10 == FORTRAN_NULL ? NULL : CeedVector_dict[*u10]; in fCeedQFunctionApply()
903 in[11] = *u11 == FORTRAN_NULL ? NULL : CeedVector_dict[*u11]; in fCeedQFunctionApply()
904 in[12] = *u12 == FORTRAN_NULL ? NULL : CeedVector_dict[*u12]; in fCeedQFunctionApply()
905 in[13] = *u13 == FORTRAN_NULL ? NULL : CeedVector_dict[*u13]; in fCeedQFunctionApply()
906 in[14] = *u14 == FORTRAN_NULL ? NULL : CeedVector_dict[*u14]; in fCeedQFunctionApply()
907 in[15] = *u15 == FORTRAN_NULL ? NULL : CeedVector_dict[*u15]; in fCeedQFunctionApply()
911 out[0] = *v == FORTRAN_NULL ? NULL : CeedVector_dict[*v]; in fCeedQFunctionApply()
912 out[1] = *v1 == FORTRAN_NULL ? NULL : CeedVector_dict[*v1]; in fCeedQFunctionApply()
913 out[2] = *v2 == FORTRAN_NULL ? NULL : CeedVector_dict[*v2]; in fCeedQFunctionApply()
914 out[3] = *v3 == FORTRAN_NULL ? NULL : CeedVector_dict[*v3]; in fCeedQFunctionApply()
915 out[4] = *v4 == FORTRAN_NULL ? NULL : CeedVector_dict[*v4]; in fCeedQFunctionApply()
916 out[5] = *v5 == FORTRAN_NULL ? NULL : CeedVector_dict[*v5]; in fCeedQFunctionApply()
917 out[6] = *v6 == FORTRAN_NULL ? NULL : CeedVector_dict[*v6]; in fCeedQFunctionApply()
918 out[7] = *v7 == FORTRAN_NULL ? NULL : CeedVector_dict[*v7]; in fCeedQFunctionApply()
919 out[8] = *v8 == FORTRAN_NULL ? NULL : CeedVector_dict[*v8]; in fCeedQFunctionApply()
920 out[9] = *v9 == FORTRAN_NULL ? NULL : CeedVector_dict[*v9]; in fCeedQFunctionApply()
921 out[10] = *v10 == FORTRAN_NULL ? NULL : CeedVector_dict[*v10]; in fCeedQFunctionApply()
922 out[11] = *v11 == FORTRAN_NULL ? NULL : CeedVector_dict[*v11]; in fCeedQFunctionApply()
923 out[12] = *v12 == FORTRAN_NULL ? NULL : CeedVector_dict[*v12]; in fCeedQFunctionApply()
924 out[13] = *v13 == FORTRAN_NULL ? NULL : CeedVector_dict[*v13]; in fCeedQFunctionApply()
925 out[14] = *v14 == FORTRAN_NULL ? NULL : CeedVector_dict[*v14]; in fCeedQFunctionApply()
926 out[15] = *v15 == FORTRAN_NULL ? NULL : CeedVector_dict[*v15]; in fCeedQFunctionApply()
937 if (*qf == FORTRAN_NULL) return; in fCeedQFunctionDestroy()
941 *qf = FORTRAN_NULL; in fCeedQFunctionDestroy()
1002 if (*r == FORTRAN_NULL) { in fCeedOperatorSetField()
1010 if (*b == FORTRAN_NULL) { in fCeedOperatorSetField()
1017 if (*v == FORTRAN_NULL) { in fCeedOperatorSetField()
1245 …CeedVector ustatevec_ = (*ustatevec == FORTRAN_NULL) ? NULL : (*ustatevec == FORTRAN_VECTOR_NONE ?… in fCeedOperatorApply()
1246 …CeedVector resvec_ = (*resvec == FORTRAN_NULL) ? NULL : (*resvec == FORTRAN_VECTOR_NONE ? CEED_… in fCeedOperatorApply()
1274 CeedVector ustatevec_ = *ustatevec == FORTRAN_NULL ? NULL : CeedVector_dict[*ustatevec]; in fCeedOperatorApplyAdd()
1275 CeedVector resvec_ = *resvec == FORTRAN_NULL ? NULL : CeedVector_dict[*resvec]; in fCeedOperatorApplyAdd()
1311 if (*op == FORTRAN_NULL) return; in fCeedOperatorDestroy()
1314 *op = FORTRAN_NULL; in fCeedOperatorDestroy()