#!/usr/bin/perl
#
# Compute GPE for simple 2-body system


$G = 1.0;
$m1 = 10.0;
$m2 = 1.0;
$px1 = 0.0;
$py1 = 0.0;
$px2 = 10.0;
$py2 = 0.0;


$min_x = -20.0;
$max_x = 20.0;
$min_y = -20.0;
$max_y = 20.0;
$dx = 0.1;
$dy = 0.1;