Пример #1
0
void AO2MOsortranse2_nr_s2ij(int (*fmmm)(),
                             double *vout, double *vin, int row_id,
                             struct _AO2MOEnvs *envs)
{
        AO2MOsortranse2_nr_s1(fmmm, vout, vin, row_id, envs);
}
Пример #2
0
void AO2MOtrans_nr_sorts1_igtj(void *nop, int row_id,
                               double *vout, double *eri, double *buf,
                               struct _AO2MOEnvs *envs)
{
        AO2MOsortranse2_nr_s1(AO2MOmmm_nr_s1_igtj, row_id, vout, eri, buf,envs);
}