$ $@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ $@ @ $@ &SURFACE Results @ $@ @ $@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ $ $ $**************************************** Set Dimensions $ &dimen -save -dimen Feet Kips $ $**************************************** Defaults $ &LOCAL xfac = 1 yfac = 1 zfac = 1 &default -save &default -fyield 36 -alpha 6.5E-6 -density 490 -emodulus 2.9E4 -poi_ratio 0.3 \ -kfac 1 1 -cmfac 0.85 0.85 -flood no -use @ $ $@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ $@ @ $@ Define Points @ $@ @ $@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ $ $ $**************************************** Set factors $ &set xfac = 1 &set yfac = 1 &set zfac = 1 $ $**************************************** Set body to JACKUP $ &describe body JACKUP nt $ $**************************************** Define Coordinates $ *PNT0001 0.000*%xfac -16.400*%yfac *PNT0002 0.000*%xfac -16.400*%yfac 23.790*%zfac *PNT0003 0.000*%xfac 0.000*%yfac -0.001*%zfac *PNT0004 0.000*%xfac 0.000*%yfac 23.791*%zfac *PNT0005 0.000*%xfac 16.400*%yfac *PNT0006 0.000*%xfac 16.400*%yfac 23.790*%zfac *PNT1001 6.570*%xfac -24.585*%yfac *PNT1002 6.570*%xfac -24.585*%yfac 23.790*%zfac *PNT1003 6.560*%xfac -10.660*%yfac -0.001*%zfac *PNT1004 6.560*%xfac -10.660*%yfac 23.790*%zfac *PNT1005 6.560*%xfac 0.000*%yfac -0.001*%zfac *PNT1006 6.560*%xfac 0.000*%yfac 23.791*%zfac *PNT1007 6.560*%xfac 10.660*%yfac -0.000*%zfac *PNT1008 6.560*%xfac 10.660*%yfac 23.791*%zfac *PNT1009 6.570*%xfac 24.585*%yfac *PNT1010 6.570*%xfac 24.585*%yfac 23.790*%zfac *PNT2001 27.870*%xfac -51.120*%yfac *PNT2002 27.870*%xfac -51.120*%yfac 23.790*%zfac *PNT2003 27.880*%xfac -10.660*%yfac -0.001*%zfac *PNT2004 27.880*%xfac -10.660*%yfac 23.790*%zfac *PNT2005 27.880*%xfac 0.000*%yfac -0.001*%zfac *PNT2006 27.880*%xfac 0.000*%yfac 23.791*%zfac *PNT2007 27.880*%xfac 10.660*%yfac -0.000*%zfac *PNT2008 27.880*%xfac 10.660*%yfac 23.791*%zfac *PNT2009 27.870*%xfac 51.120*%yfac *PNT2010 27.870*%xfac 51.120*%yfac 23.790*%zfac *PNT3001 56.580*%xfac -86.887*%yfac *PNT3002 56.580*%xfac -86.887*%yfac 23.790*%zfac *PNT3003 56.568*%xfac -81.182*%yfac 0.000*%zfac *PNT3004 56.568*%xfac -81.182*%yfac 23.790*%zfac *PNT3005 56.568*%xfac -59.862*%yfac -0.000*%zfac *PNT3006 56.568*%xfac -59.862*%yfac 23.790*%zfac *PNT3007 56.580*%xfac 0.000*%yfac -0.001*%zfac *PNT3008 56.580*%xfac 0.000*%yfac 23.791*%zfac *PNT3009 56.572*%xfac 59.858*%yfac -0.000*%zfac *PNT3010 56.572*%xfac 59.858*%yfac 23.790*%zfac *PNT3011 56.572*%xfac 81.178*%yfac 0.000*%zfac *PNT3012 56.572*%xfac 81.178*%yfac 23.790*%zfac *PNT3013 56.580*%xfac 86.887*%yfac *PNT3014 56.580*%xfac 86.887*%yfac 23.790*%zfac *PNT4001 77.880*%xfac -86.875*%yfac *PNT4002 77.880*%xfac -86.875*%yfac 23.790*%zfac *PNT4003 77.888*%xfac -81.182*%yfac 0.000*%zfac *PNT4004 77.888*%xfac -81.182*%yfac 23.790*%zfac *PNT4005 77.888*%xfac -59.862*%yfac -0.000*%zfac *PNT4006 77.888*%xfac -59.862*%yfac 23.790*%zfac *PNT4007 77.880*%xfac 0.000*%yfac -0.001*%zfac *PNT4008 77.880*%xfac 0.000*%yfac 23.791*%zfac *PNT4009 77.892*%xfac 59.858*%yfac -0.000*%zfac *PNT4010 77.892*%xfac 59.858*%yfac 23.790*%zfac *PNT4011 77.892*%xfac 81.178*%yfac -0.000*%zfac *PNT4012 77.892*%xfac 81.178*%yfac 23.790*%zfac *PNT4013 77.880*%xfac 86.875*%yfac *PNT4014 77.880*%xfac 86.875*%yfac 23.790*%zfac *PNT5001 143.510*%xfac -71.767*%yfac *PNT5002 143.510*%xfac -71.767*%yfac 23.790*%zfac *PNT5003 143.500*%xfac -47.900*%yfac -0.000*%zfac *PNT5004 143.500*%xfac -47.900*%yfac 23.790*%zfac *PNT5005 143.500*%xfac -26.580*%yfac -0.001*%zfac *PNT5006 143.500*%xfac -26.580*%yfac 23.791*%zfac *PNT5007 143.510*%xfac 0.000*%yfac -0.001*%zfac *PNT5008 143.510*%xfac 0.000*%yfac 23.791*%zfac *PNT5009 143.500*%xfac 26.580*%yfac -0.001*%zfac *PNT5010 143.500*%xfac 26.580*%yfac 23.791*%zfac *PNT5011 143.500*%xfac 47.900*%yfac -0.000*%zfac *PNT5012 143.500*%xfac 47.900*%yfac 23.790*%zfac *PNT5013 143.510*%xfac 71.767*%yfac *PNT5014 143.510*%xfac 71.767*%yfac 23.790*%zfac *PNT6001 164.810*%xfac -66.871*%yfac *PNT6002 164.810*%xfac -66.871*%yfac 23.790*%zfac *PNT6003 164.820*%xfac -47.900*%yfac -0.000*%zfac *PNT6004 164.820*%xfac -47.900*%yfac 23.790*%zfac *PNT6005 164.820*%xfac -26.580*%yfac -0.000*%zfac *PNT6006 164.820*%xfac -26.580*%yfac 23.791*%zfac *PNT6007 164.810*%xfac 0.000*%yfac -0.001*%zfac *PNT6008 164.810*%xfac 0.000*%yfac 23.791*%zfac *PNT6009 164.820*%xfac 26.580*%yfac -0.001*%zfac *PNT6010 164.820*%xfac 26.580*%yfac 23.790*%zfac *PNT6011 164.820*%xfac 47.900*%yfac -0.000*%zfac *PNT6012 164.820*%xfac 47.900*%yfac 23.790*%zfac *PNT6013 164.810*%xfac 66.871*%yfac *PNT6014 164.810*%xfac 66.871*%yfac 23.790*%zfac *PNT7001 181.000*%xfac -63.150*%yfac *PNT7002 181.000*%xfac -63.150*%yfac 23.790*%zfac *PNT7003 181.000*%xfac 0.000*%yfac -0.001*%zfac *PNT7004 181.000*%xfac 0.000*%yfac 23.791*%zfac *PNT7005 181.000*%xfac 63.150*%yfac *PNT7006 181.000*%xfac 63.150*%yfac 23.790*%zfac $ $@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ $@ @ $@ Define JACKUP @ $@ @ $@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ $ $ $**************************************** Set Piece to JACKUP $ &describe piece JACKUP -diftype 3ddif $ $**************************************** Define Panels $ PANEL *PNT0002 *PNT0001 *PNT0003 *PNT0005 *PNT0006 *PNT0004 PANEL *PNT0003 *PNT0001 *PNT1001 *PNT1003 PANEL *PNT0001 *PNT0002 *PNT1002 *PNT1001 PANEL *PNT0002 *PNT0004 *PNT1004 *PNT1002 PANEL *PNT0003 *PNT1005 *PNT1007 PANEL *PNT0005 *PNT0003 *PNT1007 *PNT1009 PANEL *PNT1003 *PNT1005 *PNT0003 PANEL *PNT1008 *PNT1006 *PNT0004 PANEL *PNT0004 *PNT0006 *PNT1010 *PNT1008 PANEL *PNT0004 *PNT1006 *PNT1004 PANEL *PNT0006 *PNT0005 *PNT1009 *PNT1010 PANEL *PNT1003 *PNT1001 *PNT2001 *PNT2003 PANEL *PNT1001 *PNT1002 *PNT2002 *PNT2001 PANEL *PNT1002 *PNT1004 *PNT2004 *PNT2002 PANEL *PNT1003 *PNT2003 *PNT2004 *PNT1004 PANEL *PNT1006 *PNT1008 *PNT1007 *PNT1005 *PNT1003 *PNT1004 PANEL *PNT1009 *PNT1007 *PNT2007 *PNT2009 PANEL *PNT1008 *PNT2008 *PNT2007 *PNT1007 PANEL *PNT1008 *PNT1010 *PNT2010 *PNT2008 PANEL *PNT1010 *PNT1009 *PNT2009 *PNT2010 PANEL *PNT2001 *PNT3001 *PNT3003 PANEL *PNT2001 *PNT3003 *PNT3005 PANEL *PNT2001 *PNT3005 *PNT3007 *PNT2003 PANEL *PNT2001 *PNT2002 *PNT3002 *PNT3001 PANEL *PNT3004 *PNT3002 *PNT2002 PANEL *PNT3006 *PNT3004 *PNT2002 PANEL *PNT2002 *PNT2004 *PNT3008 *PNT3006 PANEL *PNT3007 *PNT2005 *PNT2003 PANEL *PNT2006 *PNT2004 *PNT2003 *PNT2005 *PNT2007 *PNT2008 PANEL *PNT2004 *PNT2006 *PNT3008 PANEL *PNT2007 *PNT2005 *PNT3007 PANEL *PNT3008 *PNT2006 *PNT2008 PANEL *PNT2009 *PNT2007 *PNT3007 *PNT3009 PANEL *PNT2010 *PNT3010 *PNT3008 *PNT2008 PANEL *PNT2010 *PNT2009 *PNT3013 *PNT3014 PANEL *PNT3011 *PNT3013 *PNT2009 PANEL *PNT3009 *PNT3011 *PNT2009 PANEL *PNT2010 *PNT3014 *PNT3012 PANEL *PNT2010 *PNT3012 *PNT3010 PANEL *PNT3003 *PNT3001 *PNT4001 *PNT4003 PANEL *PNT3001 *PNT3002 *PNT4002 *PNT4001 PANEL *PNT3002 *PNT3004 *PNT4004 *PNT4002 PANEL *PNT3006 *PNT3005 *PNT3003 *PNT3004 PANEL *PNT4003 *PNT4004 *PNT3004 *PNT3003 PANEL *PNT3007 *PNT3005 *PNT4005 *PNT4007 PANEL *PNT3006 *PNT4006 *PNT4005 *PNT3005 PANEL *PNT3006 *PNT3008 *PNT4008 *PNT4006 PANEL *PNT3009 *PNT3007 *PNT4007 *PNT4009 PANEL *PNT3008 *PNT3010 *PNT4010 *PNT4008 PANEL *PNT3012 *PNT3011 *PNT3009 *PNT3010 PANEL *PNT4009 *PNT4010 *PNT3010 *PNT3009 PANEL *PNT3013 *PNT3011 *PNT4011 *PNT4013 PANEL *PNT4012 *PNT4011 *PNT3011 *PNT3012 PANEL *PNT3012 *PNT3014 *PNT4014 *PNT4012 PANEL *PNT3014 *PNT3013 *PNT4013 *PNT4014 PANEL *PNT4003 *PNT4001 *PNT5001 PANEL *PNT4001 *PNT4002 *PNT5002 *PNT5001 PANEL *PNT5002 *PNT4002 *PNT4004 PANEL *PNT4005 *PNT4003 *PNT5001 PANEL *PNT4004 *PNT4003 *PNT4005 *PNT4006 PANEL *PNT5002 *PNT4004 *PNT4006 PANEL *PNT4005 *PNT5001 *PNT5003 PANEL *PNT4005 *PNT5003 *PNT5005 PANEL *PNT4007 *PNT4005 *PNT5005 *PNT5007 PANEL *PNT5004 *PNT5002 *PNT4006 PANEL *PNT5006 *PNT5004 *PNT4006 PANEL *PNT4006 *PNT4008 *PNT5008 *PNT5006 PANEL *PNT4009 *PNT4007 *PNT5007 *PNT5009 PANEL *PNT4008 *PNT4010 *PNT5010 *PNT5008 PANEL *PNT5013 *PNT4011 *PNT4009 PANEL *PNT5011 *PNT5013 *PNT4009 PANEL *PNT5009 *PNT5011 *PNT4009 PANEL *PNT4010 *PNT4009 *PNT4011 *PNT4012 PANEL *PNT4010 *PNT4012 *PNT5014 PANEL *PNT4010 *PNT5014 *PNT5012 PANEL *PNT4010 *PNT5012 *PNT5010 PANEL *PNT5013 *PNT4013 *PNT4011 PANEL *PNT4012 *PNT4014 *PNT5014 PANEL *PNT4014 *PNT4013 *PNT5013 *PNT5014 PANEL *PNT5003 *PNT5001 *PNT6001 *PNT6003 PANEL *PNT5001 *PNT5002 *PNT6002 *PNT6001 PANEL *PNT5002 *PNT5004 *PNT6004 *PNT6002 PANEL *PNT5006 *PNT5005 *PNT5003 *PNT5004 PANEL *PNT6003 *PNT6004 *PNT5004 *PNT5003 PANEL *PNT5007 *PNT5005 *PNT6005 *PNT6007 PANEL *PNT5006 *PNT6006 *PNT6005 *PNT5005 PANEL *PNT5006 *PNT5008 *PNT6008 *PNT6006 PANEL *PNT5009 *PNT5007 *PNT6007 *PNT6009 PANEL *PNT5008 *PNT5010 *PNT6010 *PNT6008 PANEL *PNT5009 *PNT6009 *PNT6010 *PNT5010 PANEL *PNT5012 *PNT5011 *PNT5009 *PNT5010 PANEL *PNT5013 *PNT5011 *PNT6011 *PNT6013 PANEL *PNT6012 *PNT6011 *PNT5011 *PNT5012 PANEL *PNT5012 *PNT5014 *PNT6014 *PNT6012 PANEL *PNT5014 *PNT5013 *PNT6013 *PNT6014 PANEL *PNT6003 *PNT6001 *PNT7001 PANEL *PNT6001 *PNT6002 *PNT7002 *PNT7001 PANEL *PNT7002 *PNT6002 *PNT6004 PANEL *PNT6005 *PNT6003 *PNT7001 PANEL *PNT6004 *PNT6003 *PNT6005 *PNT6006 PANEL *PNT7002 *PNT6004 *PNT6006 PANEL *PNT6007 *PNT6005 *PNT7001 *PNT7003 PANEL *PNT6006 *PNT6008 *PNT7004 *PNT7002 PANEL *PNT6009 *PNT6007 *PNT7003 *PNT7005 PANEL *PNT6008 *PNT6010 *PNT7006 *PNT7004 PANEL *PNT7005 *PNT6011 *PNT6009 PANEL *PNT6010 *PNT6009 *PNT6011 *PNT6012 PANEL *PNT6010 *PNT6012 *PNT7006 PANEL *PNT7005 *PNT6013 *PNT6011 PANEL *PNT6012 *PNT6014 *PNT7006 PANEL *PNT6014 *PNT6013 *PNT7005 *PNT7006 PANEL *PNT7004 *PNT7006 *PNT7005 *PNT7003 *PNT7001 *PNT7002 $ $**************************************** Finish Up $ &dimen -remember &default -remember