semilagranianfluidaddsourceinter.fp

来自「PDE simulator on GPU.」· FP 代码 · 共 16 行

!!FP1.0
#add source for velocity or density 	
DECLARE TouchPos   = {0,0,0,0};
DECLARE SourceTerm = {0,0,0,0};
FLR R0, f[WPOS];
SEQ R1.x, R0.x, TouchPos.x;
SEQ R1.y, R0.y, TouchPos.y;
MUL R1.x, R1.x, R1.y;
MUL R0, R1.x, SourceTerm;

#x(RGB 3 channels)
TEX R1, f[WPOS], TEX1, RECT;

ADD o[COLR], R0, R1;
END