From: VAXN::LAO
Date: 19-JUL-1995  15:58:20
Description: Changes to A EQDSK Files                                

Lao / July 19, 1995
 
 
CHANGES TO A EQDSK FILE DUE TO NEW E-COIL CONNECTIONS
 
With the new E-coil connections, the E-coil current array eccurt written out
in the middle of the A EQDSK will now have 6 elements corresponding to the 6
new E-coil connections rather than 2.  All the codes which read the A files
will have to be changed to account for the change in nesum from 2 to 6
 
        write (neqdsk,1040) (ccbrsp(k,jj),k=1,nfcoil)
        write (neqdsk,1040) (eccurt(jj,k),k=1,nesum)
c
        write (neqdsk,1040) pbinj(jj),rvsin(jj),zvsin(jj),rvsout(jj)
 
The best discriminator is the EFIT version number written at the
beginning of the A files.  Versions dated after 07/11/95 all have the
new E-coil connections.