⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 c6_lmdap3dof.c

📁 m files for SIAM book, Numerical Computing with MATLAB
💻 C
📖 第 1 页 / 共 4 页
字号:
🔍
1234 
  if(c6_ak < 0.0) {
    c6_x = c6_bk;
    c6_b_x = c6_x;
    c6_b_x = floor(c6_b_x);
    if(c6_b_x != c6_bk) {
      for(c6_i6 = 0; c6_i6 < 32; c6_i6 = c6_i6 + 1) {
        c6_x1[c6_i6] = c6_cv2[c6_i6];
      }
      for(c6_i7 = 0; c6_i7 < 102; c6_i7 = c6_i7 + 1) {
        c6_x2[c6_i7] = c6_cv3[c6_i7];
      }
      for(c6_i8 = 0; c6_i8 < 32; c6_i8 = c6_i8 + 1) {
        c6_u[c6_i8] = c6_x1[c6_i8];
      }
      c6_y = NULL;
      sf_mex_assign(&c6_y, sf_mex_create(&c6_u, "y", 8, 0U, 1U, 2, 1, 32));
      for(c6_i9 = 0; c6_i9 < 102; c6_i9 = c6_i9 + 1) {
        c6_b_u[c6_i9] = c6_x2[c6_i9];
      }
      c6_b_y = NULL;
      sf_mex_assign(&c6_b_y, sf_mex_create(&c6_b_u, "y", 8, 0U, 1U, 2, 1, 102));
      sf_mex_call("error", 0U, 2U, 14, c6_y, 14, c6_b_y);
    }
  }
  return pow(c6_ak, c6_bk);
}

static const mxArray *c6_sf_marshall(void *c6_chartInstance, void *c6_u)
{
  const mxArray *c6_y = NULL;
  int32_T c6_i10;
  real_T c6_b_u[2];
  const mxArray *c6_b_y = NULL;
  c6_y = NULL;
  for(c6_i10 = 0; c6_i10 < 2; c6_i10 = c6_i10 + 1) {
    c6_b_u[c6_i10] = (*((real_T (*)[2])c6_u))[c6_i10];
  }
  c6_b_y = NULL;
  sf_mex_assign(&c6_b_y, sf_mex_create(&c6_b_u, "y", 0, 0U, 1U, 1, 2));
  sf_mex_assign(&c6_y, c6_b_y);
  return c6_y;
}

static const mxArray *c6_b_sf_marshall(void *c6_chartInstance, void *c6_u)
{
  const mxArray *c6_y = NULL;
  real_T c6_b_u;
  const mxArray *c6_b_y = NULL;
  c6_y = NULL;
  c6_b_u = *((real_T *)c6_u);
  c6_b_y = NULL;
  sf_mex_assign(&c6_b_y, sf_mex_create(&c6_b_u, "y", 0, 0U, 0U, 0));
  sf_mex_assign(&c6_y, c6_b_y);
  return c6_y;
}

static const mxArray *c6_c_sf_marshall(void *c6_chartInstance, void *c6_u)
{
  const mxArray *c6_y = NULL;
  real_T c6_b_u;
  const mxArray *c6_b_y = NULL;
  c6_y = NULL;
  c6_b_u = *((real_T *)c6_u);
  c6_b_y = NULL;
  sf_mex_assign(&c6_b_y, sf_mex_create(&c6_b_u, "y", 0, 0U, 0U, 0));
  sf_mex_assign(&c6_y, c6_b_y);
  return c6_y;
}

static const mxArray *c6_d_sf_marshall(void *c6_chartInstance, void *c6_u)
{
  const mxArray *c6_y = NULL;
  real_T c6_b_u;
  const mxArray *c6_b_y = NULL;
  c6_y = NULL;
  c6_b_u = *((real_T *)c6_u);
  c6_b_y = NULL;
  sf_mex_assign(&c6_b_y, sf_mex_create(&c6_b_u, "y", 0, 0U, 0U, 0));
  sf_mex_assign(&c6_y, c6_b_y);
  return c6_y;
}

