wrt_model_j3d.f90 File Reference
Go to the source code of this file.
Functions/Subroutines | |
| subroutine | wrt_model (Na1, Na2, Na3, n_occ, JR, WR) |
Function Documentation
| subroutine wrt_model | ( | integer | Na1, | |
| integer | Na2, | |||
| integer | Na3, | |||
| integer | n_occ, | |||
| complex(8),dimension(n_occ,n_occ,-na1:na1,-na2:na2,-na3:na3) | JR, | |||
| real(8),dimension(-na1:na1,-na2:na2,-na3:na3) | WR | |||
| ) |
Definition at line 1 of file wrt_model_j3d.f90.
Referenced by MAIN(), and MATRIX_J().
Here is the caller graph for this function:
