求助，我的源项出了什么问题呢？

各位老师，我写的源项是找贴近壁面的网格然后赋给负的源项，可以编译但是没办法计算，请问哪里有问题呢？ 报错如下 Node 0: Process 876: Received signal SIGSEGV.============================================================================================================================================================Node 1: Process 10836: Received signal SIGSEGV.============================================================================================================================================================ Node 2: Process 25596: Received signal SIGSEGV.==============================================================================MPI Application rank 0 exited before MPI_Finalize() with status 2 The fl process could not be started UDF是这样的 #include "udf.h" DEFINE_ON_DEMAND(face_souce0) { Domain *d; Thread *t; cell_t c; Thread *t0; cell_t c0; face_t f; d = Get_Domain(1); t = Lookup_Thread(d,14); begin_f_loop(f,t) { c0 = F_C0(f,t); t0 = THREAD_T0(t); C_UDMI(c0,t0,0) = 1.0; } end_f_loop(f, t) } DEFINE_SOURCE(face_source0, cell, thread, dS, eqn) { real source; Thread *t0; cell_t c0; t0 = 0; c0 = 0; source = -0.041*C_YI(cell,thread,0)/C_VOLUME(cell,thread)/CURRENT_TIMESTEP * C_UDMI(c0,t0,0); return source; }