Planned maintenance on Wednesday, 2021-01-20, 17:00-18:00. Expect some interruptions during that time

bioem.cpp 20.6 KB
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31
#include <fstream>
#include <boost/program_options.hpp>
#include <iostream>
#include <algorithm>
#include <iterator>
#include <stdio.h>
#include <stdlib.h>
#include <string>
#include <cmath>
#include <omp.h>

#include <fftw3.h>
#include <math.h>
#include "cmodules/timer.h"

#include "param.h"
#include "bioem.h"
#include "model.h"
#include "map.h"

#include "bioem_algorithm.h"

using namespace boost;
namespace po = boost::program_options;

using namespace std;

// A helper function of Boost
template<class T>
ostream& operator<<(ostream& os, const vector<T>& v)
{
32 33
	copy(v.begin(), v.end(), ostream_iterator<T>(os, " "));
	return os;
34 35 36 37
}

bioem::bioem()
{
38
	FFTAlgo = getenv("FFTALGO") == NULL ? 0 : atoi(getenv("FFTALGO"));
39 40 41 42
}

bioem::~bioem()
{
David Rohr's avatar
David Rohr committed
43

44 45 46 47
}

int bioem::configure(int ac, char* av[])
{
David Rohr's avatar
David Rohr committed
48 49 50 51 52
	// **************************************************************************************
	// **** Configuration Routine using boost for extracting parameters, models and maps ****
	// **************************************************************************************
	// ****** And Precalculating necessary grids, map crosscorrelations and kernels  ********
	// *************************************************************************************
53

David Rohr's avatar
David Rohr committed
54
	// *** Inizialzing default variables ***
55 56 57
	std::string infile, modelfile, mapfile;
	Model.readPDB = false;
	param.writeAngles = false;
58 59
	param.dumpMap = false;
	param.loadMap = false;
60

David Rohr's avatar
David Rohr committed
61
	// *************************************************************************************
62
	cout << " ++++++++++++ FROM COMMAND LINE +++++++++++\n\n";
David Rohr's avatar
David Rohr committed
63
	// *************************************************************************************
64

David Rohr's avatar
David Rohr committed
65
	// ********************* Command line reading input with BOOST ************************
66

67 68 69 70 71 72 73
	try {
		po::options_description desc("Command line inputs");
		desc.add_options()
		("Inputfile", po::value<std::string>(), "Name of input parameter file")
		("Modelfile", po::value< std::string>() , "Name of model file")
		("Particlesfile", po::value< std::string>(), "Name of paricles file")
		("ReadPDB", "(Optional) If reading model file in PDB format")
74 75
		("DumpMaps", "(Optional) Dump maps after they were red from maps file")
		("LoadMapDump", "(Optional) Read Maps from dump instead of maps file")
76 77 78 79 80 81 82 83
		("help", "(Optional) Produce help message")
		;

		po::positional_options_description p;
		p.add("Inputfile", -1);
		p.add("Modelfile", -1);
		p.add("Particlesfile", -1);
		p.add("ReadPDB", -1);
84 85 86
		p.add("DumpMaps", -1);
		p.add("LoadMapDump", -1);

87 88 89 90 91 92 93
		po::variables_map vm;
		po::store(po::command_line_parser(ac, av).
				  options(desc).positional(p).run(), vm);
		po::notify(vm);

		if((ac < 6)) {
			std::cout << desc << std::endl;
94
			return 1;
95 96 97 98
		}
		if (vm.count("help")) {
			cout << "Usage: options_description [options]\n";
			cout << desc;
99
			return 1;
100 101 102 103 104
		}

		if (vm.count("Inputfile"))
		{
			cout << "Input file is: ";
105 106
			cout << vm["Inputfile"].as< std::string >() << "\n";
			infile = vm["Inputfile"].as< std::string >();
107 108 109 110 111
		}
		if (vm.count("Modelfile"))
		{
			cout << "Model file is: "
				 << vm["Modelfile"].as<  std::string  >() << "\n";
112
			modelfile = vm["Modelfile"].as<  std::string  >();
113 114 115 116 117
		}

		if (vm.count("ReadPDB"))
		{
			cout << "Reading model file in PDB format.\n";
118
			Model.readPDB = true;
119 120 121 122 123
		}

		if (vm.count("DumpMaps"))
		{
			cout << "Dumping Maps after reading from file.\n";
124
			param.dumpMap = true;
125 126 127 128 129
		}

		if (vm.count("LoadMapDump"))
		{
			cout << "Loading Map dump.\n";
130
			param.loadMap = true;
131 132 133 134 135 136
		}

		if (vm.count("Particlesfile"))
		{
			cout << "Paricle file is: "
				 << vm["Particlesfile"].as< std::string >() << "\n";
137
			mapfile = vm["Particlesfile"].as< std::string >();
138 139 140 141 142 143 144 145
		}
	}
	catch(std::exception& e)
	{
		cout << e.what() << "\n";
		return 1;
	}

David Rohr's avatar
David Rohr committed
146
	// ********************* Reading Parameter Input ***************************
147 148 149 150
	// copying inputfile to param class
	param.fileinput = infile.c_str();
	param.readParameters();

David Rohr's avatar
David Rohr committed
151
	// ********************* Reading Model Input ******************************
152 153 154 155
	// copying modelfile to model class
	Model.filemodel = modelfile.c_str();
	Model.readModel();

David Rohr's avatar
David Rohr committed
156 157
	// ********************* Reading Particle Maps Input **********************
	// ********* HERE: PROBLEM if maps dont fit on the memory!! ***************
158
	// copying mapfile to ref map class
159
	param.filemap = mapfile.c_str();
160 161
	RefMap.readRefMaps(param);

David Rohr's avatar
David Rohr committed
162
	// ****************** Precalculating Necessary Stuff *********************
163
	precalculate();
David Rohr's avatar
David Rohr committed
164

165 166 167 168 169
	if (getenv("BIOEM_DEBUG_BREAK"))
	{
		param.nTotGridAngles = atoi(getenv("BIOEM_DEBUG_BREAK"));
		param.nTotCTFs = atoi(getenv("BIOEM_DEBUG_BREAK"));
	}
David Rohr's avatar
David Rohr committed
170

171
	pProb.init(RefMap.ntotRefMap, param.nTotGridAngles, *this);
172

173 174
	deviceInit();

175
	return(0);
176 177
}

