请高手帮忙看一下

buaamonster

我写了一个解释的udf想用来描述周期变化的外壁热流密度边界条件
如下：
*******************************************************************************
#include"udf.h"
DEFINE_PROFILE(unsteady_heat_flux,thread,position)
{
       face_t f;                                                                             /*设置面的索引号。赋值给f*/
       begin_f_loop(f,thread)                                                      /*查询面的循环*/
       {
           real t=RP_Get_Real("flow-time");                               /*访问流动时间，并返回给t*/
           real T=5580;
           real Residue;      
           Residue = fmod (t,T);
           if ((Residue-3960)<0)  
                 F_PROFILE(f,thread,position)=12658;                 
           else
                 F_PROFILE(f,thread,position)=0;
       }
        end_f_loop(f,thread)
}
**********************************************************************************************
点interpret后一直出现下面的错误
line 1: parse error.