Initial commit.

10 files changed, 0 insertions, 884 deletions

diff --git a/includes/comlock.hpp~ b/includes/comlock.hpp~
deleted file mode 100644
index e1014fa..0000000
--- a/includes/comlock.hpp~
+++ /dev/null
@@ -1,21 +0,0 @@
-//-*- mode: c++; indent-tabs-mode-nil; coding: utf-8; show-trailing-whitespace: t -*-
-
-// file comlock.hpp
-
-#ifndef _COMLOCK_HPP
-#define _COMLOCK_HPP
-
-#include <iostream>
-#include <iomanip>
-#include <cstddef>
-#include <vector>
-
-namespace comlock {
-
-  extern int pLocker[ 2 ];
-  
-}
-
-#endif // _COMLOCK_HPP
-
-// end of file comlock.hpp
diff --git a/includes/dekplt.hpp~ b/includes/dekplt.hpp~
deleted file mode 100644
index 7f7596a..0000000
--- a/includes/dekplt.hpp~
+++ /dev/null
@@ -1,381 +0,0 @@
-//-*- mode: c++; syntax: c++; indent-tabs-mode-nil; coding: utf-8; show-trailing-whitespace: t -*-
-
-// file dekplt.hpp
-
-#ifndef _DEKPLT_HPP
-#define _DEKPLT_HPP
-
-#include <iostream>
-
-namespace dekplt {
-
-  // Structures.
-  struct tagFVCom {
-    double m_nVMin;
-    double m_nVMax;
-    double m_nHMin;
-    double m_nHMax;
-    double m_nHA;
-    double m_nTAxisL;
-    double m_nTolrce;
-    double m_nHTax;
-    double m_nXTit;
-    double m_nYTit;
-    double m_nSizTit;
-    double m_nXSuper;
-    double m_nYSuper;
-    double m_nSizSup;
-    double m_nFLine;
-    double m_nSizID;
-    double m_nXID;
-    double m_nYID;
-    double m_nFact;
-    double m_nDXGrd1;
-    double m_nDYGrd1;
-    double m_nDXGrd2;
-    double m_nDYGrd2;
-    double m_nFill1;
-    double m_nFill2;
-    double m_nVS;
-    double m_nVL;
-    double m_nVH;
-    double m_nPapMax;
-    double m_nTimBeg;
-    double m_nTimEnd;
-    double m_nFHTax;
-    double m_nFXSup;
-    double m_nFYSup;
-    double m_nFXTit;
-    double m_nFYTit;
-    double m_nFXID;
-    double m_nFYID;
-    double m_nFTCarr;
-    double m_nVAxisL;
-    double m_nFXNumV;
-    double m_nFXNumH;
-    double m_FVXAxtt;
-    double m_FXVert;
-    double m_nFSymb;
-    double m_nPapLim;
-  };
-
-  typedef struct tagFVCom tFVCom;
-
-  struct tagIVCom {
-    int m_nKlevl;
-    int m_nKextr;
-    int m_nIHS;
-    int m_nLu7Plt;
-    int m_nIprsrt;
-    int m_nLimCol;
-    int m_nLinePR;
-    int m_nIBaud;
-    int m_nLTek;
-    int m_nNumTit;
-    int m_nMaxSym;
-    int m_nMTit;
-    int m_nMaxISX;
-    int m_nMaxISY;
-    int m_nGrid1;
-    int m_nGrid2;
-    int m_nMSuper;
-    int m_nMid;
-    int m_nMLine;
-    int m_nCut1;
-    int m_nCut2;
-    int m_nSmPlt;
-    int m_nLSymb;
-    int m_nXMax;
-    int m_nYMax;
-    int m_nLChId;
-    int m_nXInch;
-    int m_nYInch;
-    int m_nXOff;
-    int m_nYOff;
-    int m_nLook;
-    int m_nLChSup;
-    int m_nLChTit;
-    int m_nLChXax;
-    int m_nLCHYax;
-    int m_nITerm;
-    int m_nLTic;
-    int m_nIzTit;
-    int m_nIZGr1;
-    int m_nIZGr2;
-    int m_nLdShg1;
-    int m_nLdShg2;
-    int m_nIZXax;
-    int m_nIZYax;
-    int m_nXId6;
-    int m_nYId6;
-    int m_nXEnd;
-    int m_nYEnd;
-    int m_nIZId;
-    int m_nXVern;
-    int m_nIChRef;
-    int m_nIChEnd;
-    int m_nInchPx;
-    int m_nInchPy;
-    int m_nInWait;
-    int m_nNoLabl;
-    int m_nLChFil;
-    int m_nLChLim;
-    int m_nMu6Std;
-  };
-
-  typedef struct tagIVCom tIVCom;
-
-  struct tagANPLT {
-    char m_pChoice[ 8 ];
-    char m_pStop[ 8 ];
-    char m_pPurge[ 8 ];
-    char m_pOut[ 8 ];
-    char m_pHelp[ 8 ];
-    char m_pSmooth[ 8 ];
-    char m_pSize[ 8 ];
-    char m_pShow[ 8 ];
-    char m_pLineZZ[ 8 ];
-    char m_pPhoto[ 8 ];
-    char m_pRepeat[ 8 ];
-    char m_pFlush[ 8 ];
-    char m_pPlayBA[ 8 ];
-    char m_pPen[ 8 ];
-    char m_pMultiP[ 8 ];
-    char m_pOffset[ 8 ];
-    char m_pLimits[ 8 ];
-    char m_pDebug[ 8 ];
-    char m_pTEK[ 8 ];
-    char m_pStack[ 8 ];
-    char m_pPrintE[ 8 ];
-    char m_pMetric[ 8 ];
-    char m_pAllTim[ 8 ];
-    char m_pColumn[ 8 ];
-    char m_pSetCol[ 8 ];
-    char m_pLonger[ 8 ];
-    char m_pAverag[ 8 ];
-    char m_pInner[ 8 ];
-    char m_pRescal[ 8 ];
-    char m_pLastPL[ 8 ];
-    char m_pBatch[ 8 ];
-    char m_pPunch[ 8 ];
-    char m_pExtrem[ 8 ];
-    char m_pLevel[ 8 ];
-    char m_pNoPlot[ 8 ];
-    char m_pMessag[ 8 ];
-    char m_pEnd[ 8 ];
-    char m_pTimeSP[ 8 ];
-    char m_pLabel[ 8 ];
-    char m_pTimeUN[ 8 ];
-    char m_pCursor[ 8 ];
-    char m_pXYPlot[ 8 ];
-    char m_pSlope[ 8 ];
-    char m_pBack[ 8 ];
-    char m_pReFile[ 8 ];
-    char m_pTEXBlk[ 8 ];
-    char m_pSetDat[ 8 ];
-  };
-
-  typedef struct tagANPLT tANPLT;
-  
-  // Variables.
-  extern char pBBus[ 300 ];
-  extern char pBusLst[ 1000 ];
-  //
-  extern int nIBaud;
-  extern int nIBrnch;
-  extern int nIBsOut;
-  extern int nICHEnd;
-  extern int nICHRef;
-  extern int nICP;
-  extern int nICurse;
-  extern int nIHS;
-  extern int nInchPX;
-  extern int nInchPY;
-  extern int nInd1;
-  extern int nIndExp;
-  extern int nInWait;
-  extern int nIPrsrt;
-  extern int nITerm;
-  extern int nIZgr1;
-  extern int nIZgr2;
-  extern int nIZid;
-  extern int nZtit;
-  extern int nIzxax;
-  extern int nIzyax;
-  extern int nL4Plot;
-  extern int nLchfil;
-  extern int nLchid;
-  extern int nLchlim;
-  extern int nLchsup;
-  extern int nLchtit;
-  extern int nLchxax;
-  extern int nLchyax;
-  extern int nLdshg1;
-  extern int nLdshg2;
-  extern int nLimCol;
-  extern int nLimFix;
-  extern int nLook;
-  extern int nLSymb;
-  extern int nLTic;
-  extern int nLu7Plt;
-  extern int nLinePR;
-  extern int nLTek;
-  extern int nMaxEv;
-  extern int nMaxEw;
-  extern int nMaxIp;
-  extern int nMaxIsx;
-  extern int nMaxIsy;
-  extern int nMaxSym;
-  extern int nMFake;
-  extern int nMGrid1;
-  extern int nMGrid2;
-  extern int nMid;
-  extern int nMLine;
-  extern int nMSuper;
-  extern int nMTit;
-  extern int nMu6Sav;
-  extern int nMu6Std;
-  extern int nMxypl;
-  extern int nNamVar;
-  extern int nNc;
-  extern int nChSup;
-  extern int nChVer;
-  extern int nCut;
-  extern int nCut1;
-  extern int nCut2;
-  extern int nNewFil;
-  extern int nNoLabl;
-  extern int nSmplt;
-  extern int nNT2;
-  extern int nNumBrn;
-  extern int nNumFlt;
-  extern int nNumNVO;
-  extern int nNumOut;
-  extern int nNumRaw;
-  extern int nNumTek;
-  extern int nNumTit;
-  extern int nV;
-  extern int nXEnd;
-  extern int nXId6;
-  extern int nXInch;
-  extern int nXMax;
-  extern int nXOff;
-  extern int nXVern;
-  extern int nYEnd;
-  extern int nYId6;
-  extern int nYInch;
-  extern int nYMax;
-  extern int nYOff;
-  extern int pLabrtm[ 20 ];
-  extern int pMCurve[ 20 ];
-  extern int pMLevel[ 20 ];
-  extern int pMMM[ 20 ];
-  extern int nMPlot[ 20 ];
-  extern int pMStart[ 20 ];
-  extern int pMSymbT[ 20 ];
-  extern int pNumPts[ 20 ];
-  //
-  extern double nDX;
-  extern double nDXGrd1;
-  extern double nDXGrd2;
-  extern double nDY;
-  extern double nDYGrd1;
-  extern double nDYGrd2;
-  extern double nEvnByt;
-  extern double nFact;
-  extern double nFHTax;
-  extern double nFill;
-  extern double nFill1;
-  extern double nFill2;
-  extern double nFinFin;
-  extern double nFLine;
-  extern double nFSymb;
-  extern double nFTCarr;
-  extern double nFVAxtt;
-  extern double nFXId;
-  extern double nFXNumH;
-  extern double nFXNumV;
-  extern double nFXSup;
-  extern double nFXTit;
-  extern double nFXVert;
-  extern double nFYId;
-  extern double nFYSup;
-  extern double nFYTit;
-  extern double nGMax;
-  extern double nGMin;
-  extern double nHA;
-  extern double nHMax;
-  extern double nHMin;
-  extern double nHPI;
-  extern double nHTax;
-  extern double nPapLim;
-  extern double nPapMax;
-  extern double nSizID;
-  extern double nSizSup;
-  extern double nSizTit;
-  extern double nTAxisL;
-  extern double nTimeBeg;
-  extern double nTimeEnd;
-  extern double nTMult;
-  extern double nTolrce;
-  extern double nTStep;
-  extern double nVaxIsl;
-  extern double nVH;
-  extern double nVL;
-  extern double nVMax;
-  extern double nVMaxR;
-  extern double nVMin;
-  extern double nVMinR;
-  extern double nVS;
-  extern double nXId;
-  extern double nXSuper;
-  extern double nXTit;
-  extern double nYId;
-  extern double nYSuper;
-  extern double nYTit;
-  extern double pAAA[ 20 ];
-  extern double pBBB[ 20 ];
-  extern double pBX[ 150 ];
-  extern double pDatePL[ 2 ];
-  extern double pDYOld[ 20 ];
-  extern double pEV[ 15000 ];
-  extern double pEW[ 15000 ];
-  extern double pFVCom[ 50 ];
-  extern double pFXRef[ 25 ];
-  extern double pFYRef[ 25 ];
-  extern double pTClop[ 2 ];
-  extern double pTTLev[ 20 ];
-  extern double pTTMax[ 20 ];
-  extern double pTTMin[ 20 ];
-  extern double pYLevel[ 20 ];
-  extern double pYYMax[ 20 ];
-  extern double pYYMin[ 20 ];
-  //
-  extern std::string sFilNam;
-  extern std::string sAlpha;
-  extern std::string sBuffIn;
-  extern std::string sVertL;
-  extern std::string sHeadL;
-  extern std::string sXYTitl;
-  extern std::string sTextD1;
-  extern std::string sTextD2;
-  extern std::string sCurren;
-  extern std::string sVoltag;
-  extern std::string sBrClas;
-  extern std::string sDate;
-  extern std::string sTime;
-  extern std::string sANSI;
-  extern std::string sBuffIn;
-  extern std::string pSlot1[ 20 ];
-  extern std::string pSext[ 6 ];
-  extern std::string pHorzL[ 8 ];
-  extern std::string pIBuff[ 20 ];
-  extern std::string pABuff77[ 10 ];
-  extern std::string pAnPlt[];
-  //
-  extern tFVCom sFVCom;
-  extern tIVCom sIVCom;
-
-}
-
-#endif // _DEKPLT_HPP
diff --git a/includes/emtp.hpp~ b/includes/emtp.hpp~
deleted file mode 100644
index 5fb528f..0000000
--- a/includes/emtp.hpp~
+++ /dev/null
@@ -1,55 +0,0 @@
-//-*- mode: c++; indent-tabs-mode: t; coding: utf-8; show-trailing-whitespace: t -*-
-
-// file main00.hpp
-
-#ifndef _MAIN00_HPP
-#define _MAIN00_HPP
-
-// Local includes.
-
-#include "main.hpp"
-
-// Macros.
-
-#define CHARC "c"
-#define TEXT4 "9"
-#define CHTACS "tacs"
-#define TEXT5 "blank"
-
-namespace kwtcom {
-
-  extern int nKWTVAX;
-
-}
-
-namespace emtp {
-
-  // types.
-  
-  struct tagWords {
-    std::string sTextAY;
-    std::string sTextAX;
-    size_t mJptr;
-  };
-
-  typedef struct tagWords tWords;
-
-  // Global variables.
-  
-  extern const int nLL34;
-  extern tWords pWords[ 24 ];
-  
-  // Prototypes.
-  void erexit(void);
-  void stoptp(void);
-  void setmar(int *);
-  void chrsiz(int *);
-  void setplt(void);
-  void setstd(void);
-  void interp(void);
-
-}
-
-#endif // _MAIN00_HPP
-
-// end of file main00.hpp
diff --git a/includes/lab02.hpp~ b/includes/lab02.hpp~
deleted file mode 100644
index a1ec164..0000000
--- a/includes/lab02.hpp~
+++ /dev/null
@@ -1,22 +0,0 @@
-//-*- mode: c++; indent-tabs-mode: t; coding: utf-8; show-trailing-whitespace: t -*-
-
-// file labl02.hpp
-
-
-
-namespace com29 {
-#ifndef _LAB29_HPP
-#define _LAB29_HPP
-
-#include <iostream>
-#include <iomanip>
-#include <string>
-#include <fstream>
-#include <ostream>
-#include <sstream>
-#include <cstdlib>
-#include <cstdint>
-#include <cinttypes>
-#include <vector>
-
-namespace com29 {
diff --git a/includes/over1.hpp~ b/includes/over1.hpp~
deleted file mode 100644
index c37af28..0000000
--- a/includes/over1.hpp~
+++ /dev/null
@@ -1,70 +0,0 @@
-//-*- mode: c++; indent-tabs-mode: t; coding: utf-8; show-trailing-whitespace: t -*-
-
-// file over1.hpp
-
-#ifndef _OVER1_HPP
-#define _OVER1_HPP
-
-// System includes.
-
-#include <iostream>
-#include <cstdlib>
-#include <cstring>
-#include <thread>
-#include <chrono>
-#include <limits>
-#include <vector>
-
-// Local includes.
-
-#include "blkcom.hpp"
-#include "dekspy.hpp"
-#include "dekplt.hpp"
-#include "comlock.hpp"
-#include "labcom.hpp"
-#include "random.hpp"
-#include "main.hpp"
-#include "newmods.hpp"
-#include "utilities.hpp"
-#include "strcom.hpp"
-#include "location.hpp"
-#include "time.hpp"
-#include "umdeck.hpp"
-
-#define LL1 1
-#define LL6 6
-#define LL8 8
-#define LL11 11
-#define LL20 20
-#define LL24 24
-#define LL25 25
-#define LL30 30
-#define LL40 40
-#define LL60 60
-#define LL64 64
-#define LL80 80
-#define SPEEDL 2.997925e8
-
-// Prototypes.
-
-namespace over1 {
-
-  void over1(void);
-  void tacs1c(void);
-  void swmodf(void);
-  void reques(void);
-  void sysdep(void);
-  void midov1(void);
-  void nmincr(std::string &, int &);
-  void tacs1(void);
-  void tacs1a(void);
-  void tacs1b(void);
-  void expchk(int &, int &, int &);
-  void intchk(int &, int &, int &);
-  void pfatch(void);
-  
-}
-
-#endif // _OVER1_HPP
-
-// end of file over1.hpp
diff --git a/includes/over51.hpp~ b/includes/over51.hpp~
deleted file mode 100644
index 30de526..0000000
--- a/includes/over51.hpp~
+++ /dev/null
@@ -1,200 +0,0 @@
-//-*- mode: c++; indent-tabs-mode: nil; coding: utf-8; show-trailing-whitespace: t -*-
-
-// file over51.hpp
-
-#ifndef _OVER51_HPP
-#define _OVER51_HPP
-
-#include <iostream>
-#include <iomanip>
-#include <string>
-#include <sstream>
-#include <limits>
-#include <exception>
-#include <stdexcept>
-
-#include "blkcom.hpp"
-#include "time.hpp"
-#include "main00.hpp"
-
-namespace emtp {
-
-  // Classes.
-  class storage_exceeded_error : public std::runtime_error
-  {
-  public:
-    storage_exceeded_error () : std::runtime_error ("")
-    {
-    }
-
-  public:
-    const char *what (void) const noexcept
-    {
-      std::stringstream ss;
-      //
-      ss << std::string (5, ' ');
-      ss << "Storage exceeded for list number ";
-      ss << std::setw (2) << std::setfill ('0') << blkcom::sLStat[ 15 ];
-      ss << ".   See dimensioned limit in tabulation below.\n";
-      ss << std::string (5, '-');
-      ss << "The problem being inputted is simply too big for the program as currently dimensioned.   Since there usually are\n";
-      ss << std::string (5, ' ');
-      ss << "ways of circumventing this difficulty, it is suggested that the user consult his friendly neighborhood program\n";
-      ss << std::string (5, ' ');
-      ss << "maintenance man.\n";
-      return ss.str ().c_str ();
-    }
-  };
-
-  class time_error : public std::runtime_error
-  {
-  public:
-    time_error () : std::runtime_error ("")
-    {
-    }
-
-  public:
-    const char *what (void) const noexcept
-    {
-      std::stringstream ss;
-      //
-      if (blkcom::nT >= 0.0) {
-	ss << std::string (5, '-');
-	ss << "Time-step size 'deltat' as read from columns 1-8 of the first miscellaneous data card is not positive.   The\n";
-	ss << std::string (5, '-');
-	ss << "user punched a value of ";
-	ss << std::setw (14) << std::setprecision (4) << blkcom::pFLStat[ 15 ];
-	ss << ".   Unlike Jules Verne, you are not allowed to stop or decrease time during\n";
-	ss << std::string (5, '-');
-	ss << "a simulation, my friend.   Don't try riding out of an active volcano on a raft floating on molten lava, either,\n";
-	ss << std::string (5, '-');
-	ss << "although that's another story.\n";
-      } else {
-	ss << std::string (5, '-');
-	ss << "The starting time   't'   as read from the floating-point miscellaneous data card is negative, which is\n";
-	ss << std::string (5, '-');
-	ss << "illegal.   A value of";
-	ss << std::setw (15) << std::setprecision (5) << blkcom::nT;
-	ss << "   was read from the data field of columns 49-56.\n";
-      }
-      return ss.str ().c_str ();
-    }
-  };
-
-  class branch_card_illegal_type_code_error : public std::runtime_error
-  {
-  public:
-    branch_card_illegal_type_code_error () : std::runtime_error ("")
-    {
-    }
-
-  public:
-    const char *what (void) const noexcept
-    {
-      std::stringstream ss;
-      //
-      ss << std::string (5, '-');
-      ss << "Illegal type code read from columns 1-2 of last branch card.   The user punched a value of ";
-      ss << std::setw (2) << blkcom::sLStat[ 15 ];
-      ss << ".   Either\n";
-      ss << std::string (5, '-');
-      ss << "the punched number itself is patently illegal (always an error, under any circumstances), or the card in question\n";
-      ss << std::string (5, '-');
-      ss << "his out of sequence in relation to the preceding data card which was inputted.   As an example of the latter\n";
-      ss << std::string (5, '-');
-      ss << "case, consider a '-3' punch, with the preceeding card not bearing a '-2' punch.   In any case, open up the user's\n";
-      ss << std::string (5, ' ');
-      ss << "manual, and reread the rules for the data type that you have been trying to input, my friend.\n";
-      ss << std::string (5, ' ');
-      ss << "Yet, in case this general advice does not seem to apply, consider the possible trouble which can arise from a\n";
-      ss << std::string (5, ' ');
-      ss << "preceding faulty use of the reference-branch capability. This feature has the EMTP looking for a certain number\n";
-      ss << std::string (5, ' ');
-      ss << "and type of branch cards, based on properties of the component to which reference has been made.   If the user's\n";
-      ss << std::string (5, ' ');
-      ss << "data cards do not in structure match those of the reference component, an error stop of the present type may very";
-      ss << std::string (5, ' ');
-      ss << "be expected.   Remember that in cases where two or more branches from reference bus  'bus3'  to reference bus\n";
-      ss << std::string (5, ' ');
-      ss << "'bus4'  (ordered pair of names, read from columns 15-24 as  2a6  information) exist, the EMTP will always pick\n";
-      ss << std::string (5, ' ');
-      ss << "the first one that it finds (in order of branch input) for reference purposes.\n";
-      return ss.str ().c_str ();
-    }
-  };
-
-  class last_branch_zero_impedance_error : public std::runtime_error
-  {
-  public:
-    last_branch_zero_impedance_error () :std::runtime_error ("")
-    {
-    }
-
-  public:
-    const char *what (void) const noexcept
-    {
-      std::stringstream ss;
-      //
-      ss << std::string (5, ' ');
-      ss << "Last branch was zero impedance (R, L, C fields of columns 27-44 were all zero).   If you really want a short\n";
-      ss << std::string (5, ' ');
-      ss << "circuit, you must punch a very small value for  R  or L.   Or better yet, why not do away with one of the node\n";
-      ss << std::string (5, ' ');
-      ss << "names of this branch, treating both ends as the same bus (a perfect short circuit).\n";
-      return ss.str ().c_str ();
-    }
-  };
-
-  class non_monotone_increasing_characteristic_error : public std::runtime_error
-  {
-  public:
-    non_monotone_increasing_characteristic_error () : std::runtime_error ("")
-    {
-    }
-
-  public:
-    const char *what (void) const noexcept
-    {
-      std::stringstream ss;
-      //
-      ss << std::string (5, ' ');
-      ss << "The user has been inputting pairs of points which define a nonlinear (or pseudo-nonlinear) element characteristic.\n";
-      ss << std::string (5, ' ');
-      ss << "These must be in order, moving ever to the right and upward in the x-y plane.   But the user's just-inputted\n";
-      ss << std::string (5, ' ');
-      ss << "characteristic is not monotone increasing as it should be.   A decrease in one of the two coordinate points\n";
-      ss << std::string (5, ' ');
-      ss << "has been detected on the last data card which was read.   Shape up or ship out, Jack.\n";
-      return ss.str ().c_str ();
-    }
-  };
-
-  class dummy_function_called_error : public std::runtime_error
-  {
-  public:
-    dummy_function_called_error () : std::runtime_error ("")
-    {
-    }
-
-  public:
-    const char *what (void) const noexcept
-    {
-      std::stringstream ss;
-      //
-      ss << std::string (5, ' ');
-      ss << "Dummy function is called, something wrong with this version of EMTP++.\n";
-      return ss.str ().c_str ();
-    }
-  };
-
-}
-
-namespace over51 {
-
-  // Prototypes.
-  void subr51(void);
-  void over51(void);
-
-}
-
-#endif // _OVER51_HPP
diff --git a/includes/plot.hpp~ b/includes/plot.hpp~
deleted file mode 100644
index 727998c..0000000
--- a/includes/plot.hpp~
+++ /dev/null
@@ -1,17 +0,0 @@
-//-*- mode: c++; indent-tabs-mode: t; coding: utf-8; show-trailing-whitespace: t -*-
-
-// file plot.hpp
-
-#ifndef _PLOT_HPP
-#define _PLOT_HPP
-
-namespace plot
-{
-
-  
-  
-}
-
-#endif // _PLOT_HPP
-
-// end of file plot.hpp
diff --git a/includes/tacsar.hpp~ b/includes/tacsar.hpp~
deleted file mode 100644
index fc17cf8..0000000
--- a/includes/tacsar.hpp~
+++ /dev/null
@@ -1,60 +0,0 @@
-//-*- mode: c++; indent-tabs-mode-nil; coding: utf-8; show-trailing-whitespace: t -*-
-
-// file tacsar.hpp
-
-#ifndef _TACSAR_HPP
-#define _TACSAR_HPP
-
-#include <iostream>
-#include <iomanip>
-#include <cstddef>
-#include <vector>
-
-namespace tacsar {
-
-  extern int nIColCS;
-  extern int nIlnTab;
-  extern int nInSup;
-  extern int nIsBlk;
-  extern int nIuty;
-  extern int nIVarB;
-  extern int nJOut;
-  extern int nKaliu;
-  extern int nKalksu;
-  extern int nKatcs;
-  extern int nkawkcs;
-  extern int nKColCS;
-  extern int nKInSup;
-  extern int nKIsBlk;
-  extern int nKiuty;
-  extern int nKIVarB;
-  extern int nKJOut;
-  extern int nKksus;
-  extern int nKlnTab;
-  extern int nKofsce;
-  extern int nKoncur;
-  extern int nKonsce;
-  extern int nKOnSup;
-  extern int nKOnTot;
-  extern int nKPRSup;
-  extern int nKRSBlk;
-  extern int nKSPVar;
-  extern int nKsus;
-  extern int nKud1;
-  extern int nKxar;
-  extern int nKxtcs;
-  //
-  extern double nAtcs;
-  extern double nAwks;
-  extern double nParsup;
-  extern double nRsblk;
-  extern double nSptacs;
-  extern double nUd1;
-  extern double nXar;
-  extern double nXtcs;
-  
-}
-
-#endif // _TACSAR_HPP
-
-// end of file tacsar.hpp
diff --git a/includes/umdeck.hpp~ b/includes/umdeck.hpp~
deleted file mode 100644
index 42e9b68..0000000
--- a/includes/umdeck.hpp~
+++ /dev/null
@@ -1,17 +0,0 @@
-//-*- mode: c++; indent-tabs-mode: t; coding: utf-8; show-trailing-whitespace: t -*-
-
-// file umdeck.hpp
-
-#ifndef _UMDECK_HPP
-#define _UMDECK_HPP
-
-#include <iostream>
-#include <string>
-#include <fstream>
-#include <ostream>
-#include <sstream>
-#include <cstdlib>
-
-#endif // __UMDECK_HPP
-
-// end of file umdeck.hpp
diff --git a/includes/vardim.hpp~ b/includes/vardim.hpp~
deleted file mode 100644
index c97f11b..0000000
--- a/includes/vardim.hpp~
+++ /dev/null
@@ -1,41 +0,0 @@
-//-*- mode: c++; indent-tabs-mode: t; coding: utf-8; show-trailing-whitespace: t -*-
-
-// file vardim.hpp
-
-#ifndef _VARDIM_HPP
-#define _VARDIM_HPP
-
-#include <iostream>
-#include <fstream>
-#include <ostream>
-#include <sstream>
-#include <cstdlib>
-#include <exception>
-#include <stdexcept>
-#include <string>
-
-#include "blkcom.hpp"
-
-namespace vardim {
-
-  struct tagVariables {
-    std::string m_sCBlock;
-    int m_nCB;
-    std::string m_sCBLSer;
-    int m_nJBLType;
-  };
-
-  typedef struct tagVariables tVariables;
-  
-  // Default dimensions.
-  extern int pLstDef[ 28 ];
-  extern tVariables pVariables[];
-
-  // Functions.
-  bool vardim(void);
-
-}
-
-#endif // _VARDIM_HPP
-
-// end of file vardim.hpp