SUBROUTINE DATAXPOT ( )
Description
Copyright (C) 1978 Charlotte Froese Fisher 
Copyright (C) 2012 Jacek Kobus 
 
 
The dataxpot subroutine reads xpot data card to determine a type 
of the local exchange potential to be used in a 
quasirelativistic correction (LDA or CG)
Source file:dataxpot.f
I/O Operations:
Unit ID  Unit No       Access  Form   Operation
    OUC                   SEQ  FMTD           W  

Operation codes A=rewind,B=backspace,C=close,E=endfile
                I=inquire,O=open,R=read,W=write
External Functions and Subroutines Called
SUBROUTINE         INPA
Parameter Variables Used
INTEGER            MAXNO              (MAXNO = 29999)
INTEGER            MAXORB             (MAXORB = 20)
Local Variables (+ indicates altered content)
CHARACTER*8        ATMP
Referenced Common Block Variables (+ indicates altered content)
INOUT              INTEGER            OUC
REL                INTEGER           +IXPOT