static const mxArray *c6_e_sf_marshall(void *c6_chartInstance, void *c6_u)
{
  const mxArray *c6_y = NULL;
  real_T c6_b_u;
  const mxArray *c6_b_y = NULL;
  c6_y = NULL;
  c6_b_u = *((real_T *)c6_u);
  c6_b_y = NULL;
  sf_mex_assign(&c6_b_y, sf_mex_create(&c6_b_u, "y", 0, 0U, 0U, 0));
  sf_mex_assign(&c6_y, c6_b_y);
  return c6_y;
}

static const mxArray *c6_f_sf_marshall(void *c6_chartInstance, void *c6_u)
{
  const mxArray *c6_y = NULL;
  real_T c6_b_u;
  const mxArray *c6_b_y = NULL;
  c6_y = NULL;
  c6_b_u = *((real_T *)c6_u);
  c6_b_y = NULL;
  sf_mex_assign(&c6_b_y, sf_mex_create(&c6_b_u, "y", 0, 0U, 0U, 0));
  sf_mex_assign(&c6_y, c6_b_y);
  return c6_y;
}

static const mxArray *c6_g_sf_marshall(void *c6_chartInstance, void *c6_u)
{
  const mxArray *c6_y = NULL;
  real_T c6_b_u;
  const mxArray *c6_b_y = NULL;
  c6_y = NULL;
  c6_b_u = *((real_T *)c6_u);
  c6_b_y = NULL;
  sf_mex_assign(&c6_b_y, sf_mex_create(&c6_b_u, "y", 0, 0U, 0U, 0));
  sf_mex_assign(&c6_y, c6_b_y);
  return c6_y;
}

static const mxArray *c6_h_sf_marshall(void *c6_chartInstance, void *c6_u)
{
  const mxArray *c6_y = NULL;
  real_T c6_b_u;
  const mxArray *c6_b_y = NULL;
  c6_y = NULL;
  c6_b_u = *((real_T *)c6_u);
  c6_b_y = NULL;
  sf_mex_assign(&c6_b_y, sf_mex_create(&c6_b_u, "y", 0, 0U, 0U, 0));
  sf_mex_assign(&c6_y, c6_b_y);
  return c6_y;
}

static const mxArray *c6_i_sf_marshall(void *c6_chartInstance, void *c6_u)
{
  const mxArray *c6_y = NULL;
  real_T c6_b_u;
  const mxArray *c6_b_y = NULL;
  c6_y = NULL;
  c6_b_u = *((real_T *)c6_u);
  c6_b_y = NULL;
  sf_mex_assign(&c6_b_y, sf_mex_create(&c6_b_u, "y", 0, 0U, 0U, 0));
  sf_mex_assign(&c6_y, c6_b_y);
  return c6_y;
}

static const mxArray *c6_j_sf_marshall(void *c6_chartInstance, void *c6_u)
{
  const mxArray *c6_y = NULL;
  real_T c6_b_u;
  const mxArray *c6_b_y = NULL;
  c6_y = NULL;
  c6_b_u = *((real_T *)c6_u);
  c6_b_y = NULL;
  sf_mex_assign(&c6_b_y, sf_mex_create(&c6_b_u, "y", 0, 0U, 0U, 0));
  sf_mex_assign(&c6_y, c6_b_y);
  return c6_y;
}

static const mxArray *c6_k_sf_marshall(void *c6_chartInstance, void *c6_u)
{
  const mxArray *c6_y = NULL;
  real_T c6_b_u;
  const mxArray *c6_b_y = NULL;
  c6_y = NULL;
  c6_b_u = *((real_T *)c6_u);
  c6_b_y = NULL;
  sf_mex_assign(&c6_b_y, sf_mex_create(&c6_b_u, "y", 0, 0U, 0U, 0));
  sf_mex_assign(&c6_y, c6_b_y);
  return c6_y;
}

