harmonic |
Testing results of Segev - Heller paper, the main program that calls sub-programs |

harmchec |
Printing input parameters and checking their validity |

harmquan |
Quantum results |

harmwign |
Phase space results (constrained minimium of the Wigner function) |

harmpots |
Graphs of potentials in three dimensions |

harmwfun |
Density diagram of the wave function of the final state |

harmener |
Distribution of the energy over two modes |

printing |
Package for formatted printing of numbers |

harm |
Package to find constraint minimum for harmonic oscillators |

omx = 1.5; omy = 5; x0 = 2.5; y0 = 1; nmax= 10; SetOptions[$Output,PageWidth->Infinity]; SetDirectory["../files/bgu/math"]; <<harmonic.txt; |

See description of the problem for more details.

Plots of wavefunctions for parameters from Segev and Heller's paper