RbControl/probeLaserControl.c at main · ahrendsen/RbControl · GitHub

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
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <math.h>
#include "probeLaserControl.h"
#include "interfacing/kenBoard.h"
#include "interfacing/USB1208.h"
//#include "interfacing/vortexLaser.h" // 2019-07-11 Moved to sacher as probe.
#include "interfacing/sacherLaser.h" // 2019-07-11 Moved to sacher as probe.
#include "interfacing/waveMeter.h"

int setProbeDetuning(float desiredDetuning){
	float wavemeterReturn;
	float speedOfLight=299792458; //meters/sec
	float lineCenter=377107.463; //GHz
	float minAdjust=27; // Whatever parameter adjusts the laser frequency, indicate what the bounds on this
						// parameter are.
	float maxAdjust=36;
	float tolerance;
	float deltaDetuning,detuningChangeRequired,returnedDetuning,adjustSetting;
	int correctlyDetuned=1;
	int maxAttempts=32;
	int attempts;


	initializeSacher();
	adjustSetting=getSacherTemperature();

	getProbeFrequency(&wavemeterReturn);
	returnedDetuning=wavemeterReturn-LINECENTER;

	printf("PrL @ d=%+2.1f GHz",wavemeterReturn-LINECENTER);
	printf(" -> d=%+2.1f GHz",desiredDetuning);
	attempts=0;
	while(correctlyDetuned==1 && attempts<maxAttempts ){
		attempts++;
		getProbeFrequency(&wavemeterReturn);
		returnedDetuning=wavemeterReturn-LINECENTER;
		detuningChangeRequired=fabs(returnedDetuning-desiredDetuning);

		if(detuningChangeRequired>12){
			deltaDetuning=.7;
		}else if(detuningChangeRequired>1.2){
			deltaDetuning=.07;
		}else if(detuningChangeRequired>.12){
			deltaDetuning=.007;
		}else{
			deltaDetuning=.001;
		}

		adjustSetting=getSacherTemperature();

		tolerance=.1;
		if(desiredDetuning < returnedDetuning + tolerance && desiredDetuning > returnedDetuning - tolerance){//STOP
			//printf("The piezo is correctly tuned at %f3.1V\n",adjustSetting);
			correctlyDetuned=0;
		}else if(desiredDetuning<returnedDetuning){//Increase the detuning.
			//printf("Returned Detuning: %2.1f GHz\n",returnedDetuning);
			//printf("Adjusting Temperature: %2.3f -> %2.3f\n\n",adjustSetting,adjustSetting+deltaDetuning);
			setSacherTemperature( (adjustSetting + deltaDetuning) > maxAdjust ? maxAdjust : (adjustSetting + deltaDetuning));
			printf(".");
		}
		else{//Decrease the detuning
			//printf("Returned Detuning: %2.1f GHz\n",returnedDetuning);
			//printf("Adjusting Temperature: %2.3f -> %2.3f\n",adjustSetting,adjustSetting-deltaDetuning);
			setSacherTemperature( (adjustSetting - deltaDetuning) < minAdjust ? minAdjust : (adjustSetting - deltaDetuning));
			printf(".");
		}
		fflush(stdout);
	}

	printf("\n");
	return 0;
}