static void
load_X_from_W(info_t *info, fn_links_t *fn, hisq_auxiliary_t *aux,
ks_component_paths *ap){
su3_matrix *fat = get_fatlinks(fn);
su3_matrix *lng = get_lnglinks(fn);
double final_flop = 0.0;
double dtime = -dclock();
#ifdef USE_FL_GPU
load_fatlonglinks_gpu(info, fat, lng, ap, aux->W_unitlink);
#else
load_fatlinks(info, fat, ap, aux->W_unitlink );
final_flop += info->final_flop;
load_lnglinks(info, lng, ap, aux->W_unitlink );
final_flop += info->final_flop;
#endif
dtime += dclock();
node0_printf("Combined fattening and long-link calculation time: %lf\n",dtime);
info->final_flop = final_flop;
}
void
load_fn_links_cpu(info_t *info, fn_links_t *fn, ks_action_paths *ap,
su3_matrix *links, int want_back){
ks_component_paths *p = &ap->p;
double final_flop = 0;
double dtime = -dclock();
// fn->fat = create_fatlinks();
load_fatlinks(info, fn->fat, p, links);
final_flop += info->final_flop;
// fn->lng = create_lnglinks();
load_lnglinks(info, fn->lng, p, links);
final_flop += info->final_flop;
if(want_back)
load_fn_backlinks(fn);
else
destroy_fn_backlinks(fn);
dtime += dclock();
info->final_sec = dtime;
info->final_flop = final_flop;
}