src/qcphase.cpp

/***************************************************************************
 *   Quantum Construct (qC++)                                                                  *
 *   The Quantum Physics Computational Library                                         *
 *   Copyright (C) 2005 by Shekhar S. Chandra                                      *
 *   Shekhar.Chandra@sci.monash,edu.au                                     *
 *                                                                         *
 *   This program 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 2 of the License, or     *
 *   (at your option) any later version.                                   *
 *                                                                         *
 *   This program 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 this program; if not, write to the                         *
 *   Free Software Foundation, Inc.,                                       *
 *   59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.             *
 ***************************************************************************/
/*
        Ver Info - QCPhase.cpp
        1.0.0 - Original Implementation
*/

#include "qcphase.h"

QCPhase::QCPhase(void)
{
        disturbPosition = 0;
        disturbWidth = 0;
        disturbHeight = 0.0;
}

QCPhase::~QCPhase(void)
{}

parameterType QCPhase::constantFunction()
{
        parameterType phase = 1.5;

        return phase;
}

parameterType QCPhase::spiralFunction(parameterType  x, parameterType y)
{
        parameterType phase = 0.0;

        phase = atan2(y,x);

        return phase;
}

void QCPhase::applyUniform(QCComplexField<2> &field, parameterType  deltaX, parameterType deltaY, int x0, int y0)
{
        parameterType x, y;

        for(int k = 0; k < field.noOfColumns(); k++)
        {
                y = k*deltaY - y0;
                for(int j = 0; j < field.noOfRows(); j++)
                {
                        x = j*deltaX - x0;
                        field.assignElement(j,k,sqrt(norm(field.retrieveElement(j,k)))*exp(i*constantFunction()));
                }
        }
}

void QCPhase::applyUniform(QCComplexField<3> &field, parameterType  deltaX, parameterType deltaY, parameterType deltaZ, int x0, int y0, int z0)
{
        parameterType x, y, z;

        for(int l = 0; l < field.height(); l ++)
        {
                z = l*deltaZ - z0;
                for(int k = 0; k < field.noOfColumns(); k++)
                {
                        y = k*deltaY - y0;
                        for(int j = 0; j < field.noOfRows(); j++)
                        {
                                x = j*deltaX - x0;
                                field.assignElement(j,k,l,sqrt(norm(field.retrieveElement(j,k,l)))*exp(i*constantFunction()));
                        }
                }
        }
}

void QCPhase::applyRandom(QCComplexField<2> &field, parameterType  deltaX, parameterType deltaY, int x0, int y0)
{
        parameterType randNo;
        srand(112);

        for(int k = 0; k < field.noOfColumns(); k++)
                for(int j = 0; j < field.noOfRows(); j++)
                {
                        randNo = (double)(rand() % 7);
                        field.assignElement(j,k,sqrt(norm(field.retrieveElement(j,k)))*exp(i*randNo));
                }
}

void QCPhase::applyRandomQuadrant(QCComplexField<2> &field, parameterType deltaX, parameterType deltaY, int x0, int y0)
{
        parameterType randNo1, randNo2, randNo;
        int maxRandNo = 4;
        srand(112);

        randNo1 = (double)(rand() % maxRandNo);
        randNo2 = (double)(rand() % maxRandNo);
        for(int k = 0; k < field.noOfColumns(); k++)
                for(int j = 0; j < field.noOfRows(); j++)
                {
                        if(j > field.noOfRows()/2 && k <= field.noOfColumns()/2)
                                randNo = randNo1 + randNo2;
                        if(j > field.noOfRows()/2 && k > field.noOfColumns()/2)
                                randNo = randNo1 - randNo2;
                        if(j < field.noOfRows()/2 && k <= field.noOfColumns()/2)
                                randNo = randNo1;
                        if(j < field.noOfRows()/2 && k > field.noOfColumns()/2)
                                randNo = randNo2;
                        field.assignElement(j,k,sqrt(norm(field.retrieveElement(j,k)))*exp(i*randNo));
                }
}

void QCPhase::applyVortex(QCComplexField<2> &field, parameterType deltaX, parameterType deltaY, int x0, int y0)
{
        parameterType x, y;

        for(int k = 0; k < field.noOfColumns(); k++)
        {
                y = (k)*deltaY - y0;
                for(int j = 0; j < field.noOfRows(); j++)
                {
                        x = (j)*deltaX - x0;
                        field.assignElement(j,k,sqrt(norm(field.retrieveElement(j,k)))*exp(i*spiralFunction(x,y)));
                }
        }
}

