C     .....................................................
C      ***  ELCOL PROBLEM DEPENDENT STATEMENTS FOLLOW ***
C     .....................................................
C     APPLICATION: PLANE STRESS, ISOTROPIC MATERIAL, CST
C     NSPACE = 2, N= 3, NG = 2, NELFRE = 6, NLPFLO = 4
C     ELPROP(1) = YOUNG'S MODULUS ELPROP(2) = POISSON RATIO
C     ELPROP(3) = SHEAR MODULUS   ELPROP(4) = THICKNESS
C     ELPROP(5) = X-BODY FORCE    ELPROP(6) = Y-BODY FORCE
      COMMON /ELARG/ XB, YB, Y, V, SM, T, FX, FY, AREA
      TA = T*AREA
      CX = TA*FX/3.
      CY = TA*FY/3.
C---> BODY FORCE LOADS
      C(1) = CX
      C(2) = CY
      C(3) = CX
      C(4) = CY
      C(5) = CX
      C(6) = CY
      RETURN
      END
