哪位高手帮我看看我这程序，我的这个怎么画不出图来呢

xiaohaha1985

#include <stdio.h>
#include <uf.h>
#include <uf_defs.h>
#include <uf_exit.h>
#include <uf_ui.h>
#include <uf_styler.h>
#include <uf_mb.h>
: S" d# [# Y! ]* A) p9 P2 Y/ i/ V#include <C:\Documents and Settings\Administrator\My Documents\bsurface\新建文件夹\bsurface\bsurface.h>
+ ^  O  o3 N! v/ r- n
#include <stdlib.h>//后加
#include <uf_part.h>
/ L  [6 v7 D- i+ L) T#include <uf_defs.h>
#include <uf_modl.h>

, `, k. X$ O. y9 U5 e2 q! E#define UF_CALL
#define BSURFACE_CB_COUNT ( 4 + 1 ) /* Add 1 for the terminator */
: Q; W; T4 j0 ]7 |static UF_STYLER_callback_info_t BSURFACE_cbs[BSURFACE_CB_COUNT] =
{
{UF_STYLER_DIALOG_INDEX, UF_STYLER_CONSTRUCTOR_CB  , 0, BSURFACE_constructor_cb},
{UF_STYLER_DIALOG_INDEX, UF_STYLER_DESTRUCTOR_CB   , 0, BSURFACE_destructor_cb},
- X. y2 l) B; ^$ n {UF_STYLER_DIALOG_INDEX, UF_STYLER_OK_CB           , 0, BSURFACE_ok_cb},
{UF_STYLER_DIALOG_INDEX, UF_STYLER_CANCEL_CB       , 0, BSURFACE_cancle_cb},
{UF_STYLER_NULL_OBJECT, UF_STYLER_NO_CB, 0, 0 }
  W2 S1 v- c8 J; e( r/ w};
. C$ c( q7 r3 K; T% e& y: |: B
static UF_MB_styler_actions_t actions[] = {
    { "bsurface.dlg",  NULL,   BSURFACE_cbs,  UF_MB_STYLER_IS_NOT_TOP },
    { NULL,  NULL,  NULL,  0 } /* This is a NULL terminated list */
  K6 O% e; S; t  U};

static void do_ugopen_api(void)
{
& p8 u% u- |0 S+ T3 P$ D
  char    *prtnam = "create_bsurf";

  /* Points for B-surface  */
  double points[16][3] = { X1, Y1, Z1,
                                       X2, Y2, Z2,
                                       X3, Y3, Z3,
& _( R8 N6 Z9 L/ S' x3 m% X                                       X4, Y4, Z4,
9 M$ n6 F! W7 x- ]                                       X5, Y5, Z5,
                                       X6, Y6, Z6,
! T( e2 Q( b) K1 ~4 T                                       X7, Y7, Z7,
+ H; n2 H) F& y( n8 m/ O7 J* J                                       X8, Y8, Z8,
0 ?$ D1 |7 F. n# G# e% X                                       X9, Y9, Z9,
1 R& n: a# {4 z) q                                       X10, Y10, Z10,
. |. C0 X9 T/ v$ w: u                                       X11, Y11, Z11,
( e7 P1 O0 V$ ^! X7 a, f2 `                                       X12, Y12, Z12,
                                       X13, Y13, Z13,
                                       X14, Y14, Z14,
  c5 o2 w! d% V. v, ~1 P1 r                                       X15, Y15, Z15,
                                       X16, Y16, Z16 };       

  int create_mode = 1;
  int u_closed_status = 0;
  int v_closed_status = 0;
  int u_degree = 3;
. n* s' ]& ?" a" Z- K5 q2 M8 n  int v_degree = 3;
8 T4 T2 d- t6 ^# o  int num_rows = 4;
  int pts_per_row[4] = {4, 4, 4, 4};
- X. A2 D9 ~: B# H" I4 h9 W   
  int ii, jj, kk, indx;
$ S' X! }: {9 B4 K, |9 \$ I        
  tag_t   part_tag;
  tag_t   bsurf_obj_id = NULL_TAG;
6 f# R$ S. P4 g6 i0 ^6 {
9 M) Q2 |2 I1 @  UF_MODL_bsurf_row_info_t *pts_info_per_row; /* pts info for each row */
  UF_MODL_bsurface_t   bsurf;

