initial version of j349.f as received from Louis Parslow on 12/17/2012