


JS_PARAM_GET( )     UNIX Programmer's Manual      JS_PARAM_GET( )





     js_param_get()      ϊp[^oB
     js_param_set()      ϊp[^ݒ肷B

`

     #include "jslib.h"

     int
     js_param_get(env,para)
     struct wnn_env *env;/*  */
     struct wnn_param *para; /* p[^ */

     int
     js_param_set(env,para)
     struct wnn_env *env;/*  */
     struct wnn_param *para;/* p[^ */

     struct wnn_param {
             int     n;      /* m()߉͂̂m */
             int     nsho;   /* 啶ߒ̏߂̍ő吔 */
             int     p1;     /* ̕px̃p[^ */
             int     p2;     /* ߒ̃p[^ */
             int     p3;     /* ꒷̃p[^ */
             int     p4;     /* grbg̃p[^ */
             int     p5;     /* ̃p[^ */
             int     p6;     /* ߂̕]l̃p[^ */
             int     p7;     /* 啶ߒ̃p[^ */
             int     p8;     /* ߐ̃p[^ */
             int     p9;     /* ^i ̕px */
             int     p10;    /* ^i Ji̕px */
             int     p11;    /*^i p̕px*/
             int     p12;    /*^i L̕px*/
             int     p13;    /*^i ʂ̕px*/
             int     p14;    /*^i t̕px*/
             int     p15;    /*^i Jʂ̕px*/
     };

@\

     js_param_get ́A env Ŏ̕ϊp[^o
     B

     js_param_set ́A env Ŏ̕ϊp[^ para 
     ݒ肷B

      <߂̕]l> = p1 * <px> +
                         p2 * <ߒ> +
                         p3 * <꒷> +
                         p4 * <gBIT> +
                         p5 * <vCIeB>

      <啶߂̕]l> = p6 * <߂̕]l̍v> / <ߐ> +
                         p7 * <啶ߒ> +
                         p8 * <ߐ> +

      ŕ]l߁Aϊ̏ʂ肷B

      n, nsho  1 ȏ̐łȂ΂ȂȂB
      p1, p2, p3, p4, p5, p6, p7, p8, p9,...,p15 ͔Cӂ̐łB

^[o[

     Iɂ 0 ԂB
     ُIɂ́A-1 ԂB







Printed 1/22/92         30 September 1991                       2





















































































