5 e) Y: B7 ^3 r; t! T( J4 g7 B, m5 h# [2 d
& Q& |* Y& F' `! _  m/ g7 Q/ w  /* Open a new part */
  UF_CALL( UF_PART_new(prtnam, METRIC, &part_tag) );

  pts_info_per_row = ( UF_MODL_bsurf_row_info_t *)malloc( num_rows *
                       sizeof(UF_MODL_bsurf_row_info_t) );
1 t) M* W  l4 }: b2 Q9 N& P   
: e9 {/ [# I6 @. V& w1 x" B  /* allocate and load point and other information for each row of points */
  indx = 0;
  for (ii=0; ii<num_rows; ii++)
& ?% G& K  v6 H. I  {
, d# H: Z9 f' ?* G) N% Z7 |3 }    pts_info_per_row[ii].num_points = pts_per_row[ii];  /* can vary */
    pts_info_per_row[ii].points = (double *)malloc( pts_per_row[ii] * 3 *
                                   sizeof(double) );
$ T+ T+ s/ B" M- H9 p      
    pts_info_per_row[ii].weight = (double *)malloc( pts_per_row[ii] *
1 i" d. k1 F; \8 J                                   sizeof(double) );
               
" K0 T  O) M5 ?* b2 L) L    /* load up point and weight info */
: y+ [! r3 z' \( L, J9 u  V    for (jj=0, kk = 0; kk<pts_per_row[ii]; kk++, jj+=3, indx++)
    {
      pts_info_per_row[ii].points[jj] = points[indx][0];
6 Q, t  x$ L  F7 c. j      pts_info_per_row[ii].points[jj+1] = points[indx][1];
      pts_info_per_row[ii].points[jj+2] = points[indx][2];
/ ?& E4 \+ q# V6 N      pts_info_per_row[ii].weight[kk] = 1.0;
   
    }
3 B% V9 d# s) v; D  }
' U' T; s( I2 r) n  
4 D* a& s5 r: p" B0 @6 o0 J+ X  /* create B-surface */
  UF_CALL(UF_MODL_create_bsurf_thru_pts( create_mode, u_closed_status,
                                         v_closed_status, u_degree,
                                         v_degree, num_rows, pts_info_per_row,
                                         &bsurf_obj_id));
, Y4 l% _8 O3 x; t: I                   
  if ( bsurf_obj_id == NULL_TAG )
+ l8 M6 G. @- ?! Y: }    printf("*** ERROR CREATING B-SURFACE ***\n");

9 y! \/ A! c3 |% v+ y( }  /* free allocated memory */
+ H1 S) F6 |! z4 u  for (ii=0; ii<num_rows; ii++)
  {
    free(pts_info_per_row[ii].points);
: Z, q+ N' Q% f. b' E, S    free(pts_info_per_row[ii].weight);
  }
4 A, c" q7 i, B7 N  
  free(pts_info_per_row);
) ?4 t5 u3 e/ t9 Z" u1 ^: @. I   
" `$ I; K6 @: }6 ^3 X: T( ^9 d   
  /* ask the B-surface information */
) A% h! e+ w8 S0 C9 N' }8 {! l* {8 r  UF_CALL(UF_MODL_ask_bsurf( bsurf_obj_id, &bsurf ));
6 T% Y7 g$ |* }/ V( y# f( S, _8 {$ |# N  
" c4 U  Q# I' J) e& H  /* validate the surface */
9 S: c$ p- e* P5 [. X* C  if ( (bsurf.order_u != u_degree+1) || (bsurf.order_v != v_degree+1) )
3 u; E  q4 c4 E. T! b$ J    printf("*** ERROR ASKING B-SURFACE ***\n");
  
  UF_CALL(UF_MODL_free_bsurf_data(&bsurf));
% W" R" ~) }; V4 r9 T: F, h& R  W
/ Q/ |3 }! b3 ?: |0 E3 o; p' z
}
extern DllExport void ufsta (char *param, int *retcode, int rlen)
$ a5 M/ i& w" Y% m  e{
3 c' R) w9 ~4 t" D/ u    int  error_code;

, ?! `0 y+ o! N    if ( (UF_initialize()) != 0)
        do_UGopen_api();  
                return;
) ]8 @- X$ f% S8 T$ @9 v" `                                                
    if ( (error_code = UF_MB_add_styler_actions ( actions ) ) != 0 )
