源码文件 a20.for SUBROUTINE EL3D10 C C C C C IMPLICIT DOUBLE PRECISION ( A-H,O-Z ) C***END:DPR*** COMMON /EL/ IND,ICOUNT,NPAR(2…