178 179 180
void bioem::cleanup()
{
	//Deleting allocated pointers
181
	free_device_host(pProb.ptr);
182 183 184
	RefMap.freePointers();
}

185 186
int bioem::precalculate()
{
David Rohr's avatar
David Rohr committed
187
	// **************************************************************************************
David Rohr's avatar
David Rohr committed
188
	// **Precalculating Routine of Orientation grids, Map crosscorrelations and CTF Kernels**
David Rohr's avatar
David Rohr committed
189
	// **************************************************************************************
190

191 192
	// Generating Grids of orientations
	param.CalculateGridsParam();
193

194 195
	// Precalculating CTF Kernels stored in class Param
	param.CalculateRefCTF();
196

197 198
	//Precalculate Maps
	RefMap.precalculate(param, *this);
199

200
	return(0);
201 202 203 204
}

int bioem::run()
{
David Rohr's avatar
David Rohr committed
205 206 207
	// **************************************************************************************
	// **** Main BioEM routine, projects, convolutes and compares with Map using OpenMP ****
	// **************************************************************************************
208

David Rohr's avatar
David Rohr committed
209 210
	// **** If we want to control the number of threads -> omp_set_num_threads(XX); ******
	// ****************** Declarying class of Probability Pointer  *************************
211

212
	printf("\tInitializing Probabilities\n");
213 214 215
	// Inizialzing Probabilites to zero and constant to -Infinity
	for (int iRefMap = 0; iRefMap < RefMap.ntotRefMap; iRefMap ++)
	{
216 217 218 219 220
		bioem_Probability_map& pProbMap = pProb.getProbMap(iRefMap);

		pProbMap.Total = 0.0;
		pProbMap.Constoadd = -9999999;
		pProbMap.max_prob = -9999999;
221
		for (int iOrient = 0; iOrient < param.nTotGridAngles; iOrient ++)
222
		{
223 224 225 226
			bioem_Probability_angle& pProbAngle = pProb.getProbAngle(iRefMap, iOrient);

			pProbAngle.forAngles = 0.0;
			pProbAngle.ConstAngle = -99999999;
227 228
		}
	}
David Rohr's avatar
David Rohr committed
229
	// **************************************************************************************
230
	deviceStartRun();
231 232 233 234 235 236 237 238 239 240
	{
		const int count = omp_get_max_threads();
		localCCT = new mycomplex_t*[count];
		lCC = new myfloat_t*[count];
		for (int i = 0;i < count;i++)
		{
			localCCT[i] = (mycomplex_t *) myfftw_malloc(sizeof(mycomplex_t) * param.param_device.NumberPixels * param.param_device.NumberFFTPixels1D);
			lCC[i] = (myfloat_t *) myfftw_malloc(sizeof(myfloat_t) * param.param_device.NumberPixels * param.param_device.NumberPixels);
		}
	}
241

David Rohr's avatar
David Rohr committed
242
	// ******************************** MAIN CYCLE ******************************************
David Rohr's avatar
David Rohr committed
243

David Rohr's avatar
David Rohr committed
244
	// *** Declaring Private variables for each thread *****
245
	mycomplex_t* proj_mapFFT;
246
	myfloat_t* conv_map = new myfloat_t[param.param_device.NumberPixels * param.param_device.NumberPixels];
247
	mycomplex_t* conv_mapFFT;
248
	myfloat_t sumCONV, sumsquareCONV;
249 250

	//allocating fftw_complex vector
251 252
	proj_mapFFT = (mycomplex_t *) myfftw_malloc(sizeof(mycomplex_t) * param.param_device.NumberPixels * param.param_device.NumberFFTPixels1D);
	conv_mapFFT = (mycomplex_t *) myfftw_malloc(sizeof(mycomplex_t) * param.param_device.NumberPixels * param.param_device.NumberFFTPixels1D);
253 254 255 256 257

	HighResTimer timer;

	printf("\tMain Loop (GridAngles %d, CTFs %d, RefMaps %d, Shifts (%d/%d)²), Pixels %d²\n", param.nTotGridAngles, param.nTotCTFs, RefMap.ntotRefMap, 2 * param.param_device.maxDisplaceCenter + param.param_device.GridSpaceCenter, param.param_device.GridSpaceCenter, param.param_device.NumberPixels);
	printf("\tInner Loop Count (%d %d %d) %lld\n", param.param_device.maxDisplaceCenter, param.param_device.GridSpaceCenter, param.param_device.NumberPixels, (long long int) (param.param_device.NumberPixels * param.param_device.NumberPixels * (2 * param.param_device.maxDisplaceCenter / param.param_device.GridSpaceCenter + 1) * (2 * param.param_device.maxDisplaceCenter / param.param_device.GridSpaceCenter + 1)));
258
	for (int iOrient = 0; iOrient < param.nTotGridAngles; iOrient++)
259
	{
David Rohr's avatar
David Rohr committed
260 261
		// ***************************************************************************************
		// ***** Creating Projection for given orientation and transforming to Fourier space *****
262
		timer.ResetStart();
263 264
		createProjection(iOrient, proj_mapFFT);
		printf("Time Projection %d: %f\n", iOrient, timer.GetCurrentElapsedTime());
265

David Rohr's avatar
David Rohr committed
266 267
		// ***************************************************************************************
		// ***** **** Internal Loop over convolutions **** *****
268 269
		for (int iConv = 0; iConv < param.nTotCTFs; iConv++)
		{
270
			printf("\t\tConvolution %d %d\n", iOrient, iConv);
David Rohr's avatar
David Rohr committed
271
			// *** Calculating convolutions of projection map and crosscorrelations ***
272

273
			timer.ResetStart();
274 275
			createConvolutedProjectionMap(iOrient, iConv, proj_mapFFT, conv_map, conv_mapFFT, sumCONV, sumsquareCONV);
			printf("Time Convolution %d %d: %f\n", iOrient, iConv, timer.GetCurrentElapsedTime());
276

David Rohr's avatar
David Rohr committed
277 278
			// ***************************************************************************************
			// *** Comparing each calculated convoluted map with all experimental maps ***
279
			timer.ResetStart();
280
			compareRefMaps(iOrient, iConv, conv_map, conv_mapFFT, sumCONV, sumsquareCONV);
281

282 283 284
			const double compTime = timer.GetCurrentElapsedTime();
			const int nShifts = 2 * param.param_device.maxDisplaceCenter / param.param_device.GridSpaceCenter + 1;
			const double nFlops = (double) RefMap.ntotRefMap * (double) nShifts * (double) nShifts *
285
								  (((double) param.param_device.NumberPixels - (double) param.param_device.maxDisplaceCenter / 2.) * ((double) param.param_device.NumberPixels - (double) param.param_device.maxDisplaceCenter / 2.) * 5. + 25.) / compTime;
286
			const double nGBs = (double) RefMap.ntotRefMap * (double) nShifts * (double) nShifts *
287
								(((double) param.param_device.NumberPixels - (double) param.param_device.maxDisplaceCenter / 2.) * ((double) param.param_device.NumberPixels - (double) param.param_device.maxDisplaceCenter / 2.) * 2. + 8.) * (double) sizeof(myfloat_t) / compTime;
288 289
			const double nGBs2 = (double) RefMap.ntotRefMap * ((double) param.param_device.NumberPixels * (double) param.param_device.NumberPixels + 8.) * (double) sizeof(myfloat_t) / compTime;

290
			printf("Time Comparison %d %d: %f sec (%f GFlops, %f GB/s (cached), %f GB/s)\n", iOrient, iConv, compTime, nFlops / 1000000000., nGBs / 1000000000., nGBs2 / 1000000000.);
291 292 293 294 295
		}
	}
	//deallocating fftw_complex vector
	myfftw_free(proj_mapFFT);
	myfftw_free(conv_mapFFT);
296
	delete[] conv_map;
David Rohr's avatar
David Rohr committed
297

298
	deviceFinishRun();
299 300 301 302 303 304 305 306 307 308
	{
		const int count = omp_get_max_threads();
		for (int i = 0;i < count;i++)
		{
			myfftw_free(localCCT[i]);
			myfftw_free(lCC[i]);
		}
		delete[] localCCT;
		delete[] lCC;
	}
309

David Rohr's avatar
David Rohr committed
310
	// ************* Writing Out Probabilities ***************
311

David Rohr's avatar
David Rohr committed
312
	// *** Angular Probability ***
313

314 315 316 317
	// if(param.writeAngles){
	ofstream angProbfile;
	angProbfile.open ("ANG_PROB_iRefMap");
	// }
318

319 320 321 322
	ofstream outputProbFile;
	outputProbFile.open ("Output_Probabilities");
	for (int iRefMap = 0; iRefMap < RefMap.ntotRefMap; iRefMap ++)
	{
David Rohr's avatar
David Rohr committed
323
		// **** Total Probability ***
324 325 326
		bioem_Probability_map& pProbMap = pProb.getProbMap(iRefMap);

		outputProbFile << "RefMap " << iRefMap << " Probability  "  << log(pProbMap.Total) + pProbMap.Constoadd + 0.5 * log(M_PI) + (1 - param.param_device.Ntotpi * 0.5)*(log(2 * M_PI) + 1) + log(param.param_device.volu) << " Constant " << pProbMap.Constoadd  << "\n";
327 328 329

		outputProbFile << "RefMap " << iRefMap << " Maximizing Param: ";

David Rohr's avatar
David Rohr committed
330
		// *** Param that maximize probability****
331 332 333 334 335 336 337 338 339
		outputProbFile << (pProbMap.max_prob + 0.5 * log(M_PI) + (1 - param.param_device.Ntotpi * 0.5) * (log(2 * M_PI) + 1) + log(param.param_device.volu)) << " ";
		outputProbFile << param.angles[pProbMap.max_prob_orient].pos[0] << " ";
		outputProbFile << param.angles[pProbMap.max_prob_orient].pos[1] << " ";
		outputProbFile << param.angles[pProbMap.max_prob_orient].pos[2] << " ";
		outputProbFile << param.CtfParam[pProbMap.max_prob_conv].pos[0] << " ";
		outputProbFile << param.CtfParam[pProbMap.max_prob_conv].pos[1] << " ";
		outputProbFile << param.CtfParam[pProbMap.max_prob_conv].pos[2] << " ";
		outputProbFile << pProbMap.max_prob_cent_x << " ";
		outputProbFile << pProbMap.max_prob_cent_y;
340
		outputProbFile << "\n";
341

David Rohr's avatar
David Rohr committed
342
		// *** For individual files*** //angProbfile.open ("ANG_PROB_"iRefMap);
343

344
		if(param.writeAngles)
345
		{
346
			for (int iOrient = 0; iOrient < param.nTotGridAngles; iOrient++)
347
			{
348
				bioem_Probability_angle& pProbAngle = pProb.getProbAngle(iRefMap, iOrient);
349

350
				angProbfile << " " << iRefMap << " " << param.angles[iOrient].pos[0] << " " << param.angles[iOrient].pos[1] << " " << param.angles[iOrient].pos[2] << " " << log(pProbAngle.forAngles) + pProbAngle.ConstAngle + 0.5 * log(M_PI) + (1 - param.param_device.Ntotpi * 0.5)*(log(2 * M_PI) + 1) + log(param.param_device.volu) << " " << log(param.param_device.volu) << "\n";
351 352 353
			}
		}
	}
354

355 356
	angProbfile.close();
	outputProbFile.close();
357

358
	return(0);
359 360
}