9 m9 v% l" i/ _; [8 A5 p" |    {
* ?! z+ d1 n+ m          char fail_message[133];
* O  c$ Q3 f5 k4 Z         
          UF_get_fail_message(error_code, fail_message);
, g/ s: y# i( b  ~! R/ `8 A) v          printf ( "%s\n", fail_message );
$ [9 J- M7 m6 w$ A, g; w    }
& c  s% B6 t( a9 \                                                
& t, W' W2 J9 O. u1 C    UF_terminate();                             
    return;
}
extern int LaunchBsurfaceDialog ( int *response )
{
7 D+ C& D) p8 \7 Q    int  error_code = 0;

    if ( ( error_code = UF_initialize() ) != 0 )
- ^- v* A: H( r& r, U7 N           return (0) ;
6 K. P( P/ B, x- G5 _2 S
    if ( ( error_code = UF_STYLER_create_dialog ( "bsurface.dlg",
' P$ O9 _( g4 Z; {" W- n7 q           BSURFACE_cbs,      /* Callbacks from dialog */
           BSURFACE_CB_COUNT, /* number of callbacks*/
           NULL,        /* This is your client data */
           response ) ) != 0 )
: S, c7 c) B. M  O. m; }    {
          char fail_message[133];
# z* T) b# ]$ a% s2 J
          /* Get the user function fail message based on the fail code.*/
8 V$ c3 j9 Y- U5 {          UF_get_fail_message(error_code, fail_message);
          UF_UI_set_status (fail_message);
          printf ( "%s\n", fail_message );
    }

% T3 Q7 k3 m  S  }* Z# b. j
3 w) j& p# P5 e    UF_terminate();                             
/ ~# o" w# M" v" P    return (error_code);
5 D1 G! u0 q4 k}

extern int ufusr_ask_unload (void)
{
     /* unload immediately after application exits*/
4 [8 M2 r1 t  ^/ d9 ?: }     return ( UF_UNLOAD_IMMEDIATELY );
}
2 e" m% M: M( y2 G! Oextern void ufusr_cleanup (void)
& w$ A$ o! H+ k& Z+ ]{
    return;
}
#endif

xiaohaha1985

求高手帮忙看看那这程序急用啊

xiaohaha1985

int BSURFACE_ok_cb ( int dialog_id,
1 Z' W3 Y+ ^& B7 j             void * client_data,
* `8 W) c, {  K5 o5 ~% r             UF_STYLER_item_value_type_p_t callback_data)
{
     /* Make sure User Function is available. */  
8 Z) R! }# O2 r1 Y- Y6 V4 ^  `) D     if ( UF_initialize() != 0)
$ Q5 I' k4 Q2 q6 V4 \6 \3 ~          return ( UF_UI_CB_CONTINUE_DIALOG );

$ ^* o3 F* R% B6 n9 p8 I, t     /*获取对话框数据*/
         
         UF_STYLER_item_value_type_t data;
         data.item_attr=UF_STYLER_VALUE;
         
         data.item_id=BSURFACE_REAL_X1;
0 b3 y4 e9 E5 c9 x9 B9 V         UF_STYLER_ask_value(dialog_id,&data);
4 J$ _# |1 T0 V( a* n* o* ~         X1=data.value.real;
8 ^: z) O4 d% ~& n/ S7 k         
' ]1 S6 l8 x& |8 L" \: O         data.item_id=BSURFACE_REAL_Y1;
; k4 x) A% j* F+ f1 s& u  H         UF_STYLER_ask_value(dialog_id,&data);
7 ^" M8 `& m  ~( f, O! H  w         Y1=data.value.real;

' q8 G6 K( `7 `" h8 _     data.item_id=BSURFACE_REAL_Z1;
         UF_STYLER_ask_value(dialog_id,&data);
         Z1=data.value.real;
, _8 g0 x  n: Q, h- o, P2 ]         
         data.item_id=BSURFACE_REAL_X2;
         UF_STYLER_ask_value(dialog_id,&data);
