见https://github.com/torch/nn/blob/master/generic/Tanh.c
例如,
static int nn_(Tanh_updateOutput)(lua_State *L)
{
THTensor *input = luaT_checkudata(L, 2, torch_Tensor);
THTensor *output = luaT_getfieldcheckudata(L, 1, "output", torch_Tensor);
THTensor_(resizeAs)(output, input);
if (input->nDimension == 1 || !THTensor_(isContiguous)(input) || !THTensor_(isContiguous)(output))
{
TH_TENSOR_APPLY2(real, output, real, input, \
*output_data = tanh(*input_data););
}
else
{
real* ptr_output = THTensor_(data)(output);
real* ptr_input = THTensor_(data)(input);
long i;
#pragma omp parallel for private(i)
for(i = 0; i < THTensor_(nElement)(input); i++)
ptr_output[i] = tanh(ptr_input[i]);
}
return 1;
}
首先,我不知道如何解释第一行:
static int nn_(Tanh_updateOutput)(lua_State *L)
这里的论点是什么?Tanh_updateOutput 指的是什么?“nn_”有特殊含义吗?
其次,“TH_TENSOR_APPLY2”和“THTensor_(...)”都被使用了,但我看不出它们是在哪里定义的?此文件中没有其他包含?