361
int bioem::compareRefMaps(int iOrient, int iConv, const myfloat_t* conv_map, mycomplex_t* localmultFFT, myfloat_t sumC, myfloat_t sumsquareC, const int startMap)
362
{
363
	if (FFTAlgo)
364
	{
365 366
		#pragma omp parallel for
		for (int iRefMap = startMap; iRefMap < RefMap.ntotRefMap; iRefMap ++)
367
		{
368
			const int num = omp_get_thread_num();
369
			calculateCCFFT(iRefMap, iOrient, iConv, sumC, sumsquareC, localmultFFT, localCCT[num], lCC[num]);
370 371 372
		}
	}
	else
373
	{
374
		#pragma omp parallel for
375
		for (int iRefMap = startMap; iRefMap < RefMap.ntotRefMap; iRefMap ++)
376
		{
377
			compareRefMapShifted < -1 > (iRefMap, iOrient, iConv, conv_map, pProb, param.param_device, RefMap);
378 379 380 381 382
		}
	}
	return(0);
}

383
inline void bioem::calculateCCFFT(int iRefMap, int iOrient, int iConv, myfloat_t sumC, myfloat_t sumsquareC, mycomplex_t* localConvFFT, mycomplex_t* localCCT, myfloat_t* lCC)
384
{
385
	const mycomplex_t* RefMapFFT = &RefMap.RefMapsFFT[iRefMap * param.FFTMapSize];
386
	for(int i = 0; i < param.param_device.NumberPixels * param.param_device.NumberFFTPixels1D; i++)
387
	{
388 389
		localCCT[i][0] = localConvFFT[i][0] * RefMapFFT[i][0] + localConvFFT[i][1] * RefMapFFT[i][1];
		localCCT[i][1] = localConvFFT[i][1] * RefMapFFT[i][0] - localConvFFT[i][0] * RefMapFFT[i][1];
390 391
	}

392
	myfftw_execute_dft_c2r(param.fft_plan_c2r_backward, localCCT, lCC);
393

394
	doRefMapFFT(iRefMap, iOrient, iConv, lCC, sumC, sumsquareC, pProb, param.param_device, RefMap);
395
}
396

