public static int fnFIE_generate_noise_gauss(
	FHANDLE hsrcdst,
	double ave,
	double var,
	uint seed
)

Public Shared Function fnFIE_generate_noise_gauss ( 
	hsrcdst As FHANDLE,
	ave As Double,
	var As Double,
	seed As UInteger
) As Integer

//    $Revision: 1.1 $

using System;
using System.Collections.Generic;
using System.Text;

using fvalgcli;

namespace TC
{
    public partial class FIE
    {
        /// <summary>
        /// ノイズ画像生成 (gauss noise).
        /// </summary>
        [FvPluginExecute]
        public void fnFIE_generate_noise_gauss()
        {
            int status = (int)f_err.F_ERR_NONE;

            FHANDLE hsrcdst = FHANDLE.Zero;    // 処理対象画像(type: double).
            FHANDLE saveimg = FHANDLE.Zero;
            const double ave = 128;            // gauss分布の平均.
            const double var = 64;            // gauss分布の分散(0.0より大きい値).
            const uint seed = 3;            // 疑似乱数ジェネレータの初期シード値.

            try
            {
                // 処理対象画像の確保.
                hsrcdst = api.fnFIE_img_root_alloc((int)f_imgtype.F_IMG_DOUBLE, 1, 256, 256);
                api.fnFIE_img_clear(hsrcdst, 255);

                // 処理の実行.
                status = api.fnFIE_generate_noise_gauss(hsrcdst, ave, var, seed);

                // エラー判定.
                Assert.IsTrue(status == (int)f_err.F_ERR_NONE, "エラーが発生しました。({0})", (f_err)status);

                // 処理対象画像の保存.
                {
                    saveimg = api.fnFIE_img_root_alloc(
                        (int)f_imgtype.F_IMG_UC8, 1,
                        api.fnFIE_img_get_width(hsrcdst),
                        api.fnFIE_img_get_height(hsrcdst)
                    );
                    api.fnFIE_img_copy(hsrcdst, saveimg);
                    api.fnFIE_save_png(ResultDir + "/fnFIE_generate_noise_gauss.png", saveimg, -1);                    
                }
            }
            finally
            {
                // オブジェクトの開放.
                hsrcdst.Dispose();
                saveimg.Dispose();
            }
        }
    }
}

'    $Revision: 1.1 $

Imports System.Collections.Generic
Imports System.Text

Imports fvalgcli

Public Partial Class FIE
    ''' <summary>
    ''' ノイズ画像生成 (gauss noise).
    ''' </summary>
    <FvPluginExecute> _
    Public Sub fnFIE_generate_noise_gauss()
        Dim status As Integer = CInt(f_err.F_ERR_NONE)

        Dim hsrcdst As FHANDLE = FHANDLE.Zero
        ' 処理対象画像(type: double).
        Dim saveimg As FHANDLE = FHANDLE.Zero
        Const  ave As Double = 128
        ' gauss分布の平均.
        Const  var As Double = 64
        ' gauss分布の分散(0.0より大きい値).
        Const  seed As UInteger = 3
        ' 疑似乱数ジェネレータの初期シード値.
        Try
            ' 処理対象画像の確保.
            hsrcdst = api.fnFIE_img_root_alloc(CInt(f_imgtype.F_IMG_DOUBLE), 1, 256, 256)
            api.fnFIE_img_clear(hsrcdst, 255)

            ' 処理の実行.
            status = api.fnFIE_generate_noise_gauss(hsrcdst, ave, var, seed)

            ' エラー判定.
            Assert.IsTrue(status = CInt(f_err.F_ERR_NONE), "エラーが発生しました。({0})", CType(status, f_err))

            ' 処理対象画像の保存.
            If True Then
                saveimg = api.fnFIE_img_root_alloc(CInt(f_imgtype.F_IMG_UC8), 1, api.fnFIE_img_get_width(hsrcdst), api.fnFIE_img_get_height(hsrcdst))
                api.fnFIE_img_copy(hsrcdst, saveimg)
                api.fnFIE_save_png(ResultDir & "/fnFIE_generate_noise_gauss.png", saveimg, -1)
            End If
        Finally
            ' オブジェクトの開放.
            hsrcdst.Dispose()
            saveimg.Dispose()
        End Try
    End Sub
End Class