H A D | rspcr2.F | 29 SUBROUTINE CRLRV1(CMO,UDV,PV,FC,FV,FCAC,H2AC,XINDX,WRK,LWRK) 38 DIMENSION CMO(*),UDV(*),PV(*),FC(*),FV(*),FCAC(*),H2AC(*) 134 CALL GETGPV(LRLAB(ILRLAB),FC,FV,CMO,UDV,PV,XINDX,ANTSYM, 187 CALL RSPCTL(CMO,UDV,PV,FC,FV,FCAC,H2AC,.TRUE.,LRLAB(ILRLAB), 223 SUBROUTINE CRVEC2(CMO,UDV,PV,FOCK,FC,FV,FCAC,H2AC, argument 270 CALL XYVEC(CMO,UDV,PV,FOCK,FC,FV,FCAC,H2AC, 273 CALL CRLRV2(CMO,UDV,PV,FOCK,FC,FV,FCAC,H2AC, 279 SUBROUTINE XYVEC(CMO,UDV,PV,FOCK,FC,FV,FCAC,H2AC, argument 413 * WRK(KX3BC),LWRK-KX3BC,CMO,FC,FV)
|