397
int bioem::createProjection(int iMap, mycomplex_t* mapFFT)
398
{
David Rohr's avatar
David Rohr committed
399
	// **************************************************************************************
David Rohr's avatar
David Rohr committed
400 401
	// ****  BioEM Create Projection routine in Euler angle predefined grid******************
	// ********************* and turns projection into Fourier space ************************
David Rohr's avatar
David Rohr committed
402
	// **************************************************************************************
403 404 405

	myfloat3_t RotatedPointsModel[Model.nPointsModel];
	myfloat_t rotmat[3][3];
406
	myfloat_t alpha, gam, beta;
407
	myfloat_t* localproj;
408

409
	localproj = lCC[omp_get_thread_num()];
410
	memset(localproj, 0, param.param_device.NumberPixels * param.param_device.NumberPixels * sizeof(*localproj));
411

412 413 414
	alpha = param.angles[iMap].pos[0];
	beta = param.angles[iMap].pos[1];
	gam = param.angles[iMap].pos[2];
415

David Rohr's avatar
David Rohr committed
416
	// **** To see how things are going: cout << "Id " << omp_get_thread_num() <<  " Angs: " << alpha << " " << beta << " " << gam << "\n"; ***
417

David Rohr's avatar
David Rohr committed
418
	// ********** Creat Rotation with pre-defiend grid of orientations**********
419 420 421 422 423 424 425 426 427 428 429
	rotmat[0][0] = cos(gam) * cos(alpha) - cos(beta) * sin(alpha) * sin(gam);
	rotmat[0][1] = cos(gam) * sin(alpha) + cos(beta) * cos(alpha) * sin(gam);
	rotmat[0][2] = sin(gam) * sin(beta);
	rotmat[1][0] = -sin(gam) * cos(alpha) - cos(beta) * sin(alpha) * cos(gam);
	rotmat[1][1] = -sin(gam) * sin(alpha) + cos(beta) * cos(alpha) * cos(gam);
	rotmat[1][2] = cos(gam) * sin(beta);
	rotmat[2][0] = sin(beta) * sin(alpha);
	rotmat[2][1] = -sin(beta) * cos(alpha);
	rotmat[2][2] = cos(beta);

	for(int n = 0; n < Model.nPointsModel; n++)
430
	{
431 432 433
		RotatedPointsModel[n].pos[0] = 0.0;
		RotatedPointsModel[n].pos[1] = 0.0;
		RotatedPointsModel[n].pos[2] = 0.0;
434
	}
435
	for(int n = 0; n < Model.nPointsModel; n++)
436
	{
437
		for(int k = 0; k < 3; k++)
438
		{
439
			for(int j = 0; j < 3; j++)
440
			{
441
				RotatedPointsModel[n].pos[k] += rotmat[k][j] * Model.PointsModel[n].pos[j];
442 443 444 445 446 447
			}
		}
	}

	int i, j;

David Rohr's avatar
David Rohr committed
448
	// ************ Projection over the Z axis********************
449
	for(int n = 0; n < Model.nPointsModel; n++)
450 451
	{
		//Getting pixel that represents coordinates & shifting the start at to Numpix/2,Numpix/2 )
452 453
		i = floor(RotatedPointsModel[n].pos[0] / param.pixelSize + (myfloat_t) param.param_device.NumberPixels / 2.0f + 0.5f);
		j = floor(RotatedPointsModel[n].pos[1] / param.pixelSize + (myfloat_t) param.param_device.NumberPixels / 2.0f + 0.5f);
454

455
		localproj[i * param.param_device.NumberPixels + j] += Model.densityPointsModel[n] / Model.NormDen;
456 457
	}

David Rohr's avatar
David Rohr committed
458
	// **** Output Just to check****
459
	if(iMap == 10)
460 461 462 463 464 465
	{
		ofstream myexamplemap;
		ofstream myexampleRot;
		myexamplemap.open ("MAP_i10");
		myexampleRot.open ("Rot_i10");
		myexamplemap << "ANGLES " << alpha << " " << beta << " " << gam << "\n";
466
		for(int k = 0; k < param.param_device.NumberPixels; k++)
467
		{
468
			for(int j = 0; j < param.param_device.NumberPixels; j++) myexamplemap << "\nMAP " << k << " " << j << " " << localproj[k * param.param_device.NumberPixels + j];
469 470
		}
		myexamplemap << " \n";
471
		for(int n = 0; n < Model.nPointsModel; n++)myexampleRot << "\nCOOR " << RotatedPointsModel[n].pos[0] << " " << RotatedPointsModel[n].pos[1] << " " << RotatedPointsModel[n].pos[2];
472 473 474 475
		myexamplemap.close();
		myexampleRot.close();
	}

David Rohr's avatar
David Rohr committed
476 477
	// ***** Converting projection to Fourier Space for Convolution later with kernel****
	// ********** Omp Critical is necessary with FFTW*******
478
	myfftw_execute_dft_r2c(param.fft_plan_r2c_forward, localproj, mapFFT);
479 480 481 482

	return(0);
}