static const mxArray *c6_l_sf_marshall(void *c6_chartInstance, void *c6_u)
{
  const mxArray *c6_y = NULL;
  real_T c6_b_u;
  const mxArray *c6_b_y = NULL;
  c6_y = NULL;
  c6_b_u = *((real_T *)c6_u);
  c6_b_y = NULL;
  sf_mex_assign(&c6_b_y, sf_mex_create(&c6_b_u, "y", 0, 0U, 0U, 0));
  sf_mex_assign(&c6_y, c6_b_y);
  return c6_y;
}

static const mxArray *c6_m_sf_marshall(void *c6_chartInstance, void *c6_u)
{
  const mxArray *c6_y = NULL;
  real_T c6_b_u;
  const mxArray *c6_b_y = NULL;
  c6_y = NULL;
  c6_b_u = *((real_T *)c6_u);
  c6_b_y = NULL;
  sf_mex_assign(&c6_b_y, sf_mex_create(&c6_b_u, "y", 0, 0U, 0U, 0));
  sf_mex_assign(&c6_y, c6_b_y);
  return c6_y;
}

static const mxArray *c6_n_sf_marshall(void *c6_chartInstance, void *c6_u)
{
  const mxArray *c6_y = NULL;
  real_T c6_b_u;
  const mxArray *c6_b_y = NULL;
  c6_y = NULL;
  c6_b_u = *((real_T *)c6_u);
  c6_b_y = NULL;
  sf_mex_assign(&c6_b_y, sf_mex_create(&c6_b_u, "y", 0, 0U, 0U, 0));
  sf_mex_assign(&c6_y, c6_b_y);
  return c6_y;
}

static const mxArray *c6_o_sf_marshall(void *c6_chartInstance, void *c6_u)
{
  const mxArray *c6_y = NULL;
  real_T c6_b_u;
  const mxArray *c6_b_y = NULL;
  c6_y = NULL;
  c6_b_u = *((real_T *)c6_u);
  c6_b_y = NULL;
  sf_mex_assign(&c6_b_y, sf_mex_create(&c6_b_u, "y", 0, 0U, 0U, 0));
  sf_mex_assign(&c6_y, c6_b_y);
  return c6_y;
}

static const mxArray *c6_p_sf_marshall(void *c6_chartInstance, void *c6_u)
{
  const mxArray *c6_y = NULL;
  real_T c6_b_u;
  const mxArray *c6_b_y = NULL;
  c6_y = NULL;
  c6_b_u = *((real_T *)c6_u);
  c6_b_y = NULL;
  sf_mex_assign(&c6_b_y, sf_mex_create(&c6_b_u, "y", 0, 0U, 0U, 0));
  sf_mex_assign(&c6_y, c6_b_y);
  return c6_y;
}

static const mxArray *c6_q_sf_marshall(void *c6_chartInstance, void *c6_u)
{
  const mxArray *c6_y = NULL;
  real_T c6_b_u;
  const mxArray *c6_b_y = NULL;
  c6_y = NULL;
  c6_b_u = *((real_T *)c6_u);
  c6_b_y = NULL;
  sf_mex_assign(&c6_b_y, sf_mex_create(&c6_b_u, "y", 0, 0U, 0U, 0));
  sf_mex_assign(&c6_y, c6_b_y);
  return c6_y;
}

static const mxArray *c6_r_sf_marshall(void *c6_chartInstance, void *c6_u)
{
  const mxArray *c6_y = NULL;
  real_T c6_b_u;
  const mxArray *c6_b_y = NULL;
  c6_y = NULL;
  c6_b_u = *((real_T *)c6_u);
  c6_b_y = NULL;
  sf_mex_assign(&c6_b_y, sf_mex_create(&c6_b_u, "y", 0, 0U, 0U, 0));
  sf_mex_assign(&c6_y, c6_b_y);
  return c6_y;
}

