Home
last modified time | relevance | path

Searched refs:LUDKBCR (Results 1 – 17 of 17) sorted by relevance

/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/cc/
H A Dccsdt_fbmat.F71 INTEGER LU3SRTR, LUCKJDR, LUDELDR, LUDKBCR, LUDKBCR4
435 LUDKBCR = -1
437 CALL WOPEN2(LUDKBCR,FNDKBCR,64,0)
449 * LUDELDR,FNDELDR,LUDKBCR,FNDKBCR)
453 CALL WCLOSE2(LUDKBCR,FNDKBCR,'KEEP')
861 LUDKBCR = -1
862 CALL WOPEN2(LUDKBCR,FNDKBCR,64,0)
876 CALL WCLOSE2(LUDKBCR,FNDKBCR,'KEEP')
1010 LUDKBCR = -1
1011 CALL WOPEN2(LUDKBCR,FNDKBCR,64,0)
[all …]
H A Dcc3_bmatsd.F78 INTEGER LU3SRTR, LUCKJDR, LUDELDR, LUDKBCR
207 LUDKBCR = -1
212 CALL WOPEN2(LUDKBCR,FNDKBCR,64,0)
392 * LUDELDR,FNDELDR,LUDKBCR,FNDKBCR)
619 CALL GETWA2(LUDKBCR,FNDKBCR,WORK(KTRVI0Y),IOFF,
739 CALL GETWA2(LUDKBCR,FNDKBCR,WORK(KTRVI8Y),IOFF,
940 CALL WCLOSE2(LUDKBCR,FNDKBCR,'DELETE')
H A Dcc3_aabmat_doub.F44 INTEGER LU3SRTR, LUCKJDR, LUDELDR, LUDKBCR
177 LUDKBCR = -1
184 CALL WOPEN2(LUDKBCR,FNDKBCR,64,0)
371 * LUDELDR,FNDELDR,LUDKBCR,FNDKBCR)
777 CALL GETWA2(LUDKBCR,FNDKBCR,WORK(KTRVI0X),IOFF,
905 CALL GETWA2(LUDKBCR,FNDKBCR,WORK(KTRVI8X),IOFF,
1129 CALL WCLOSE2(LUDKBCR,FNDKBCR,'DELETE')
H A Dcc3_xisd.F72 INTEGER LU3SRTR, LUCKJDR, LUDELDR, LUDKBCR, LUDKBCR4
264 LUDKBCR = -1
266 CALL WOPEN2(LUDKBCR,FNDKBCR,64,0)
278 * LUDELDR,FNDELDR,LUDKBCR,FNDKBCR)
283 CALL WCLOSE2(LUDKBCR,FNDKBCR,'KEEP')
758 LUDKBCR = -1
759 CALL WOPEN2(LUDKBCR,FNDKBCR,64,0)
767 CALL GETWA2(LUDKBCR,FNDKBCR,WORK(KOFF1),IOFF,
773 CALL WCLOSE2(LUDKBCR,FNDKBCR,'KEEP')
935 LUDKBCR = -1
[all …]
H A Dccsdt_eta_cont.F711 INTEGER LU3SRTR, LUCKJDR, LUDELDR, LUDKBCR
916 LUDKBCR = -1
918 CALL WOPEN2(LUDKBCR,FNDKBCR,64,0)
933 * LUDELDR,FNDELDR,LUDKBCR,FNDKBCR)
937 CALL WCLOSE2(LUDKBCR,FNDKBCR,'KEEP')
1250 LUDKBCR = -1
1251 CALL WOPEN2(LUDKBCR,FNDKBCR,64,0)
1259 CALL GETWA2(LUDKBCR,FNDKBCR,WORK(KOFF1),IOFF,
1265 CALL WCLOSE2(LUDKBCR,FNDKBCR,'KEEP')
1699 LUDKBCR = -1
[all …]
H A Dcc3_bfmat.F84 INTEGER LUDELDR,LUDKBCR,LUDKBCR4,LUCKJDR,LU4V,LU4VB,LU3SRTR
187 LUDKBCR = -1
206 CALL WOPEN2(LUDKBCR,FNDKBCR,64,0)
511 * LUDELDR,FNDELDR,LUDKBCR,FNDKBCR)
517 * LUDKBCR,FNDKBCR,IDUMMY,CDUMMY,IDUMMY,CDUMMY,
961 CALL GETWA2(LUDKBCR,FNDKBCR,WORK(KTRVIR),IOFF,
1503 CALL WCLOSE2(LUDKBCR,FNDKBCR,'DELETE')
H A Dcc3_gmat.F52 INTEGER LU4VBC,LU4VC,LU4VB,LU3SRTR,LUCKJDR,LUDELDR,LUDKBCR
120 LUDKBCR = -1
138 CALL WOPEN2(LUDKBCR,FNDKBCR,64,0)
327 * LUDELDR,FNDELDR,LUDKBCR,FNDKBCR)
330 * IDUMMY,CDUMMY,LUDKBCR,FNDKBCR,
717 CALL GETWA2(LUDKBCR,FNDKBCR,WORK(KTRVI7),IOFF,
1190 CALL WCLOSE2(LUDKBCR,FNDKBCR,'DELETE')
H A Dcc3_hmat.F116 INTEGER LUDELDR,LUDKBCR,LUDKBCR4,LUCKJDR,LU4VBD,LU4VCD,LU4VBC local
244 LUDKBCR = -1
264 CALL WOPEN2(LUDKBCR,FNDKBCR,64,0)
584 * LUDELDR,FNDELDR,LUDKBCR,FNDKBCR)
590 * LUDKBCR,FNDKBCR,IDUMMY,CDUMMY,IDUMMY,CDUMMY,
1051 CALL GETWA2(LUDKBCR,FNDKBCR,WORK(KTRVIR),IOFF,
1625 CALL WCLOSE2(LUDKBCR,FNDKBCR,'DELETE')
H A Dcc3_gmatnew.F106 INTEGER LUDELDR,LUDKBCR,LUDKBCR4,LUCKJDR,LU4VB,LU4VC,LU4VBC local
217 LUDKBCR = -1
237 CALL WOPEN2(LUDKBCR,FNDKBCR,64,0)
532 * LUDELDR,FNDELDR,LUDKBCR,FNDKBCR)
538 * LUDKBCR,FNDKBCR,IDUMMY,CDUMMY,IDUMMY,CDUMMY,
1015 CALL GETWA2(LUDKBCR,FNDKBCR,WORK(KTRVIR),IOFF,
1615 CALL WCLOSE2(LUDKBCR,FNDKBCR,'DELETE')
H A Dcc3_ft3b.F42 INTEGER LU3SRTR, LUCKJDR, LUDELDR, LUDKBCR, LUDKBCR4
161 LUDKBCR = -1
167 CALL WOPEN2(LUDKBCR,FNDKBCR,64,0)
347 * LUDELDR,FNDELDR,LUDKBCR,FNDKBCR)
350 * IDUMMY,CDUMMY,LUDKBCR,FNDKBCR,
485 CALL GETWA2(LUDKBCR,FNDKBCR,WORK(KW3XVDGX1),IOFF,
596 CALL GETWA2(LUDKBCR,FNDKBCR,WORK(KW3XVDGX2),IOFF,
724 CALL WCLOSE2(LUDKBCR,FNDKBCR,'DELETE')
H A Dccexnorm.F1204 INTEGER LUCKJDR,LU3SRTR,LUDELDR,LUDKBCR,LUWEB,LUWE
1269 LUDKBCR = -1
1276 CALL WOPEN2(LUDKBCR,FNDKBCR,64,0)
1441 * LUDELDR,FNDELDR,LUDKBCR,FNDKBCR)
1579 CALL GETWA2(LUDKBCR,FNDKBCR,WORK(KTRVI0Y),IOFF,
1743 CALL GETWA2(LUDKBCR,FNDKBCR,WORK(KTRVI8Y),IOFF,
1974 CALL WCLOSE2(LUDKBCR,FNDKBCR,'DELETE')
H A Dcc3_fmat.F61 INTEGER LU3SRTR, LUCKJDR, LUDELDR, LUDKBCR, LUDKBCR4
108 LUDKBCR = -1
126 CALL WOPEN2(LUDKBCR,FNDKBCR,64,0)
288 * LUDELDR,FNDELDR,LUDKBCR,FNDKBCR)
291 * IDUMMY,CDUMMY,LUDKBCR,FNDKBCR,
633 CALL GETWA2(LUDKBCR,FNDKBCR,WORK(KTRVI7),IOFF,
1073 CALL WCLOSE2(LUDKBCR,FNDKBCR,'DELETE')
H A Dcc3_abmatt3zu.F2208 INTEGER LU3SRTR, LUCKJDR, LUDELDR, LUDKBCR
2363 LUDKBCR = -1
2368 CALL WOPEN2(LUDKBCR,FNDKBCR,64,0)
2645 * LUDELDR,FNDELDR,LUDKBCR,FNDKBCR)
2959 CALL GETWA2(LUDKBCR,FNDKBCR,WORK(KTRVI0Z),IOFF,
3113 CALL GETWA2(LUDKBCR,FNDKBCR,WORK(KTRVI8Z),IOFF,
3330 CALL WCLOSE2(LUDKBCR,FNDKBCR,'DELETE')
H A Dcc3_fbmatt3zu.F2557 INTEGER LU3SRTR, LUCKJDR, LUDELDR, LUDKBCR
2745 LUDKBCR = -1
2750 CALL WOPEN2(LUDKBCR,FNDKBCR,64,0)
3032 * LUDELDR,FNDELDR,LUDKBCR,FNDKBCR)
3349 CALL GETWA2(LUDKBCR,FNDKBCR,WORK(KTRVI0Z),IOFF,
3522 CALL GETWA2(LUDKBCR,FNDKBCR,WORK(KTRVI8Z),IOFF,
3732 CALL WCLOSE2(LUDKBCR,FNDKBCR,'DELETE')
H A Dcc_rhtr.F171 LUDKBCR = -1
185 CALL WOPEN2(LUDKBCR,FNDKBCR,64,0)
2778 * FNDELDR,LUCKJDR,FNCKJDR,LUDKBCR,FNDKBCR,
2836 * FNDELDR,LUCKJDR,FNCKJDR,LUDKBCR,FNDKBCR,
3049 * FNDELDR,LUCKJDR,FNCKJDR,LUDKBCR,FNDKBCR,
3260 CALL WCLOSE2(LUDKBCR,FNDKBCR,'DELETE')
H A Dccsdt_aden_noddy.F3511 INTEGER LU3SRTR, LUCKJDR, LUDELDR, LUDKBCR, LUDKBCR4,
3569 LUDKBCR = -1
3575 CALL WOPEN2(LUDKBCR,FNDKBCR,64,0)
3641 * LUDELDR,FNDELDR,LUDKBCR,FNDKBCR)
3644 * IDUMMY,CDUMMY,LUDKBCR,FNDKBCR,
3831 CALL GETWA2(LUDKBCR,FNDKBCR,WORK(KTRVI0Y),IOFF,
3960 CALL GETWA2(LUDKBCR,FNDKBCR,WORK(KTRVI8Y),IOFF,
4176 CALL WCLOSE2(LUDKBCR,FNDKBCR,'DELETE')
H A Dcc3_aden.F9166 INTEGER LU3SRTR, LUCKJDR, LUDELDR, LUDKBCR
9263 LUDKBCR = -1
9268 CALL WOPEN2(LUDKBCR,FNDKBCR,64,0)
9534 * LUDELDR,FNDELDR,LUDKBCR,FNDKBCR)
9871 CALL GETWA2(LUDKBCR,FNDKBCR,WORK(KW3XVDGX1),IOFF,
10026 CALL GETWA2(LUDKBCR,FNDKBCR,WORK(KW3XVDGX2),IOFF,
10427 CALL WCLOSE2(LUDKBCR,FNDKBCR,'DELETE')