scasumsub.f 299 Bytes