const mxArray *sf_c6_LMdap3dof_get_eml_resolved_functions_info(void)
{
  const mxArray *c6_nameCaptureInfo = NULL;
  c6_ResolvedFunctionInfo c6_info[52];
  const mxArray *c6_m0 = NULL;
  int32_T c6_i11;
  c6_ResolvedFunctionInfo *c6_r0;
  c6_nameCaptureInfo = NULL;
  c6_info_helper(c6_info);
  sf_mex_assign(&c6_m0, sf_mex_createstruct("nameCaptureInfo", 1, 52));
  for(c6_i11 = 0; c6_i11 < 52; c6_i11 = c6_i11 + 1) {
    c6_r0 = &c6_info[c6_i11];
    sf_mex_addfield(c6_m0, sf_mex_create(c6_r0->context, "nameCaptureInfo", 13,
      0U, 0U, 2, 1, strlen(c6_r0->context)), "context",
     "nameCaptureInfo", c6_i11);
    sf_mex_addfield(c6_m0, sf_mex_create(c6_r0->name, "nameCaptureInfo", 13, 0U,
      0U, 2, 1, strlen(c6_r0->name)), "name",
     "nameCaptureInfo", c6_i11);
    sf_mex_addfield(c6_m0, sf_mex_create(c6_r0->dominantType, "nameCaptureInfo",
      13, 0U, 0U, 2, 1, strlen(c6_r0->dominantType)),
     "dominantType", "nameCaptureInfo", c6_i11);
    sf_mex_addfield(c6_m0, sf_mex_create(c6_r0->resolved, "nameCaptureInfo", 13,
      0U, 0U, 2, 1, strlen(c6_r0->resolved)), "resolved",
     "nameCaptureInfo", c6_i11);
    sf_mex_addfield(c6_m0, sf_mex_create(&c6_r0->fileLength, "nameCaptureInfo",
      7, 0U, 0U, 0), "fileLength", "nameCaptureInfo", c6_i11);
    sf_mex_addfield(c6_m0, sf_mex_create(&c6_r0->fileTime1, "nameCaptureInfo",
      7, 0U, 0U, 0), "fileTime1", "nameCaptureInfo", c6_i11);
    sf_mex_addfield(c6_m0, sf_mex_create(&c6_r0->fileTime2, "nameCaptureInfo",
      7, 0U, 0U, 0), "fileTime2", "nameCaptureInfo", c6_i11);
  }
  sf_mex_assign(&c6_nameCaptureInfo, c6_m0);
  return c6_nameCaptureInfo;
}

