bool_t vml_CgArg (VML *vmls, char *name,CgArg *objp) { vml_class_begin(vmls,"CgArg",name); if (!vml_Float (vmls, "mass", &objp->mass)) return FALSE; if (!vml_Float (vmls, "epsilon", &objp->epsilon)) return FALSE; if (!vml_int (vmls, "max_num_iter", &objp->max_num_iter)) return FALSE; if (!vml_Float (vmls, "stop_rsd", &objp->stop_rsd)) return FALSE; if (!vml_Float (vmls, "true_rsd", &objp->true_rsd)) return FALSE; if (!vml_RitzMatType (vmls, "RitzMatOper", &objp->RitzMatOper)) return FALSE; if (!vml_InverterType (vmls, "Inverter", &objp->Inverter)) return FALSE; if (!vml_int (vmls, "bicgstab_n", &objp->bicgstab_n)) return FALSE; if (!vml_string (vmls, "fname_eigen", &objp->fname_eigen, ~0)) return FALSE; if (!vml_int (vmls, "neig", &objp->neig)) return FALSE; if (!vml_Float (vmls, "eigen_shift", &objp->eigen_shift)) return FALSE; if (!vml_Float (vmls, "ama_stop_rsd", &objp->ama_stop_rsd)) return FALSE; vml_class_end(vmls,"CgArg",name); return TRUE; }
bool_t vml_ActionRationalQuotientArg (VML *vmls, char *name,ActionRationalQuotientArg *objp) { vml_class_begin(vmls,"ActionRationalQuotientArg",name); if (!vml_ActionBilinearArg (vmls, "bi_arg", &objp->bi_arg)) return FALSE; if (!vml_Float (vmls, "spread", &objp->spread)) return FALSE; if (!vml_int (vmls, "remez_generate", &objp->remez_generate)) return FALSE; if (!vml_string (vmls, "rat_poles_file", &objp->rat_poles_file, ~0)) return FALSE; if (!vml_array (vmls, "bsn_mass", (char **)&objp->bsn_mass.bsn_mass_val, (u_int *) &objp->bsn_mass.bsn_mass_len, ~0, sizeof (Float), (vmlproc_t) vml_Float)) return FALSE; if (!vml_array (vmls, "frm_mass", (char **)&objp->frm_mass.frm_mass_val, (u_int *) &objp->frm_mass.frm_mass_len, ~0, sizeof (Float), (vmlproc_t) vml_Float)) return FALSE; if (!vml_array (vmls, "bosons", (char **)&objp->bosons.bosons_val, (u_int *) &objp->bosons.bosons_len, ~0, sizeof (RationalDescr), (vmlproc_t) vml_RationalDescr)) return FALSE; if (!vml_array (vmls, "fermions", (char **)&objp->fermions.fermions_val, (u_int *) &objp->fermions.fermions_len, ~0, sizeof (RationalDescr), (vmlproc_t) vml_RationalDescr)) return FALSE; if (!vml_EigenDescr (vmls, "eigen", &objp->eigen)) return FALSE; vml_class_end(vmls,"ActionRationalQuotientArg",name); return TRUE; }
bool_t vml_QudaArg (VML *vmls, char *name,QudaArg *objp) { vml_class_begin(vmls,"QudaArg",name); if (!vml_CudaPrecision (vmls, "gauge_prec", &objp->gauge_prec)) return FALSE; if (!vml_CudaPrecision (vmls, "spinor_prec", &objp->spinor_prec)) return FALSE; if (!vml_CudaReconstructType (vmls, "reconstruct", &objp->reconstruct)) return FALSE; if (!vml_CudaPrecision (vmls, "gauge_prec_sloppy", &objp->gauge_prec_sloppy)) return FALSE; if (!vml_CudaPrecision (vmls, "spinor_prec_sloppy", &objp->spinor_prec_sloppy)) return FALSE; if (!vml_CudaReconstructType (vmls, "reconstruct_sloppy", &objp->reconstruct_sloppy)) return FALSE; if (!vml_Float (vmls, "reliable_delta", &objp->reliable_delta)) return FALSE; if (!vml_int (vmls, "max_restart", &objp->max_restart)) return FALSE; if (!vml_int (vmls, "device", &objp->device)) return FALSE; vml_class_end(vmls,"QudaArg",name); return TRUE; }
bool_t vml_LanczosArg (VML *vmls, char *name,LanczosArg *objp) { vml_class_begin(vmls,"LanczosArg",name); if (!vml_RitzMatType (vmls, "RitzMat_lanczos", &objp->RitzMat_lanczos)) return FALSE; if (!vml_RitzMatType (vmls, "RitzMat_convcheck", &objp->RitzMat_convcheck)) return FALSE; if (!vml_Float (vmls, "mass", &objp->mass)) return FALSE; if (!vml_int (vmls, "nk_lanczos_vectors", &objp->nk_lanczos_vectors)) return FALSE; if (!vml_int (vmls, "np_lanczos_vectors", &objp->np_lanczos_vectors)) return FALSE; if (!vml_Float (vmls, "eigen_shift", &objp->eigen_shift)) return FALSE; if (!vml_Float (vmls, "stop_residual", &objp->stop_residual)) return FALSE; if (!vml_int (vmls, "maxiters", &objp->maxiters)) return FALSE; if (!vml_int (vmls, "save", &objp->save)) return FALSE; if (!vml_int (vmls, "conv_check", &objp->conv_check)) return FALSE; if (!vml_string (vmls, "results", &objp->results, ~0)) return FALSE; if (!vml_string (vmls, "file", &objp->file, ~0)) return FALSE; if (!vml_MatrixPolynomialArg (vmls, "matpoly_arg", &objp->matpoly_arg)) return FALSE; vml_class_end(vmls,"LanczosArg",name); return TRUE; }
bool_t vml_QuotientDescr (VML *vmls, char *name,QuotientDescr *objp) { vml_class_begin(vmls,"QuotientDescr",name); if (!vml_Float (vmls, "bsn_mass", &objp->bsn_mass)) return FALSE; if (!vml_Float (vmls, "bsn_mass_epsilon", &objp->bsn_mass_epsilon)) return FALSE; if (!vml_Float (vmls, "frm_mass", &objp->frm_mass)) return FALSE; if (!vml_Float (vmls, "frm_mass_epsilon", &objp->frm_mass_epsilon)) return FALSE; if (!vml_int (vmls, "chrono", &objp->chrono)) return FALSE; if (!vml_Float (vmls, "stop_rsd_hb", &objp->stop_rsd_hb)) return FALSE; if (!vml_Float (vmls, "stop_rsd_fg_mult", &objp->stop_rsd_fg_mult)) return FALSE; if (!vml_Float (vmls, "stop_rsd_md", &objp->stop_rsd_md)) return FALSE; if (!vml_Float (vmls, "stop_rsd_mc", &objp->stop_rsd_mc)) return FALSE; vml_class_end(vmls,"QuotientDescr",name); return TRUE; }
bool_t vml_MdwfTuningInitArg (VML *vmls, char *name,MdwfTuningInitArg *objp) { vml_class_begin(vmls,"MdwfTuningInitArg",name); if (!vml_int (vmls, "ls_min", &objp->ls_min)) return FALSE; if (!vml_int (vmls, "ls_max", &objp->ls_max)) return FALSE; if (!vml_int (vmls, "rc_max", &objp->rc_max)) return FALSE; if (!vml_int (vmls, "use_mdwf_for_dwf", &objp->use_mdwf_for_dwf)) return FALSE; if (!vml_int (vmls, "use_single_precision", &objp->use_single_precision)) return FALSE; if (!vml_Float (vmls, "c5_range", &objp->c5_range)) return FALSE; if (!vml_Float (vmls, "rsd_granularity", &objp->rsd_granularity)) return FALSE; if (!vml_string (vmls, "tuning_fn", &objp->tuning_fn, ~0)) return FALSE; if (!vml_string (vmls, "tuning_record_fn", &objp->tuning_record_fn, ~0)) return FALSE; vml_class_end(vmls,"MdwfTuningInitArg",name); return TRUE; }
bool_t vml_PbpArg (VML *vmls, char *name,PbpArg *objp) { vml_class_begin(vmls,"PbpArg",name); int i; if (!vml_PatternType (vmls, "pattern_kind", &objp->pattern_kind)) return FALSE; if (!vml_int (vmls, "n_masses", &objp->n_masses)) return FALSE; if (!vml_Float (vmls, "mass_start", &objp->mass_start)) return FALSE; if (!vml_Float (vmls, "mass_step", &objp->mass_step)) return FALSE; if (!vml_vector (vmls, "mass", (char *)objp->mass, MAX_PBP_MASSES, sizeof (Float), (vmlproc_t) vml_Float)) return FALSE; if (!vml_int (vmls, "max_num_iter", &objp->max_num_iter)) return FALSE; if (!vml_Float (vmls, "stop_rsd", &objp->stop_rsd)) return FALSE; if (!vml_int (vmls, "src_u_s", &objp->src_u_s)) return FALSE; if (!vml_int (vmls, "src_l_s", &objp->src_l_s)) return FALSE; if (!vml_int (vmls, "snk_u_s", &objp->snk_u_s)) return FALSE; if (!vml_int (vmls, "snk_l_s", &objp->snk_l_s)) return FALSE; if (!vml_int (vmls, "snk_loop", &objp->snk_loop)) return FALSE; vml_class_end(vmls,"PbpArg",name); return TRUE; }
bool_t vml_QPropWGaussArg (VML *vmls, char *name,QPropWGaussArg *objp) { vml_class_begin(vmls,"QPropWGaussArg",name); int i; if (!vml_int (vmls, "gauss_N", &objp->gauss_N)) return FALSE; if (!vml_Float (vmls, "gauss_W", &objp->gauss_W)) return FALSE; if (!vml_int (vmls, "nt", &objp->nt)) return FALSE; if (!vml_vector (vmls, "mt", (char *)objp->mt, 5, sizeof (int), (vmlproc_t) vml_int)) return FALSE; if (!vml_GaussianKernelLinkSmearType (vmls, "gauss_link_smear_type", &objp->gauss_link_smear_type)) return FALSE; if (!vml_int (vmls, "gauss_link_smear_N", &objp->gauss_link_smear_N)) return FALSE; if (!vml_Float (vmls, "gauss_link_smear_coeff", &objp->gauss_link_smear_coeff)) return FALSE; //Begin QUDA-CPS if (!vml_int (vmls, "gauss_link_smear_ortho", &objp->gauss_link_smear_ortho)) return FALSE; //Begin QUDA-CPS vml_class_end(vmls,"QPropWGaussArg",name); return TRUE; }
bool_t vml_QPropWGFArg (VML *vmls, char *name,QPropWGFArg *objp) { vml_class_begin(vmls,"QPropWGFArg",name); if (!vml_int (vmls, "gauge_fix_src", &objp->gauge_fix_src)) return FALSE; vml_class_end(vmls,"QPropWGFArg",name); return TRUE; }
bool_t vml_IntArray (VML *vmls, char *name,IntArray *objp) { vml_class_begin(vmls,"IntArray",name); if (!vml_array (vmls, "v", (char **)&objp->v.v_val, (u_int *) &objp->v.v_len, ~0, sizeof (int), (vmlproc_t) vml_int)) return FALSE; vml_class_end(vmls,"IntArray",name); return TRUE; }
bool_t vml_FloatArray (VML *vmls, char *name,FloatArray *objp) { vml_class_begin(vmls,"FloatArray",name); if (!vml_array (vmls, "Floats", (char **)&objp->Floats.Floats_val, (u_int *) &objp->Floats.Floats_len, ~0, sizeof (Float), (vmlproc_t) vml_Float)) return FALSE; vml_class_end(vmls,"FloatArray",name); return TRUE; }
bool_t vml_ParamArray (VML *vmls, char *name,ParamArray *objp) { vml_class_begin(vmls,"ParamArray",name); if (!vml_array (vmls, "params", (char **)&objp->params.params_val, (u_int *) &objp->params.params_len, ~0, sizeof (ParamArg), (vmlproc_t) vml_ParamArg)) return FALSE; vml_class_end(vmls,"ParamArray",name); return TRUE; }
bool_t vml_ActionRationalSplitArg (VML *vmls, char *name,ActionRationalSplitArg *objp) { vml_class_begin(vmls,"ActionRationalSplitArg",name); if (!vml_array (vmls, "fractionSplit", (char **)&objp->fractionSplit.fractionSplit_val, (u_int *) &objp->fractionSplit.fractionSplit_len, ~0, sizeof (SplitRange), (vmlproc_t) vml_SplitRange)) return FALSE; vml_class_end(vmls,"ActionRationalSplitArg",name); return TRUE; }
bool_t vml_BilinearDescr (VML *vmls, char *name,BilinearDescr *objp) { vml_class_begin(vmls,"BilinearDescr",name); if (!vml_Float (vmls, "mass", &objp->mass)) return FALSE; if (!vml_int (vmls, "max_num_iter", &objp->max_num_iter)) return FALSE; vml_class_end(vmls,"BilinearDescr",name); return TRUE; }
bool_t vml_ActionArg (VML *vmls, char *name,ActionArg *objp) { vml_class_begin(vmls,"ActionArg",name); if (!vml_ForceMeasure (vmls, "force_measure", &objp->force_measure)) return FALSE; if (!vml_string (vmls, "force_label", &objp->force_label, ~0)) return FALSE; vml_class_end(vmls,"ActionArg",name); return TRUE; }
bool_t vml_ActionGaugeArg (VML *vmls, char *name,ActionGaugeArg *objp) { vml_class_begin(vmls,"ActionGaugeArg",name); if (!vml_GclassType (vmls, "gluon", &objp->gluon)) return FALSE; if (!vml_ActionArg (vmls, "action_arg", &objp->action_arg)) return FALSE; vml_class_end(vmls,"ActionGaugeArg",name); return TRUE; }
bool_t vml_BosonDescr (VML *vmls, char *name,BosonDescr *objp) { vml_class_begin(vmls,"BosonDescr",name); if (!vml_Float (vmls, "epsilon", &objp->epsilon)) return FALSE; if (!vml_Float (vmls, "stop_rsd_hb", &objp->stop_rsd_hb)) return FALSE; vml_class_end(vmls,"BosonDescr",name); return TRUE; }
bool_t vml_SplitRange (VML *vmls, char *name,SplitRange *objp) { vml_class_begin(vmls,"SplitRange",name); if (!vml_int (vmls, "split_low", &objp->split_low)) return FALSE; if (!vml_int (vmls, "split_high", &objp->split_high)) return FALSE; vml_class_end(vmls,"SplitRange",name); return TRUE; }
bool_t vml_C5State (VML *vmls, char *name,C5State *objp) { vml_class_begin(vmls,"C5State",name); if (!vml_Float (vmls, "val", &objp->val)) return FALSE; if (!vml_int (vmls, "dwf_cg", &objp->dwf_cg)) return FALSE; vml_class_end(vmls,"C5State",name); return TRUE; }
bool_t vml_QPropWSlabArg (VML *vmls, char *name,QPropWSlabArg *objp) { vml_class_begin(vmls,"QPropWSlabArg",name); if (!vml_QPropWRandArg (vmls, "rand_arg", &objp->rand_arg)) return FALSE; if (!vml_int (vmls, "slab_width", &objp->slab_width)) return FALSE; vml_class_end(vmls,"QPropWSlabArg",name); return TRUE; }
bool_t vml_ParamArg (VML *vmls, char *name,ParamArg *objp) { vml_class_begin(vmls,"ParamArg",name); if (!vml_string (vmls, "name", &objp->name, ~0)) return FALSE; if (!vml_Float (vmls, "val", &objp->val)) return FALSE; vml_class_end(vmls,"ParamArg",name); return TRUE; }
bool_t vml_QPropWRandArg (VML *vmls, char *name,QPropWRandArg *objp) { vml_class_begin(vmls,"QPropWRandArg",name); if (!vml_RandomType (vmls, "rng", &objp->rng)) return FALSE; if (!vml_int (vmls, "seed", &objp->seed)) return FALSE; vml_class_end(vmls,"QPropWRandArg",name); return TRUE; }
bool_t vml_ActionFermionArg (VML *vmls, char *name,ActionFermionArg *objp) { vml_class_begin(vmls,"ActionFermionArg",name); if (!vml_ActionBilinearArg (vmls, "bi_arg", &objp->bi_arg)) return FALSE; if (!vml_array (vmls, "fermions", (char **)&objp->fermions.fermions_val, (u_int *) &objp->fermions.fermions_len, ~0, sizeof (FermionDescr), (vmlproc_t) vml_FermionDescr)) return FALSE; vml_class_end(vmls,"ActionFermionArg",name); return TRUE; }
bool_t vml_ActionQuotientArg (VML *vmls, char *name,ActionQuotientArg *objp) { vml_class_begin(vmls,"ActionQuotientArg",name); if (!vml_ActionBilinearArg (vmls, "bi_arg", &objp->bi_arg)) return FALSE; if (!vml_array (vmls, "quotients", (char **)&objp->quotients.quotients_val, (u_int *) &objp->quotients.quotients_len, ~0, sizeof (QuotientDescr), (vmlproc_t) vml_QuotientDescr)) return FALSE; vml_class_end(vmls,"ActionQuotientArg",name); return TRUE; }
bool_t vml_MeasTask (VML *vmls, char *name,MeasTask *objp) { vml_class_begin(vmls,"MeasTask",name); if (!vml_MeasType (vmls, "Measurement", &objp->Measurement)) return FALSE; if (!vml_string (vmls, "ArgFilename", &objp->ArgFilename, ~0)) return FALSE; if (!vml_string (vmls, "OutputFilestem", &objp->OutputFilestem, ~0)) return FALSE; vml_class_end(vmls,"MeasTask",name); return TRUE; }
bool_t vml_QPropWPointArg (VML *vmls, char *name,QPropWPointArg *objp) { vml_class_begin(vmls,"QPropWPointArg",name); if (!vml_int (vmls, "x", &objp->x)) return FALSE; if (!vml_int (vmls, "y", &objp->y)) return FALSE; if (!vml_int (vmls, "z", &objp->z)) return FALSE; vml_class_end(vmls,"QPropWPointArg",name); return TRUE; }
bool_t vml_QPropWExpArg (VML *vmls, char *name,QPropWExpArg *objp) { vml_class_begin(vmls,"QPropWExpArg",name); if (!vml_Float (vmls, "exp_A", &objp->exp_A)) return FALSE; if (!vml_Float (vmls, "exp_B", &objp->exp_B)) return FALSE; if (!vml_Float (vmls, "exp_C", &objp->exp_C)) return FALSE; vml_class_end(vmls,"QPropWExpArg",name); return TRUE; }
bool_t vml_QPropWBoxArg (VML *vmls, char *name,QPropWBoxArg *objp) { vml_class_begin(vmls,"QPropWBoxArg",name); if (!vml_int (vmls, "box_start", &objp->box_start)) return FALSE; if (!vml_int (vmls, "box_end", &objp->box_end)) return FALSE; if (!vml_int (vmls, "use_xyz_offset", &objp->use_xyz_offset)) return FALSE; vml_class_end(vmls,"QPropWBoxArg",name); return TRUE; }
bool_t vml_QPropWArg (VML *vmls, char *name,QPropWArg *objp) { vml_class_begin(vmls,"QPropWArg",name); if (!vml_CgArg (vmls, "cg", &objp->cg)) return FALSE; if (!vml_string (vmls, "file", &objp->file, ~0)) return FALSE; if (!vml_int (vmls, "x", &objp->x)) return FALSE; if (!vml_int (vmls, "y", &objp->y)) return FALSE; if (!vml_int (vmls, "z", &objp->z)) return FALSE; if (!vml_int (vmls, "t", &objp->t)) return FALSE; if (!vml_int (vmls, "gauge_fix_src", &objp->gauge_fix_src)) return FALSE; if (!vml_int (vmls, "gauge_fix_snk", &objp->gauge_fix_snk)) return FALSE; if (!vml_int (vmls, "smeared_src", &objp->smeared_src)) return FALSE; if (!vml_int (vmls, "smeared_snk", &objp->smeared_snk)) return FALSE; if (!vml_int (vmls, "store_midprop", &objp->store_midprop)) return FALSE; if (!vml_int (vmls, "save_prop", &objp->save_prop)) return FALSE; if (!vml_int (vmls, "save_ls_prop", &objp->save_ls_prop)) return FALSE; if (!vml_int (vmls, "do_half_fermion", &objp->do_half_fermion)) return FALSE; if (!vml_SourceType (vmls, "SeqSmearSink", &objp->SeqSmearSink)) return FALSE; if (!vml_string (vmls, "ensemble_label", &objp->ensemble_label, ~0)) return FALSE; if (!vml_string (vmls, "ensemble_id", &objp->ensemble_id, ~0)) return FALSE; if (!vml_int (vmls, "seqNum", &objp->seqNum)) return FALSE; if (!vml_int (vmls, "StartSrcSpin", &objp->StartSrcSpin)) return FALSE; if (!vml_int (vmls, "EndSrcSpin", &objp->EndSrcSpin)) return FALSE; if (!vml_int (vmls, "StartSrcColor", &objp->StartSrcColor)) return FALSE; if (!vml_int (vmls, "EndSrcColor", &objp->EndSrcColor)) return FALSE; vml_class_end(vmls,"QPropWArg",name); return TRUE; }
bool_t vml_MatrixPolynomialArg (VML *vmls, char *name,MatrixPolynomialArg *objp) { vml_class_begin(vmls,"MatrixPolynomialArg",name); if (!vml_int (vmls, "Npol", &objp->Npol)) return FALSE; if (!vml_array (vmls, "params", (char **)&objp->params.params_val, (u_int *) &objp->params.params_len, ~0, sizeof (Float), (vmlproc_t) vml_Float)) return FALSE; if (!vml_Pointer (vmls, "tmp1", &objp->tmp1)) return FALSE; if (!vml_Pointer (vmls, "tmp2", &objp->tmp2)) return FALSE; vml_class_end(vmls,"MatrixPolynomialArg",name); return TRUE; }