時間領域の1次元実数データを順方向フーリエ変換し、
splitted format の複素数データを出力する
Namespace: fvalgcliAssembly: fvalgcli (in fvalgcli.dll) Version: 3.1.0.0 (3.1.0.11)
Syntax
C# |
---|
public static int fnFIE_fft_fwd_UC8toDD(
FHANDLE hFFT,
UCHAR_PTR ucpSrc,
DOUBLE_PTR dpRe,
DOUBLE_PTR dpIm,
int iOrder
) |
Visual Basic |
---|
Public Shared Function fnFIE_fft_fwd_UC8toDD (
hFFT As FHANDLE,
ucpSrc As UCHAR_PTR,
dpRe As DOUBLE_PTR,
dpIm As DOUBLE_PTR,
iOrder As Integer
) As Integer |
Return Value
Type:
Int32
以下のエラーコードを返します。
エラーコード:f_err | 内容 |
---|
F_ERR_NONE | 正常終了 |
F_ERR_INVALID_OBJECT | hFFT , ucpSrc , dpRe , dpIm のいずれかに IntPtr.Zero が渡された |
F_ERR_INVALID_PARAM | - hFFT が F_OBJID_FFTSPEC 型ではない
- iOrder > 31 または iOrder≦ 0
- 入力データ長 (=2^iOrder ) が
hFFT ハンドル 初期化時に指定された最大データ長より長い
|
F_ERR_FFT_INVALID_SPEC | 指定された hFFT ハンドルはこの処理に使用できない |
F_ERR_NO_LICENCE | ライセンスエラー、または未初期化エラー |
Examples
C# | Copy |
---|
using System;
using System.Collections.Generic;
using System.Text;
using fvalgcli;
namespace TC
{
public partial class FIE
{
[FvPluginExecute]
public void fnFIE_fft_fwd_UC8toDD()
{
int status = (int)f_err.F_ERR_NONE;
int iOrder = 5;
int length = 1 << iOrder;
FHANDLE hFFT = FHANDLE.Zero;
UCHAR_PTR pDataSrc = UCHAR_PTR.Zero;
DOUBLE_PTR pDataDstRe = DOUBLE_PTR.Zero;
DOUBLE_PTR pDataDstIm = DOUBLE_PTR.Zero;
try
{
pDataSrc = UCHAR_PTR.alloc(length);
for (int i = 0; i < length; i++)
{
pDataSrc[i] = (byte)i;
}
pDataDstRe = DOUBLE_PTR.alloc(length);
pDataDstIm = DOUBLE_PTR.alloc(length);
for (int i = 0; i < length; i++)
{
pDataDstRe[i] = 0.0;
pDataDstIm[i] = 0.0;
}
status = api.fnFIE_fft_1D_alloc(ref hFFT, iOrder, f_fft_direction.F_FFT_FORWARD, f_fft_normalize_type.F_FFT_DIV_BY_SQRTN, f_fft_data_type.F_1D_FFT_FCOMPLEX, f_fft_data_type.F_1D_FFT_FCOMPLEX);
Assert.IsTrue(status == (int)f_err.F_ERR_NONE, "エラーが発生しました。({0})", (f_err)status);
status = api.fnFIE_fft_fwd_UC8toDD(hFFT, pDataSrc, pDataDstRe, pDataDstIm, iOrder);
Assert.IsTrue(status == (int)f_err.F_ERR_NONE, "エラーが発生しました。({0})", (f_err)status);
bool result = false;
for (int i = 0; i < length; i++)
{
if (0.0 != pDataDstRe[i] || 0.0!= pDataDstIm[i])
{
result = true;
break;
}
}
if (!result)
{
Assert.Fail("処理前と値が変わっていません");
}
}
finally
{
hFFT.Dispose();
pDataSrc.Dispose();
pDataDstRe.Dispose();
pDataDstIm.Dispose();
}
}
}
} |
Visual Basic | Copy |
---|
Imports System.Collections.Generic
Imports System.Text
Imports fvalgcli
Public Partial Class FIE
<FvPluginExecute> _
Public Sub fnFIE_fft_fwd_UC8toDD()
Dim status As Integer = CInt(f_err.F_ERR_NONE)
Dim iOrder As Integer = 5
Dim length As Integer = 1 << iOrder
Dim hFFT As FHANDLE = FHANDLE.Zero
Dim pDataSrc As UCHAR_PTR = UCHAR_PTR.Zero
Dim pDataDstRe As DOUBLE_PTR = DOUBLE_PTR.Zero
Dim pDataDstIm As DOUBLE_PTR = DOUBLE_PTR.Zero
Try
pDataSrc = UCHAR_PTR.alloc(length)
For i As Integer = 0 To length - 1
pDataSrc(i) = CByte(i)
Next
pDataDstRe = DOUBLE_PTR.alloc(length)
pDataDstIm = DOUBLE_PTR.alloc(length)
For i As Integer = 0 To length - 1
pDataDstRe(i) = 0.0
pDataDstIm(i) = 0.0
Next
status = api.fnFIE_fft_1D_alloc(hFFT, iOrder, f_fft_direction.F_FFT_FORWARD, f_fft_normalize_type.F_FFT_DIV_BY_SQRTN, f_fft_data_type.F_1D_FFT_FCOMPLEX, f_fft_data_type.F_1D_FFT_FCOMPLEX)
Assert.IsTrue(status = CInt(f_err.F_ERR_NONE), "エラーが発生しました。({0})", CType(status, f_err))
status = api.fnFIE_fft_fwd_UC8toDD(hFFT, pDataSrc, pDataDstRe, pDataDstIm, iOrder)
Assert.IsTrue(status = CInt(f_err.F_ERR_NONE), "エラーが発生しました。({0})", CType(status, f_err))
Dim result As Boolean = False
For i As Integer = 0 To length - 1
If 0.0 <> pDataDstRe(i) OrElse 0.0 <> pDataDstIm(i) Then
result = True
Exit For
End If
Next
If Not result Then
Assert.Fail("処理前と値が変わっていません")
End If
Finally
hFFT.Dispose()
pDataSrc.Dispose()
pDataDstRe.Dispose()
pDataDstIm.Dispose()
End Try
End Sub
End Class |
See Also