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

Demonstrates finding tank loads to zero trim and heel.
    `Demonstrates finding tank loads to zero trim and heel.
    `For an alternative method of calculating tank loads see TRIM.HTM
    
    PROJECT zhzt
    READ fv.gf
    
    MACRO GROUP `%1: group name %2: tanks to be in group (in quotes)
    `Establishes tank group and sets contents to sea water.
    CONT(%2) = SEA
    GROUP %1 = %2
    /
    
    .GROUP hgroup "wt1.s,wt2.s,wt3.s"
    .GROUP tgroup "forepeak.c"
    
    LOAD (hgroup,tgroup) = 0.5
    
    `Initial trim and heel to be overcome by tank load adjustments:
    TRIM = 0.5
    HEEL = 1.5
    
    `Set up initial weight & CG to agree with foregoing:
    DEPTH = 6.0
    VCG = 7.0
    SOLVE WEIGHT, LCG, TCG
    
    SUBTITLE \{+b}- INITIAL CONDITION -\
    report
    STATUS
    DI (*) STATUS PLAN, PROFILE:WITHSAILS, BODY@0 @10F @20F
    
    MACRO tload
    `Adjust load in current tanks to reduce trimming moment.
    SOLVE DEPTH
    LOAD RAT
    /
    
    MACRO hload
    `Adjust load in current tanks to reduce heel.
    SOLVE DEPTH
    LOAD RAH
    /
    
    MACRO zt
    `Zero trim by adjusting current tanks.
    TRIM = 0
    TANK = tgroup
    .tload (3)
    /
    
    MACRO zh
    `Zero heel by adjusting current tanks.
    HEEL = 0
    TANK = hgroup
    .hload (3)
    /
    
    MACRO solve
    `Solve for both zero trim and zero heel.
    .zt
    .zh
    .zt
    SOLVE
    /
    
    .solve
    
    GROUPS OFF
    SUBTITLE \{+b}- UPRIGHT CONDITION -\
    STATUS
    DI (*) STATUS PLAN, PROFILE:WITHSAILS, BODY@0 @10F @20F
    
    PRINT PREVIEW
    REPORT OFF
    QUIT
    
Add a free link to your site
Copyright © , Creative Systems, Inc.
Privacy policy