void QCPhase::applyVortex(QCComplexField<3> &field, parameterType  deltaX, parameterType deltaY, parameterType deltaZ, int x0, int y0, int z0)
{
        parameterType x, y, z;

        for(int l = 0; l < field.height(); l ++)
        {
                z = l*deltaZ - z0;
                for(int k = 0; k < field.noOfColumns(); k++)
                {
                        y = k*deltaY - y0;
                        for(int j = 0; j < field.noOfRows(); j++)
                        {
                                x = j*deltaX - x0;
                                field.assignElement(j,k,l,sqrt(norm(field.retrieveElement(j,k,l)))*exp(i*spiralFunction(x,y)));
                        }
                }
        }
}

void QCPhase::applyVortexReverse(QCComplexField<2> &field, parameterType deltaX, parameterType deltaY, int x0, int y0)
{
        parameterType x, y;

        for(int k = 0; k < field.noOfColumns(); k++)
        {
                y = (k)*deltaY - y0;
                for(int j = 0; j < field.noOfRows(); j++)
                {
                        x = (j)*deltaX - x0;
                        field.assignElement(j,k,sqrt(norm(field.retrieveElement(j,k)))*exp(i*spiralFunction(x,-y)));
                }
        }
}

void QCPhase::applyDisturbanceTypeI(QCComplexField<2> &field, parameterType deltaX, parameterType deltaY, int x0, int y0)
{
        complexType height(0.1,M_PI_2/4.0);

        for(int k = 20; k < 45; k ++)
                for(int j = 1; j < field.noOfRows()-1; j ++)
                        field.assignElement(j,k,sqrt(norm(field.retrieveElement(j,k)))*height);
}

void QCPhase::applyDisturbanceTypeII(QCComplexField<2> &field, parameterType deltaX, parameterType deltaY, int x0, int y0)
{
        complexType height(0.0,disturbHeight);
        parameterType endCounter = double(disturbWidth), counter = 1.0, gradientFactor = 0.0;

        for(int k = disturbPosition; k < field.noOfColumns(); k ++)
        {
                for(int j = 0; j < field.noOfRows(); j ++)
                {
                        gradientFactor = counter/endCounter;
                        field.assignElement(j,k,field.retrieveElement(j,k)*exp(gradientFactor*height));
                }
                if(counter < endCounter)
                        counter ++;
        }
}

void QCPhase::applyDisturbanceTypeII(QCComplexField<3> &field, parameterType deltaX, parameterType deltaY, int x0, int y0)
{
        complexType height(0.0,disturbHeight);
        parameterType endCounter = double(disturbWidth), counter = 1.0, gradientFactor = 0.0;

        for(int l = 0; l < field.height(); l ++)
                for(int k = disturbPosition; k < field.noOfColumns(); k ++)
                {
                        for(int j = 0; j < field.noOfRows(); j ++)
                        {
                                gradientFactor = counter/endCounter;
                                field.assignElement(j,k,l,sqrt(norm(field.retrieveElement(j,k,l)))*exp(gradientFactor*height));
                        }
                        if(counter < endCounter)
                                counter ++;
                }
}

bool QCPhase::outputPhaseFunction(QCComplexField<2> &field, const char* filename)
{
        ofstream outFile(filename,ios::out);
        outFile.precision(filePrecision);

        if(outFile.fail())
        {
                cerr << "File Error: " << filename << endl;
                return false;
        }
        else
        {
                for(int k = 0; k < field.noOfColumns(); k++)
                {
                        for(int j = 0; j < field.noOfRows(); j++)
                                outFile << spiralFunction(field.realPart()(j,k),field.imaginaryPart()(j,k)) << " , ";
                        outFile << endl;
                }
                return true;
        }
}

bool QCPhase::outputPhaseFunction(QCComplexField<3> &field, const char* filename)
{
        ofstream outFile(filename,ios::out);
        outFile.precision(filePrecision);

        if(outFile.fail())
        {
                cerr << "File Error: " << filename << endl;
                return false;
        }
        else
        {
                int l = field.height()/2;
                for(int k = 0; k < field.noOfColumns(); k++)
                {
                        for(int j = 0; j < field.noOfRows(); j++)
                                outFile << spiralFunction(field.realPart()(j,k,l),field.imaginaryPart()(j,k,l)) << " , ";
                        outFile << endl;
                }
                return true;
        }
}

---