WELCOME TO  MOSES Rev devlop
                         ============================
 
              This Program is licensed for the exclusive use of
 
                               Ultramarine inc.
 
              Copying of this program or use  by  anyone  other
              than  an  employee  of  the  above  firm  without
              written  consent  of  Ultramarine   is   strictly
                                 prohibited.
 
 
 
                               +++ M A I N +++
                               ===============
 
 
>&device   -oecho no  -g_default device
>&dimen -DIMEN METERS kn
>&default -depth 31
>inmodel
    Time To perform Inmodel                         : CP=     0.07
>&INSTATE -LOC   0 0 -0 0 0 0
>&weight -compute 1 10 10 10
>MEDIT
                      +++ M O D E L   E D I T I N G +++
                      =================================
 
 
>&set prop  = -len 300 -clump -667 68
>&set seg1 = -b_ten 2187 -emod 960e3 -wtpl .1224 -buoy 0
>&set seg2 = -b_ten 2662 -emod 960e3 -wtpl .1491 -buoy 0
>&set seg3 = -b_ten 3360 -emod 109e3 -wtpl .6991 -buoy 0
>~th1 b_cat 58 -len 300 -clump -667 68            -depanc 1100 -b_ten 2187  \
       -emod 960e3 -wtpl .1224 -buoy 0
>~th1 b_cat 64 -len 1460                     -b_ten 2662 -emod 960e3 -wtpl  \
       .1491 -buoy 0
>~th1 b_cat 64 -len  760                     -b_ten 3360 -emod 109e3 -wtpl  \
       .6991 -buoy 0
>CONNECTOR  th1  ~th1 *avant   -ANC 180 350
>&set   r1 = -drag 58    -amas 58    -refine 20
>&set   r2 = -drag 64    -amas 58    -refine 20
>&set   r3 = -drag 64*2  -amas 58*2  -refine 20
>~rh1 rod 58 57/2 -len 300 -clump -667 68         -depanc 1100 -b_ten 2187  \
       -emod 960e3 -wtpl .1224 -buoy 0 -drag 58    -amas 58    -refine 20
>~rh1 rod 64 63/2 -len 1460                  -b_ten 2662 -emod 960e3 -wtpl  \
       .1491 -buoy 0 -drag 64    -amas 58    -refine 20
>~rh1 rod 64 63/2 -len  760                  -b_ten 3360 -emod 109e3 -wtpl  \
       .6991 -buoy 0 -drag 64*2  -amas 58*2  -refine 20
>CONNECTOR  rh1  ~rh1 *avant   -ANC 180 350
>&conne @ -a_ten 600
                      Moving Attachment of Connector RH1
                      ==================================
                      Moving Attachment of Connector TH1
                      ==================================
>END
                               +++ M A I N +++
                               ===============
 
 
>&pict
>&status f_c -hard
>conn
                   +++ C O N N E C T O R   D E S I G N +++
                   =======================================
 
 
>table th1
                        +++ D I S P O S I T I O N +++
                        =============================
 
 
>report
>end
                   +++ C O N N E C T O R   D E S I G N +++
                   =======================================
 
 
>&pict
>&status dg_c rh1 -hard
>&status dg_c th1 -hard
 
 
                          MOSES   Finished Normally
                          =========================
                           CP Time             0.13
                           ========================
                           Total Units         0.13
                           ========================