#  Maple Procedures for Analysis of a 3 Phase Thyristor Bridge.
#  The code is described in the Maple Technical Newsletter Issue 9.
#
# ===========================================================================
# Title of article: Harmonic Analysis of Phase Controlled Waveforms
# -----
# Authors: A. D. Rough and J. Richardson
# -------

# A.D. Rough is at the Department of Computing and Mathematics, Royal Naval
# Engineering College, Manadon, Plymouth PL5 3AQ, England.
# email: rough@manadon.ac.uk

# J. Richardson is at the Department of Electrical and Electronic Engineering,
# Royal Naval Engineering College, Manadon, Plymouth PL53AQ, England.


#  Maple Procedures for Analysis of 3 Phase Thyristor Bridge.
#  This file calls the procedures in harmonal to calculate 
#  the harmonic content of a 3 phase bridge rectifier.
#  To perform the procedures place the files Anal3PTB.in and harmonal
#  in the working directory and read this file.
#  If you wish to use the procedure surfdata from the MapleV share library 
#  then also first load the surfdata routine.
#  In Maple V Release 2, it is with(plots,surfdata);
#  In Maple V Release 1, you need to load it from the share library


#  Calling procedures.
read `harmonal`:


#  Make the array of harmonic magnitudes.
makearray();


#  Plot the magnitude of the harmonics against harmonic number (column)
#  and firing angle (row) using matrixplot.
with(plots,matrixplot):
matrixplot(Darray);


#  Plot the magnitude of the harmonics against harmonic number
#  and firing angle using surfdata.
makelist():
with(plots,surfdata);
surfdata(Clistlist);


#  Check the reconstructed signal against the original for
#  firing angle 70 degrees using 24 harmonics and plot the comparison.
drawit(24,70);


