時間領域の1次元実数データの順方向フーリエ変換を行い、
interleaved format の複素数データを出力する
Namespace: fvalgcliAssembly: fvalgcli (in fvalgcli.dll) Version: 3.1.0.0 (3.1.0.11)
Syntax
C# |
---|
public static int fnFIE_fft_fwd_S16toC(
FHANDLE hFFT,
SHORT_PTR spSrc,
FCOMPLEX_PTR vpDst,
int iOrder
) |
Visual Basic |
---|
Public Shared Function fnFIE_fft_fwd_S16toC (
hFFT As FHANDLE,
spSrc As SHORT_PTR,
vpDst As FCOMPLEX_PTR,
iOrder As Integer
) As Integer |
Return Value
Type:
Int32
以下のエラーコードを返します。
エラーコード:f_err | 内容 |
---|
F_ERR_NONE | 正常終了 |
F_ERR_INVALID_OBJECT | hFFT , spSrc , vpDst のいずれかに 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_S16toC()
{
int status = (int)f_err.F_ERR_NONE;
int iOrder = 5;
int length = 1 << iOrder;
FHANDLE hFFT = FHANDLE.Zero;
SHORT_PTR pDataSrc = SHORT_PTR.Zero;
FCOMPLEX_PTR pDataDst = FCOMPLEX_PTR.Zero;
try
{
pDataSrc = SHORT_PTR.alloc(length);
for (int i = 0; i < length; i++)
{
pDataSrc[i] = (short)(i * 10);
}
pDataDst = FCOMPLEX_PTR.alloc(length);
for (int i = 0; i < length; i++)
{
pDataDst[i] = FCOMPLEX.init(0.0, 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_S16toC(hFFT, pDataSrc, pDataDst, 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 != pDataDst[i].real || 0.0 != pDataDst[i].image)
{
result = true;
break;
}
}
if (!result)
{
Assert.Fail("処理前と値が変わっていません");
}
}
finally
{
hFFT.Dispose();
pDataSrc.Dispose();
pDataDst.Dispose();
}
}
}
} |
Visual Basic | Copy |
---|
Imports System.Collections.Generic
Imports System.Text
Imports fvalgcli
Public Partial Class FIE
<FvPluginExecute> _
Public Sub fnFIE_fft_fwd_S16toC()
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 SHORT_PTR = SHORT_PTR.Zero
Dim pDataDst As FCOMPLEX_PTR = FCOMPLEX_PTR.Zero
Try
pDataSrc = SHORT_PTR.alloc(length)
For i As Integer = 0 To length - 1
pDataSrc(i) = CShort(i * 10)
Next
pDataDst = FCOMPLEX_PTR.alloc(length)
For i As Integer = 0 To length - 1
pDataDst(i) = FCOMPLEX.init(0.0, 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_S16toC(hFFT, pDataSrc, pDataDst, 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 <> pDataDst(i).real OrElse 0.0 <> pDataDst(i).image Then
result = True
Exit For
End If
Next
If Not result Then
Assert.Fail("処理前と値が変わっていません")
End If
Finally
hFFT.Dispose()
pDataSrc.Dispose()
pDataDst.Dispose()
End Try
End Sub
End Class |
See Also