show vari MAP_CONT
inquire real vari MAP_CONT text "CONTOUR AT DENSITY:"
image map MAP_ACT dens MAP_CONT box map_boxx map_boxy map_boxz
return