483
int bioem::createConvolutedProjectionMap(int iMap, int iConv, mycomplex_t* lproj, myfloat_t* Mapconv, mycomplex_t* localmultFFT, myfloat_t& sumC, myfloat_t& sumsquareC)
484
{
David Rohr's avatar
David Rohr committed
485 486
	// **************************************************************************************
	// ****  BioEM Create Convoluted Projection Map routine, multiplies in Fourier **********
David Rohr's avatar
David Rohr committed
487 488
	// **************** calculated Projection with convoluted precalculated Kernel***********
	// *************** and Backtransforming it to real Space ********************************
David Rohr's avatar
David Rohr committed
489
	// **************************************************************************************
490

491
	mycomplex_t* tmp = localCCT[omp_get_thread_num()];
492

David Rohr's avatar
David Rohr committed
493
	// **** Multiplying FFTmap with corresponding kernel ****
494
	const mycomplex_t* refCTF = &param.refCTF[iConv * param.FFTMapSize];
495
	for(int i = 0; i < param.param_device.NumberPixels * param.param_device.NumberFFTPixels1D; i++)
496
	{
497 498 499
		localmultFFT[i][0] = lproj[i][0] * refCTF[i][0] + lproj[i][1] * refCTF[i][1];
		localmultFFT[i][1] = lproj[i][1] * refCTF[i][0] - lproj[i][0] * refCTF[i][1];
		// cout << "GG " << i << " " << j << " " << refCTF[i][0] << " " << refCTF[i][1] <<" " <<lproj[i][0] <<" " <<lproj[i][1] << "\n";
500 501
	}

502 503 504
	//FFTW_C2R will destroy the input array, so we have to work on a copy here
	memcpy(tmp, localmultFFT, sizeof(mycomplex_t) * param.param_device.NumberPixels * param.param_device.NumberFFTPixels1D);

David Rohr's avatar
David Rohr committed
505
	// **** Bringing convoluted Map to real Space ****
David Rohr's avatar
David Rohr committed
506
	myfftw_execute_dft_c2r(param.fft_plan_c2r_backward, tmp, Mapconv);
507

David Rohr's avatar
David Rohr committed
508
	// *** Calculating Cross-correlations of cal-convoluted map with its self *****
509 510
	sumC = 0;
	sumsquareC = 0;
511
	for(int i = 0; i < param.param_device.NumberPixels * param.param_device.NumberPixels; i++)
512
	{
David Rohr's avatar
David Rohr committed
513 514
		sumC += Mapconv[i];
		sumsquareC += Mapconv[i] * Mapconv[i];
515
	}
David Rohr's avatar
David Rohr committed
516
	// *** The DTF gives an unnormalized value so have to divded by the total number of pixels in Fourier ***
517
	// Normalizing
518 519 520 521
	myfloat_t norm2 = (myfloat_t) (param.param_device.NumberPixels * param.param_device.NumberPixels);
	myfloat_t norm4 = norm2 * norm2;
	sumC = sumC / norm2;
	sumsquareC = sumsquareC / norm4;
522 523

	return(0);
524 525
}

