-- =============> <=================
        
calcgradQuadratic :: Molecule -> Molecule
calcgradQuadratic mol =  undefined
calcgradQuadratic :: Molecule -> Molecule
calcgradQuadratic mol =  undefined
calcgradQuadratic mol =  undefined