Skip to content
Open
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
2 changes: 1 addition & 1 deletion LICENSE
Original file line number Diff line number Diff line change
@@ -1,6 +1,6 @@
MIT License

Copyright (c) 2020 EWT Project
Copyright (c) 1998-2020 Declan Traill

Permission is hereby granted, free of charge, to any person obtaining a copy
of this software and associated documentation files (the "Software"), to deal
Expand Down
8 changes: 8 additions & 0 deletions ReadMe.txt
Original file line number Diff line number Diff line change
@@ -0,0 +1,8 @@

This Project was developed in the Delphi RAD Studio:
Delphi 10.3 Community Edition Version 26.0.36039.7899

It is a non-commercial project written to model Quantum particles: electrons and positrons.

The code is Copyright 1998-2020 by Declan Traill, but may be used by others (and modified
by them to suit their own needs) so long as the copyright notice and attribution of the code is not removed.
37 changes: 37 additions & 0 deletions VectPotential.cfg
Original file line number Diff line number Diff line change
@@ -0,0 +1,37 @@
-$A8
-$B-
-$C+
-$D+
-$E-
-$F-
-$G+
-$H+
-$I+
-$J+
-$K-
-$L+
-$M-
-$N+
-$O+
-$P+
-$Q+
-$R+
-$S-
-$T-
-$U-
-$V+
-$W-
-$X+
-$YD
-$Z1
-cg
-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
-H+
-W+
-M
-$M16384,16777216
-K$00400000
-E"C:\Users\TOSHIBA\Documents\Physics\Projects\VectPotential"
-N"C:\Users\TOSHIBA\Documents\Physics\Projects\VectPotential"
-LE"C:\Users\TOSHIBA\Documents\Physics\Projects\VectPotential"
-LN"C:\Users\TOSHIBA\Documents\Physics\Projects\VectPotential"
136 changes: 136 additions & 0 deletions VectPotential.dof
Original file line number Diff line number Diff line change
@@ -0,0 +1,136 @@
[FileVersion]
Version=7.0
[Compiler]
A=8
B=0
C=1
D=1
E=0
F=0
G=1
H=1
I=1
J=1
K=0
L=1
M=0
N=1
O=1
P=1
Q=1
R=1
S=0
T=0
U=0
V=1
W=0
X=1
Y=1
Z=1
ShowHints=1
ShowWarnings=1
UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
NamespacePrefix=
SymbolDeprecated=1
SymbolLibrary=1
SymbolPlatform=1
UnitLibrary=1
UnitPlatform=1
UnitDeprecated=1
HResultCompat=1
HidingMember=1
HiddenVirtual=1
Garbage=1
BoundsError=1
ZeroNilCompat=1
StringConstTruncated=1
ForLoopVarVarPar=1
TypedConstVarPar=1
AsgToTypedConst=1
CaseLabelRange=1
ForVariable=1
ConstructingAbstract=1
ComparisonFalse=1
ComparisonTrue=1
ComparingSignedUnsigned=1
CombiningSignedUnsigned=1
UnsupportedConstruct=1
FileOpen=1
FileOpenUnitSrc=1
BadGlobalSymbol=1
DuplicateConstructorDestructor=1
InvalidDirective=1
PackageNoLink=1
PackageThreadVar=1
ImplicitImport=1
HPPEMITIgnored=1
NoRetVal=1
UseBeforeDef=1
ForLoopVarUndef=1
UnitNameMismatch=1
NoCFGFileFound=1
MessageDirective=1
ImplicitVariants=1
UnicodeToLocale=1
LocaleToUnicode=1
ImagebaseMultiple=1
SuspiciousTypecast=1
PrivatePropAccessor=1
UnsafeType=1
UnsafeCode=1
UnsafeCast=1
[Linker]
MapFile=0
OutputObjs=0
ConsoleApp=1
DebugInfo=0
RemoteSymbols=0
MinStackSize=16384
MaxStackSize=16777216
ImageBase=4194304
ExeDescription=VectPotential.exe
[Directories]
OutputDir=C:\Users\TOSHIBA\Documents\Physics\Projects\VectPotential
UnitOutputDir=C:\Users\TOSHIBA\Documents\Physics\Projects\VectPotential
PackageDLLOutputDir=C:\Users\TOSHIBA\Documents\Physics\Projects\VectPotential
PackageDCPOutputDir=C:\Users\TOSHIBA\Documents\Physics\Projects\VectPotential
SearchPath=
Packages=VCL40;VCLX40;VCLDB40;VCLDBX40;VCLSMP40;QRPT40;TEEUI40;TEEDB40;TEE40;ibevnt40;nmfast40;MS_Direct_Anim
Conditionals=
DebugSourceDirs=
UsePackages=0
[Parameters]
RunParams=
HostApplication=
Launcher=
UseLauncher=0
DebugCWD=
[Language]
ActiveLang=
ProjectLang=
RootDir=
[Version Info]
IncludeVerInfo=0
AutoIncBuild=0
MajorVer=1
MinorVer=0
Release=0
Build=0
Debug=0
PreRelease=0
Special=0
Private=0
DLL=0
Locale=3081
CodePage=1252
[Version Info Keys]
CompanyName=
FileDescription=
FileVersion=1.0.0.0
InternalName=
LegalCopyright=
LegalTrademarks=
OriginalFilename=
ProductName=
ProductVersion=1.0.0.0
Comments=
23 changes: 23 additions & 0 deletions VectPotential.dpr
Original file line number Diff line number Diff line change
@@ -0,0 +1,23 @@
program VectPotential;

