#include <stdio.h>
#include <uf.h>
#include <uf_assem.h>

/* Main body of program  */

void ufusr(a,b,c_len)
  char *a;
  int *b;
  int c_len;

  {
    int fail_status,status,i;
    char buf[133];
    
    UF_PART_load_status_t error_status;
    UF_ASSEM_options_t assem_opts;

 /* Initialize UF license */
    
    if(!UF_is_initialized())
    {
    status = UF_initialize();
      if(status != 0)
      {
      fail_status = UF_get_fail_message(status, buf);
      if(fail_status == 0)
        {
        printf("Initialization failed because %s\n", buf);
        fflush(stdout);
        }
      else
        {
        printf("Initialization failed for unknown reason %d\n",fail_status);
        fflush(stdout);
      exit(-1);
        }
      }
    }
    
      status=UF_ASSEM_ask_assem_options(&assem_opts);
      assem_opts.load_options=1;
      assem_opts.update=2;
      assem_opts.failure_action=1;
      assem_opts.load_components=1;
      assem_opts.load_fully=0;
      status=UF_ASSEM_set_assem_options(&assem_opts);
  return;
  }