forked from sanshar/Block
-
Notifications
You must be signed in to change notification settings - Fork 1
/
Copy pathtranNpdm.h
21 lines (14 loc) · 797 Bytes
/
tranNpdm.h
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
#ifndef __TRANSFORM_NPDM_ARRAY_H
#define __TRANSFORM_NPDM_ARRAY_H
#include "molcas_types.h"
extern "C" {
void block_tran1pdm_ (const FORTINT* N, double* X, const FORTINT* iRoot, const FORTINT* jRoot);
void block_tran2pdm_ (const FORTINT* N, double* X, const FORTINT* iRoot, const FORTINT* jRoot);
void block_tran3pdm_ (const FORTINT* N, double* X, const FORTINT* iRoot, const FORTINT* jRoot);
} // extern "C"
void tran1pdm (FORTINT N, double* X, FORTINT iRoot, FORTINT jRoot);
void tran2pdm (FORTINT N, double* X, FORTINT iRoot, FORTINT jRoot);
void tran3pdm (FORTINT N, double* X, FORTINT iRoot, FORTINT jRoot);
void SF_tran2pdm (FORTINT N, double* X, FORTINT iRoot, FORTINT jRoot);
void SF_tran3pdm (FORTINT N, double* X, FORTINT iRoot, FORTINT jRoot);
#endif // __TRANSFORM_NPDM_ARRAY_H