uses
Forms,
VectorPotential in 'VectorPotential.pas' {Form1};

// Set IMAGE_FILE_LARGE_ADDRESS_AWARE $0020 (up to 4Gb, rather than 2Gb, on a 64 bit PC)
// And IMAGE_FILE_NET_RUN_FROM_SWAP $0800
// And IMAGE_FILE_REMOVABLE_RUN_FROM_SWAP $0400
// And IMAGE_FILE_RELOCS_STRIPPED $0001
{$SetPEFlags $0C21}

{$E .exe}

{$R *.RES}

begin
Application.Initialize;
Application.MainFormOnTaskbar := True;
Application.Title := 'VectorPotential';
Application.CreateForm(TForm1, Form1);
Application.Run;
end.
139 changes: 139 additions & 0 deletions VectPotential.dproj
Original file line number Diff line number Diff line change
@@ -0,0 +1,139 @@
 <Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
<PropertyGroup>
<ProjectGuid>{E18C5945-35AB-4027-A61C-B88AB7BCE161}</ProjectGuid>
<MainSource>VectPotential.dpr</MainSource>
<Config Condition="'$(Config)'==''">Debug</Config>
<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
<ProjectVersion>18.8</ProjectVersion>
<FrameworkType>VCL</FrameworkType>
<Base>True</Base>
<Platform Condition="'$(Platform)'==''">Win32</Platform>
<TargetedPlatforms>1</TargetedPlatforms>
<AppType>Application</AppType>
</PropertyGroup>
<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
<Base>true</Base>
</PropertyGroup>
<PropertyGroup Condition="'$(Config)'=='Release' or '$(Cfg_1)'!=''">
<Cfg_1>true</Cfg_1>
<CfgParent>Base</CfgParent>
<Base>true</Base>
</PropertyGroup>
<PropertyGroup Condition="'$(Config)'=='Debug' or '$(Cfg_2)'!=''">
<Cfg_2>true</Cfg_2>
<CfgParent>Base</CfgParent>
<Base>true</Base>
</PropertyGroup>
<PropertyGroup Condition="'$(Base)'!=''">
<DCC_ImageBase>00400000</DCC_ImageBase>
<DCC_DependencyCheckOutputName>VectPotential.exe</DCC_DependencyCheckOutputName>
<DCC_UsePackage>VCL40;VCLX40;VCLDB40;VCLDBX40;VCLSMP40;QRPT40;TEEUI40;TEEDB40;TEE40;ibevnt40;nmfast40;MS_Direct_Anim;$(DCC_UsePackage)</DCC_UsePackage>
<DCC_UNSAFE_CODE>true</DCC_UNSAFE_CODE>
<DCC_UNSAFE_TYPE>true</DCC_UNSAFE_TYPE>
<DCC_RangeChecking>true</DCC_RangeChecking>
<DCC_Description>VectPotential.exe</DCC_Description>
<DCC_Platform>x86</DCC_Platform>
<DCC_UNSAFE_CAST>true</DCC_UNSAFE_CAST>
<DCC_K>false</DCC_K>
<DCC_F>false</DCC_F>
<DCC_N>true</DCC_N>
<DCC_S>false</DCC_S>
<DCC_E>false</DCC_E>
<DCC_MaxStackSize>16777216</DCC_MaxStackSize>
<DCC_WriteableConstants>true</DCC_WriteableConstants>
<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo>
<DCC_IntegerOverflowCheck>true</DCC_IntegerOverflowCheck>
<SanitizedProjectName>VectPotential</SanitizedProjectName>
<DCC_Namespace>Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;System;Xml;Data;Datasnap;Web;Soap;Winapi;$(DCC_Namespace)</DCC_Namespace>
<VerInfo_Locale>3081</VerInfo_Locale>
<VerInfo_Keys>CompanyName=;FileDescription=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments=</VerInfo_Keys>
</PropertyGroup>
<PropertyGroup Condition="'$(Cfg_1)'!=''">
<DCC_DependencyCheckOutputName>..\..\..\..\Administrator\Documents\Physics\VectPotential_Electron_WaveFunction_Solved_RELEASE 2\VectPotential.exe</DCC_DependencyCheckOutputName>
<DCC_ExeOutput>C:\Users\Administrator\Documents\Physics\VectPotential_Electron_WaveFunction_Solved_RELEASE 2</DCC_ExeOutput>
<DCC_BplOutput>C:\Users\Administrator\Documents\Physics\VectPotential_Electron_WaveFunction_Solved_RELEASE 2</DCC_BplOutput>
<DCC_DcuOutput>C:\Users\Administrator\Documents\Physics\VectPotential_Electron_WaveFunction_Solved_RELEASE 2</DCC_DcuOutput>
<DCC_DcpOutput>C:\Users\Administrator\Documents\Physics\VectPotential_Electron_WaveFunction_Solved_RELEASE 2</DCC_DcpOutput>
<DCC_LocalDebugSymbols>false</DCC_LocalDebugSymbols>
<DCC_Define>RELEASE;$(DCC_Define)</DCC_Define>
<DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
<DCC_DebugInformation>0</DCC_DebugInformation>
</PropertyGroup>
<PropertyGroup Condition="'$(Cfg_2)'!=''">
<DCC_Define>DEBUG;$(DCC_Define)</DCC_Define>
</PropertyGroup>
<ItemGroup>
<DelphiCompile Include="VectPotential.dpr">
<MainSource>MainSource</MainSource>
</DelphiCompile>
<DCCReference Include="VectorPotential.pas">
<Form>Form1</Form>
</DCCReference>
<BuildConfiguration Include="Base">
<Key>Base</Key>
</BuildConfiguration>
<BuildConfiguration Include="Debug">
<Key>Cfg_2</Key>
<CfgParent>Base</CfgParent>
</BuildConfiguration>
<BuildConfiguration Include="Release">
<Key>Cfg_1</Key>
<CfgParent>Base</CfgParent>
</BuildConfiguration>
</ItemGroup>
<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
<ProjectExtensions>
<Borland.Personality>Delphi.Personality.12</Borland.Personality>
<Borland.ProjectType>VCLApplication</Borland.ProjectType>
<BorlandProject>
<Delphi.Personality>
<Source>
<Source Name="MainSource">VectPotential.dpr</Source>
</Source>
<Parameters>
<Parameters Name="UseLauncher">False</Parameters>
<Parameters Name="LoadAllSymbols">True</Parameters>
<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
<Parameters Name="DebugSourceDirs">C:\Users\Administrator\Documents\Physics\VectPotential_Solved_RELEASE_2</Parameters>
<Parameters Name="DebugCWD">C:\Users\Administrator\Documents\Physics\VectPotential_Solved_RELEASE_2</Parameters>
</Parameters>
<VersionInfo>
<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
<VersionInfo Name="AutoIncBuild">False</VersionInfo>
<VersionInfo Name="MajorVer">1</VersionInfo>
<VersionInfo Name="MinorVer">0</VersionInfo>
<VersionInfo Name="Release">0</VersionInfo>
<VersionInfo Name="Build">0</VersionInfo>
<VersionInfo Name="Debug">False</VersionInfo>
<VersionInfo Name="PreRelease">False</VersionInfo>
<VersionInfo Name="Special">False</VersionInfo>
<VersionInfo Name="Private">False</VersionInfo>
<VersionInfo Name="DLL">False</VersionInfo>
<VersionInfo Name="Locale">3081</VersionInfo>
<VersionInfo Name="CodePage">1252</VersionInfo>
</VersionInfo>
<VersionInfoKeys>
<VersionInfoKeys Name="CompanyName"/>
<VersionInfoKeys Name="FileDescription"/>
<VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys>
<VersionInfoKeys Name="InternalName"/>
<VersionInfoKeys Name="LegalCopyright"/>
<VersionInfoKeys Name="LegalTrademarks"/>
<VersionInfoKeys Name="OriginalFilename"/>
<VersionInfoKeys Name="ProductName"/>
<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
<VersionInfoKeys Name="Comments"/>
</VersionInfoKeys>
<Excluded_Packages>
<Excluded_Packages Name="%BDSBIN%\dcloffice2k260.bpl">Microsoft Office 2000 Sample Automation Server Wrapper Components</Excluded_Packages>
<Excluded_Packages Name="%BDSBIN%\dclofficexp260.bpl">Microsoft Office XP Sample Automation Server Wrapper Components</Excluded_Packages>
</Excluded_Packages>
</Delphi.Personality>
<Platforms>
<Platform value="Win32">True</Platform>
<Platform value="Win64">False</Platform>
</Platforms>
</BorlandProject>
<ProjectFileVersion>12</ProjectFileVersion>
</ProjectExtensions>
</Project>
14 changes: 14 additions & 0 deletions VectPotential.dproj.local
Original file line number Diff line number Diff line change
@@ -0,0 +1,14 @@
<?xml version="1.0" encoding="utf-8"?>
<BorlandProject>
<Transactions>
<Transaction>2018/06/15 19:00:18.980.dproj,C:\Users\Administrator\Documents\Physics\VectPotential_Solved_RELEASE_2\VectPotential.dproj=J:\Maple_Corrected\VectPotential.dproj</Transaction>
<Transaction>2018/06/15 19:01:01.060.pas,C:\Users\Administrator\Documents\Physics\VectPotential_Solved_RELEASE_2\VectorPotential.pas=J:\Maple_Corrected\VectorPotential.pas</Transaction>
<Transaction>2018/06/15 19:01:01.060.dfm,C:\Users\Administrator\Documents\Physics\VectPotential_Solved_RELEASE_2\VectorPotential.dfm=J:\Maple_Corrected\VectorPotential.dfm</Transaction>
<Transaction>2018/06/15 19:02:31.310.dproj,J:\Maple_Corrected\VectPotential.dproj=C:\Users\Administrator\Documents\Physics\VectPotential_Solved_RELEASE_2\VectPotential.dproj</Transaction>
</Transactions>
<ProjectSortOrder AutoSort="0" SortType="0">
<File Path="VectorPotential.pas"/>
<File Path="VectorPotential.dfm"/>
</ProjectSortOrder>
<BT_BuildType>Debug</BT_BuildType>
</BorlandProject>
Loading