GHS Port Reference Center
Information for maritime designers, engineers and builders
Maintained by Creative Systems, Inc., Creators of GHS
Click here for information about GHS and other fine marine software.
Go to Main page

Launch example - stern first
    
    `Launch example - stern first
    proj launch
    read fv.gf
    
    lwl = 80
    
    weight 160, 3.60f, 0, 10.5  `<--- Total ship weight, LCG, TCG, VCG
    draft 0 @ 40f, 5 @ 40a  `<--- Initial waterplane (partly down ways)
    
    variable d
    set d = {weight} minus {displ} `<-- d is initial weight on ways
    set d = {d} times 0.90  `<-- most but not all for midship supports
    
    ground "Midship supports" {d}, {lcg}, 0, 0 /pen:0,0.02
    ground "Forward poppet" *, 40f, 0, 0  `<--- Poppet location (l,t,v)
    ground "Aftmost support point" *, 40a, 0, 0  `<--- to keep from tipping aft
    
    macro step
    solve trim
    status displ
    set d = {depth} plus 1.0 `<--- use suitable increment
    depth = {d}
    /
    
    .step (6)  `<--- use suitable number of steps
    

Add a free link to your site
Copyright © , Creative Systems, Inc.