renamed JADiagOrth inner functions