5 |* `) O$ @4 L1 g% i' c         X2=data.value.real;
         
% v# F' A1 C  C         data.item_id=BSURFACE_REAL_Y2;
         UF_STYLER_ask_value(dialog_id,&data);
" z3 v) g9 M& B, Y' S5 V         Y2=data.value.real;
         
. X) b: g4 o; O1 V         data.item_id=BSURFACE_REAL_Z2;
         UF_STYLER_ask_value(dialog_id,&data);
; M* O( @/ e  p# J0 `         Z2=data.value.real;
3 w7 M0 M& Z  E0 j$ A) |$ @3 I         
         data.item_id=BSURFACE_REAL_X3;
# m# z2 ]! W7 l* V- y2 I7 U         UF_STYLER_ask_value(dialog_id,&data);
         X3=data.value.real;
         
         data.item_id=BSURFACE_REAL_Y3;
         UF_STYLER_ask_value(dialog_id,&data);
% c0 H* x7 t9 r7 H' W% G- g         Y3=data.value.real;
         
         data.item_id=BSURFACE_REAL_Z3;
         UF_STYLER_ask_value(dialog_id,&data);
- C8 i5 ?0 y9 e8 v6 S         Z3=data.value.real;
- m/ K2 J1 i0 a, ?. N+ M9 o         
         data.item_id=BSURFACE_REAL_X4;
. \! e$ a& B- l) z8 c         UF_STYLER_ask_value(dialog_id,&data);
: E* F. u* e& Q4 `, t/ B1 a         X4=data.value.real;
# A7 k8 e8 [1 ^; J# g" c9 c
         data.item_id=BSURFACE_REAL_Y4;
( s8 v3 m1 t6 Y         UF_STYLER_ask_value(dialog_id,&data);
         Y4=data.value.real;
' @+ z3 T8 g2 z7 p+ L1 c         
' X. G8 P; C0 G3 Z/ j; P         data.item_id=BSURFACE_REAL_Z4;
/ h; d2 T! e6 R         UF_STYLER_ask_value(dialog_id,&data);
2 {0 I+ Q: j& O         Z4=data.value.real;
         
         data.item_id=BSURFACE_REAL_X5;
         UF_STYLER_ask_value(dialog_id,&data);
8 E* e& s/ j6 [         X5=data.value.real;
: w4 H7 [4 B2 {) H5 H+ k3 J
0 P, f6 s8 u) g3 U; h) @" k         data.item_id=BSURFACE_REAL_Y5;
         UF_STYLER_ask_value(dialog_id,&data);
# W3 b- g/ B1 {         Y5=data.value.real;
         
. `" q* P6 i7 E9 v8 I0 m         data.item_id=BSURFACE_REAL_Z5;
         UF_STYLER_ask_value(dialog_id,&data);
         Z5=data.value.real;
' S) b4 W" G- D- }0 M: N' ]& j/ ?2 K5 Q         
/ ~; v1 U0 g) \; ]! j8 J/ K4 j         data.item_id=BSURFACE_REAL_X6;
0 I' ]) X, N/ |1 [& Q) E         UF_STYLER_ask_value(dialog_id,&data);
         X6=data.value.real;

+ B% U' O# d- H4 d         data.item_id=BSURFACE_REAL_Y6;
         UF_STYLER_ask_value(dialog_id,&data);
         Y6=data.value.real;
         
