File: expn.c

package info (click to toggle)
libquantum 1.1.1-4
  • links: PTS, VCS
  • area: main
  • in suites:
  • size: 1,136 kB
  • ctags: 279
  • sloc: sh: 7,711; ansic: 3,849; makefile: 243
file content (51 lines) | stat: -rw-r--r-- 1,272 bytes parent folder | download | duplicates (5)
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
/* expn.c: x^a mod n

   Copyright 2003 Bjoern Butscher, Hendrik Weimer

   This file is part of libquantum

   libquantum is free software; you can redistribute it and/or modify
   it under the terms of the GNU General Public License as published
   by the Free Software Foundation; either version 3 of the License,
   or (at your option) any later version.

   libquantum is distributed in the hope that it will be useful, but
   WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
   General Public License for more details.

   You should have received a copy of the GNU General Public License
   along with libquantum; if not, write to the Free Software
   Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
   MA 02110-1301, USA

*/

#include <stdlib.h>
#include <stdio.h>
#include <math.h>

#include "defs.h"
#include "gates.h"
#include "omuln.h"
#include "qureg.h"

void 
quantum_exp_mod_n(int N, int x, int width_input, int width, quantum_reg *reg)
{
	
	int i, j, f;
	
	

	quantum_sigma_x(2*width+2, reg);
	for (i=1; i<=width_input;i++){
		f=x%N;			//compute
		for (j=1;j<i;j++)
		  { 
		    f*=f;	//x^2^(i-1)
		    f= f%N;
		  }
		mul_mod_n(N,f,3*width+1+i, width, reg);
		}
	}