AB-BASIC-DOUBLE