SUBROUTINE SMPELAST ( YMEAN, XMEAN, ZMEAN, BETA, DELTA, VLY, VLX, VLZ, NX, NOBS, NULLX, NB, NVAZ, NLAMY, NUMLX, NUMLZ, NUMXEQZ, NAMX, SMPDERX, SMPELAX, SMPDERZ, SMPELAZ )
Argument Definitions (+ indicates altered content)
CHARACTER*10       NAMX(NX)
DOUBLE PRECISION   BETA(*),    DELTA(*),  +SMPDERX(*)
DOUBLE PRECISION  +SMPDERZ(*),            +SMPELAX(*)
DOUBLE PRECISION  +SMPELAZ(*),             VLX(*),     VLY
DOUBLE PRECISION   VLZ(*),     XMEAN(*),   YMEAN,      ZMEAN(*)
INTEGER            NB,         NLAMY,      NOBS,       NULLX(*)
INTEGER            NUMLX(*),   NUMLZ(*),   NUMXEQZ(*)
INTEGER            NVAZ,       NX
Description
Input arguments : (ymean,...,namx) (see Definitions in Subroutine FCN) 
Output arguments: (smpderx,...,smpelaz) (see Definitions below).
Source file:smpelast.f
I/O Operations:
Unit ID  Unit No       Access  Form   Operation
      *                   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
DOUBLE PRECISION   ZLAM
Local Variables (+ indicates altered content)
DOUBLE PRECISION  +DENOM,     +U
INTEGER           +IX,        +J,         +J1,        +J2
INTEGER           +K,         +KC,        +KR,        +NCOL
INTEGER           +NGROUP,    +NPAGE
Referenced Common Block Variables (+ indicates altered content)
%BLANK             INTEGER            NOPRINT