526
int bioem::calcross_cor(myfloat_t* localmap, myfloat_t& sum, myfloat_t& sumsquare)
527
{
David Rohr's avatar
David Rohr committed
528
	// *********************** Routine to calculate Cross correlations***********************
529

530 531
	sum = 0.0;
	sumsquare = 0.0;
532 533 534 535 536
	for (int i = 0; i < param.param_device.NumberPixels; i++)
	{
		for (int j = 0; j < param.param_device.NumberPixels; j++)
		{
			// Calculate Sum of pixels
537
			sum += localmap[i * param.param_device.NumberPixels + j];
538
			// Calculate Sum of pixels squared
539
			sumsquare += localmap[i * param.param_device.NumberPixels + j] * localmap[i * param.param_device.NumberPixels + j];
540 541 542
		}
	}
	return(0);
543 544 545 546 547 548 549 550 551 552 553 554 555 556 557 558
}

int bioem::deviceInit()
{
	return(0);
}

int bioem::deviceStartRun()
{
	return(0);
}

int bioem::deviceFinishRun()
{
	return(0);
}
559 560 561 562 563 564 565 566 567 568

void* bioem::malloc_device_host(size_t size)
{
	return(mallocchk(size));
}

void bioem::free_device_host(void* ptr)
{
	free(ptr);
}