External/libquantum
1
0
Fork 0
mirror of https://github.com/libquantum/libquantum.git synced 2025-10-03 08:42:01 +00:00
Code Issues Packages Projects Releases Wiki Activity

updated libquantum 0.1.0 source files

Browse Source
This commit is contained in:
libquantum
2016-10-27 04:09:05 +09:00
parent 617e4b91f3
commit fb55e54b6e
34 changed files with 20389 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

60
omuln.c Normal file
View File

@@ -0,0 +1,60 @@
#include "defs.h"
#include "matrix.h"
#include "gates.h"
#include "oaddn.h"
#include "classic.h"
void emul(int a, int L, int width, quantum_reg *reg){
int i;
for(i=width-1;i>=0;i--) if ((a>>i) & 1) {
quantum_toffoli(2*width+2,L,width+i,reg);
}
}
void muln(int N, int a, int ctl, int width, quantum_reg *reg){//ctl tells, which bit is the external enable bit
int i;
int L = 2*width+1;
quantum_toffoli(ctl,2*width+2,L,reg);
emul(a%N, L, width, reg);
quantum_toffoli(ctl,2*width+2,L,reg);
for(i=1;i<width;i++){
quantum_toffoli(ctl,2*width+2+i,L,reg);
add_mod_n(N,((1<<i)*a)%N,width,reg);
quantum_toffoli(ctl,2*width+2+i,L,reg);
}
}
void muln_inv(int N, int a, int ctl, int width, quantum_reg *reg){//ctl tells, which bit is the external enable bit
int i;
int L = 2*width+1;
a=quantum_inverse_mod(N,a);
for(i=width-1;i>0;i--){
quantum_toffoli(ctl,2*width+2+i,L,reg);
add_mod_n(N,N-((1<<i)*a)%N,width,reg);
quantum_toffoli(ctl,2*width+2+i,L,reg);
}
quantum_toffoli(ctl,2*width+2,L,reg);
emul(a%N, L, width, reg);
quantum_toffoli(ctl,2*width+2,L,reg);
}
void mul_mod_n(int N, int a, int ctl, int width, quantum_reg *reg)
{
muln(N,a,ctl,width,reg);
quantum_swaptheleads_omuln_controlled(ctl, width, reg);
muln_inv(N,a,ctl,width,reg);
}