You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
83 lines
3.1 KiB
83 lines
3.1 KiB
/* Copyright (c) 2016 PaddlePaddle Authors. All Rights Reserved.
|
|
|
|
Licensed under the Apache License, Version 2.0 (the "License");
|
|
you may not use this file except in compliance with the License.
|
|
You may obtain a copy of the License at
|
|
|
|
http://www.apache.org/licenses/LICENSE-2.0
|
|
|
|
Unless required by applicable law or agreed to in writing, software
|
|
distributed under the License is distributed on an "AS IS" BASIS,
|
|
WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
|
|
See the License for the specific language governing permissions and
|
|
limitations under the License. */
|
|
|
|
#include "paddle/fluid/operators/math/lstm_compute.h"
|
|
#include "paddle/fluid/operators/math/detail/lstm_cpu_kernel.h"
|
|
#include "paddle/fluid/operators/math/detail/lstm_kernel.h"
|
|
|
|
namespace paddle {
|
|
namespace operators {
|
|
namespace math {
|
|
|
|
template <class T>
|
|
struct LstmUnitFunctor<platform::CPUDeviceContext, T> {
|
|
static void compute(const platform::CPUDeviceContext& context,
|
|
LstmMetaValue<T> value, int frame_size, int batch_size,
|
|
const detail::ActivationType& gate_act,
|
|
const detail::ActivationType& cell_act,
|
|
const detail::ActivationType& cand_act) {
|
|
for (int b = 0; b < batch_size; b++) {
|
|
detail::cpu_lstm_forward(detail::forward::lstm<T>(), value, frame_size,
|
|
cand_act, gate_act, cell_act);
|
|
value.gate_value += frame_size * 4;
|
|
value.state_value += frame_size;
|
|
value.state_active_value += frame_size;
|
|
value.output_value += frame_size;
|
|
if (value.prev_state_value) {
|
|
value.prev_state_value += frame_size;
|
|
}
|
|
}
|
|
}
|
|
};
|
|
|
|
template <class T>
|
|
struct LstmUnitGradFunctor<platform::CPUDeviceContext, T> {
|
|
static void compute(const platform::CPUDeviceContext& context,
|
|
LstmMetaValue<T> value, LstmMetaGrad<T> grad,
|
|
int frame_size, int batch_size,
|
|
const detail::ActivationType& gate_act,
|
|
const detail::ActivationType& cell_act,
|
|
const detail::ActivationType& cand_act) {
|
|
for (int b = 0; b < batch_size; b++) {
|
|
detail::cpu_lstm_backward(detail::backward::lstm<T>(), value, grad,
|
|
frame_size, cand_act, gate_act, cell_act);
|
|
|
|
value.gate_value += frame_size * 4;
|
|
value.state_value += frame_size;
|
|
value.state_active_value += frame_size;
|
|
value.output_value += frame_size;
|
|
if (value.prev_state_value) {
|
|
value.prev_state_value += frame_size;
|
|
}
|
|
|
|
grad.gate_grad += frame_size * 4;
|
|
grad.state_grad += frame_size;
|
|
grad.state_active_grad += frame_size;
|
|
grad.output_grad += frame_size;
|
|
if (grad.prev_state_grad) {
|
|
grad.prev_state_grad += frame_size;
|
|
}
|
|
}
|
|
}
|
|
};
|
|
|
|
template class LstmUnitFunctor<platform::CPUDeviceContext, float>;
|
|
template class LstmUnitFunctor<platform::CPUDeviceContext, double>;
|
|
template class LstmUnitGradFunctor<platform::CPUDeviceContext, float>;
|
|
template class LstmUnitGradFunctor<platform::CPUDeviceContext, double>;
|
|
|
|
} // namespace math
|
|
} // namespace operators
|
|
} // namespace paddle
|