static void c6_info_helper(c6_ResolvedFunctionInfo c6_info[52])
{
  c6_info[0].context = "[I]$matlabroot$/toolbox/eml/lib/matlab/ops/mrdivide.m";
  c6_info[0].name = "rdivide";
  c6_info[0].dominantType = "double";
  c6_info[0].resolved = "[I]$matlabroot$/toolbox/eml/lib/matlab/ops/rdivide.m";
  c6_info[0].fileLength = 4533U;
  c6_info[0].fileTime1 = 1177099748U;
  c6_info[0].fileTime2 = 0U;
  c6_info[1].context = "[I]$matlabroot$/toolbox/eml/lib/matlab/ops/power.m";
  c6_info[1].name = "eml_scalexp_size";
  c6_info[1].dominantType = "double";
  c6_info[1].resolved =
    "[I]$matlabroot$/toolbox/eml/lib/matlab/eml/eml_scalexp_size.m";
  c6_info[1].fileLength = 923U;
  c6_info[1].fileTime1 = 1160446756U;
  c6_info[1].fileTime2 = 0U;
  c6_info[2].context = "[I]$matlabroot$/toolbox/eml/lib/matlab/elfun/abs.m";
  c6_info[2].name = "islogical";
  c6_info[2].dominantType = "double";
  c6_info[2].resolved =
    "[I]$matlabroot$/toolbox/eml/lib/matlab/datatypes/islogical.m";
  c6_info[2].fileLength = 186U;
  c6_info[2].fileTime1 = 1160446622U;
  c6_info[2].fileTime2 = 0U;
  c6_info[3].context = "[I]$matlabroot$/toolbox/eml/lib/matlab/ops/power.m";
  c6_info[3].name = "eml_error";
  c6_info[3].dominantType = "char";
  c6_info[3].resolved = "[I]$matlabroot$/toolbox/eml/lib/matlab/eml/eml_error.m";
  c6_info[3].fileLength = 585U;
  c6_info[3].fileTime1 = 1177099720U;
  c6_info[3].fileTime2 = 0U;
  c6_info[4].context = "";
  c6_info[4].name = "mpower";
  c6_info[4].dominantType = "double";
  c6_info[4].resolved = "[I]$matlabroot$/toolbox/eml/lib/matlab/ops/mpower.m";
  c6_info[4].fileLength = 3116U;
  c6_info[4].fileTime1 = 1177099746U;
  c6_info[4].fileTime2 = 0U;
  c6_info[5].context = "[I]$matlabroot$/toolbox/eml/lib/matlab/elmat/false.m";
  c6_info[5].name = "logical";
  c6_info[5].dominantType = "double";
  c6_info[5].resolved = "[B]logical";
  c6_info[5].fileLength = 0U;
  c6_info[5].fileTime1 = 0U;
  c6_info[5].fileTime2 = 0U;
  c6_info[6].context = "[I]$matlabroot$/toolbox/eml/lib/matlab/elmat/length.m";
  c6_info[6].name = "eml_numel";
  c6_info[6].dominantType = "double";
  c6_info[6].resolved = "[I]$matlabroot$/toolbox/eml/lib/matlab/eml/eml_numel.m";
  c6_info[6].fileLength = 278U;
  c6_info[6].fileTime1 = 1163970802U;
  c6_info[6].fileTime2 = 0U;
  c6_info[7].context =
    "[I]$matlabroot$/toolbox/eml/lib/matlab/eml/eml_is_float_class.m";
  c6_info[7].name = "ischar";
  c6_info[7].dominantType = "char";
  c6_info[7].resolved = "[I]$matlabroot$/toolbox/eml/lib/matlab/strfun/ischar.m";
  c6_info[7].fileLength = 244U;
  c6_info[7].fileTime1 = 1160446834U;
  c6_info[7].fileTime2 = 0U;
  c6_info[8].context = "[I]$matlabroot$/toolbox/eml/lib/matlab/ops/rdivide.m";
  c6_info[8].name = "isreal";
  c6_info[8].dominantType = "double";
  c6_info[8].resolved = "[B]isreal";
  c6_info[8].fileLength = 0U;
  c6_info[8].fileTime1 = 0U;
  c6_info[8].fileTime2 = 0U;
  c6_info[9].context =
    "[I]$matlabroot$/toolbox/eml/lib/matlab/eml/eml_scalexp_size.m";
  c6_info[9].name = "eml_scalexp_compatible";
  c6_info[9].dominantType = "double";
  c6_info[9].resolved =
    "[I]$matlabroot$/toolbox/eml/lib/matlab/eml/eml_scalexp_compatible.m";
  c6_info[9].fileLength = 422U;
  c6_info[9].fileTime1 = 1160446754U;
  c6_info[9].fileTime2 = 0U;
  c6_info[10].context = "[I]$matlabroot$/toolbox/eml/lib/matlab/ops/mpower.m";
  c6_info[10].name = "power";
  c6_info[10].dominantType = "double";
  c6_info[10].resolved = "[I]$matlabroot$/toolbox/eml/lib/matlab/ops/power.m";
  c6_info[10].fileLength = 4842U;
  c6_info[10].fileTime1 = 1177099746U;
  c6_info[10].fileTime2 = 0U;
  c6_info[11].context = "[I]$matlabroot$/toolbox/eml/lib/matlab/elfun/floor.m";
  c6_info[11].name = "isempty";
  c6_info[11].dominantType = "double";
  c6_info[11].resolved = "[B]isempty";
  c6_info[11].fileLength = 0U;
  c6_info[11].fileTime1 = 0U;
1234

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -