11 lines
806 B
Common Lisp
11 lines
806 B
Common Lisp
//============================================================================================= MQL5 ===
|
|
// LibreOCL v1.002 (MQL5)
|
|
// Модуль кернел-функций для OpenCL
|
|
// Librecoin(c)2014-2017
|
|
//------------------------------------------------------------------------------------------------------
|
|
__kernel void Exch(global double *ix)
|
|
{
|
|
ix[0] = ix[1];
|
|
ix[1] = z;
|
|
}//Exch()
|
|
//
|