3D Quantum - Perl Data Language - Theory and Simulation - Code Refinement