This is a shorter version if isapt1 - does not do cube plots. See isapt1 for full details