! a, c( L( }6 P4 C7 \8 u$ b         data.item_id=BSURFACE_REAL_Z6;
         UF_STYLER_ask_value(dialog_id,&data);
         Z6=data.value.real;
         
! W3 N# X! l+ \: ~4 ?; ?         data.item_id=BSURFACE_REAL_X7;
( n$ C( ^4 A1 z5 z5 B' [* N         UF_STYLER_ask_value(dialog_id,&data);
         X7=data.value.real;
2 Q0 k4 M8 L" l. K- r. D         
  ]0 B) H5 d6 J4 v         data.item_id=BSURFACE_REAL_Y7;
         UF_STYLER_ask_value(dialog_id,&data);
         Y7=data.value.real;
, c3 B, [  B- ^7 L+ s9 V0 ^     
         data.item_id=BSURFACE_REAL_Z7;
         UF_STYLER_ask_value(dialog_id,&data);
         Z7=data.value.real;
1 d: Z7 @2 @! k2 X' y3 H3 q, C3 K         
) e1 B4 v: |# u0 Q9 l) l5 Z         data.item_id=BSURFACE_REAL_X8;
         UF_STYLER_ask_value(dialog_id,&data);
& N. z' o6 d2 {9 Q. M$ x         X8=data.value.real;
, `3 M1 `" R; O: p! l- j2 d         
         data.item_id=BSURFACE_REAL_Y8;
6 u/ _/ E' d8 ~# M& B+ E: D+ _; s0 R         UF_STYLER_ask_value(dialog_id,&data);
         Y8=data.value.real;
         
         data.item_id=BSURFACE_REAL_Z8;
% e9 i: m( q, n7 I7 D' ]3 ^' Y         UF_STYLER_ask_value(dialog_id,&data);
. p$ D* }* m% X9 r1 U# I         Z8=data.value.real;
$ D  [  d, m% J+ Q/ x- r' U* |         
         data.item_id=BSURFACE_REAL_X9;
. g- _7 W7 ^& J! V+ U+ z         UF_STYLER_ask_value(dialog_id,&data);
         X9=data.value.real;
         
         data.item_id=BSURFACE_REAL_Y9;
         UF_STYLER_ask_value(dialog_id,&data);
2 J/ a/ Y$ B. a. v& O$ Q         Y9=data.value.real;
         
0 {( D/ C8 ]$ v+ ~. R         data.item_id=BSURFACE_REAL_Z9;
         UF_STYLER_ask_value(dialog_id,&data);
         Z9=data.value.real;
9 w) }: m0 ^  v$ m         
         data.item_id=BSURFACE_REAL_X10;
3 T5 _0 c: M/ {/ j7 Z% ?& h# b         UF_STYLER_ask_value(dialog_id,&data);
# X) e. {, M8 F. z4 b$ \5 c4 |         X10=data.value.real;
' s; H( V- ?( g8 e8 U
         data.item_id=BSURFACE_REAL_Y10;
4 j, f5 z2 n8 Q; i- A         UF_STYLER_ask_value(dialog_id,&data);
* p. c) d- S3 g         Y10=data.value.real;
. D& a/ e9 \# A. s         
+ K0 x! X/ {$ `; d# Z: ]         data.item_id=BSURFACE_REAL_Z10;
         UF_STYLER_ask_value(dialog_id,&data);
1 G" H- c0 ]; I$ S         Z10=data.value.real;
% @. p  V# e8 O% _         
" }( I& O5 Q$ `" p  N9 [         data.item_id=BSURFACE_REAL_X11;
         UF_STYLER_ask_value(dialog_id,&data);
         X11=data.value.real;
: b- s! s' J* ^
         data.item_id=BSURFACE_REAL_Y11;
         UF_STYLER_ask_value(dialog_id,&data);
         Y11=data.value.real;
( I" u- x; e$ z( B* B' c. ?6 b4 q         
% ^+ {# V: ^/ W/ r5 z' n. J$ M3 J* w         data.item_id=BSURFACE_REAL_Z11;
         UF_STYLER_ask_value(dialog_id,&data);
* }6 ?- P6 H" A         Z11=data.value.real;
         
         data.item_id=BSURFACE_REAL_X12;
* u& `! G" ]3 W7 i" _5 }         UF_STYLER_ask_value(dialog_id,&data);
8 j) H" M9 y/ D- D         X12=data.value.real;
- N# q5 Y/ x! O8 Q2 h' I5 H
         data.item_id=BSURFACE_REAL_Y12;
/ u$ P8 F$ n. I+ w         UF_STYLER_ask_value(dialog_id,&data);
         Y12=data.value.real;
         
% U4 s7 `6 x+ z+ w         data.item_id=BSURFACE_REAL_Z12;
         UF_STYLER_ask_value(dialog_id,&data);
         Z12=data.value.real;
: N9 L' _' Z4 o. u" }, R         
         data.item_id=BSURFACE_REAL_X13;
. L- E. h6 c6 ~5 D- ^         UF_STYLER_ask_value(dialog_id,&data);
( ~: s- K" H1 Q( s* O5 o9 r% q         X13=data.value.real;
         
7 l) n6 e4 O% c; O6 B0 L- O         data.item_id=BSURFACE_REAL_Y13;
         UF_STYLER_ask_value(dialog_id,&data);
         Y13=data.value.real;

. S! X5 ]1 w. R' Z) J. K     data.item_id=BSURFACE_REAL_Z13;
; S3 e1 P1 m7 p4 D2 F  Q+ y         UF_STYLER_ask_value(dialog_id,&data);
         Z13=data.value.real;

         data.item_id=BSURFACE_REAL_X14;
0 f, O; t: A) I+ O6 Y         UF_STYLER_ask_value(dialog_id,&data);
         X14=data.value.real;
: E" _$ X4 F% W         
2 h, z9 h* z: s3 L, o7 ?         data.item_id=BSURFACE_REAL_Y14;
         UF_STYLER_ask_value(dialog_id,&data);
         Y14=data.value.real;
5 x& h8 W: q" |$ O
     data.item_id=BSURFACE_REAL_Z14;
         UF_STYLER_ask_value(dialog_id,&data);
         Z14=data.value.real;
/ v3 N% a1 [- G7 l' v9 R$ M+ b
1 f/ }* u8 j9 v( v3 _! A" {+ S         data.item_id=BSURFACE_REAL_X15;
         UF_STYLER_ask_value(dialog_id,&data);
- R" m) ]1 L4 P( C         X15=data.value.real;
         
/ C" P7 }3 q4 J, j$ ?         data.item_id=BSURFACE_REAL_Y15;
         UF_STYLER_ask_value(dialog_id,&data);
         Y15=data.value.real;

     data.item_id=BSURFACE_REAL_Z15;
         UF_STYLER_ask_value(dialog_id,&data);
0 p3 G3 Q; |' H# S2 @8 Z1 r" {         Z15=data.value.real;

  v7 U& Z) H( `. C$ w* z8 q) f         data.item_id=BSURFACE_REAL_X16;
         UF_STYLER_ask_value(dialog_id,&data);
# m- j' z2 Q7 }3 c+ Y         X16=data.value.real;
         
         data.item_id=BSURFACE_REAL_Y16;
  `. T' Q, _% v/ ?9 h         UF_STYLER_ask_value(dialog_id,&data);
         Y16=data.value.real;

$ o% a9 p* X' ?& l     data.item_id=BSURFACE_REAL_Z16;
         UF_STYLER_ask_value(dialog_id,&data);
5 h; h2 u+ Q% z. ~         Z16=data.value.real;

     UF_terminate ();

    /* Callback acknowledged, terminate dialog             */
4 N4 X8 X) s( Y5 w) L8 J    /* It is STRONGLY recommended that you exit your       */
    /* callback with UF_UI_CB_EXIT_DIALOG in a ok callback.*/
    /* return ( UF_UI_CB_EXIT_DIALOG );                    */
8 t, T$ l) }* r& C/ ]    return (UF_UI_CB_EXIT_DIALOG);                           

$ u4 m0 c, O! Y4 H8 ~  @) L' }}
! n) b  Q( b( K: ]. v" k# D  vextern int LaunchBsurfaceDialog ( int *response )
{
    int  error_code = 0;

    if ( ( error_code = UF_initialize() ) != 0 )
0 t0 Y. ^# f5 d3 v' X           return (0) ;

- P9 S" G* _# ]: b/ s! g: Y    if ( ( error_code = UF_STYLER_create_dialog ( "bsurface.dlg",
0 [; T0 [9 u& ^- b, @           BSURFACE_cbs,      /* Callbacks from dialog */
+ d( W+ k" R$ b$ m           BSURFACE_CB_COUNT, /* number of callbacks*/
5 B5 Z  ]1 W6 I, |& o/ H  v           NULL,        /* This is your client data */
7 f5 _2 L- H$ k9 s( c) i: Q: d           response ) ) != 0 )
    {
# N+ N1 S% ]+ k6 o3 q          char fail_message[133];
( M( I  M! w+ W; o% S/ c4 R
* v/ _7 I( T) c; Q/ b9 o  X7 {; E! h, r# M; X          /* Get the user function fail message based on the fail code.*/
  b/ L7 k$ J, s# h- D+ r; E          UF_get_fail_message(error_code, fail_message);
. C( J4 C+ Y  L+ S0 t% }, z' q          UF_UI_set_status (fail_message);
" t8 g8 f& B& u6 O$ v          printf ( "%s\n", fail_message );
+ O* S1 B1 m: A0 q' s    }
0 I" B7 S2 J5 W6 R2 o. b9 k0 ]
" T9 v0 y/ j1 e+ ~8 W" o) i
    UF_terminate();                             
    return (error_code);
8 b1 p. P: i8 Q; f; [}