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 a technique for obtaining maximum VCG data using the weather criterion when the cargo wind plane varies with draft. ```proj varysail `Demonstrates a technique for obtaining maximum VCG data using the `weather criterion when the cargo wind plane varies with draft. ` enter pm create hull ends 0, 100 top 10 bot 0 out 18 / modify hull margin 0 `Marking the deckedge for limit(1) / macro layer`Creating sail components create cargo%1 class sail ends 0, 100 bot %2 top %3 out .01 // / .layer 1 10 12 .layer 2 12 14 .layer 3 14 16 .layer 4 16 18 .layer 5 18 20 display write quit pm lim (1) angle from equ to abs 14 or HF > 0 lim (2) abs ratio from abs 0 to abs 14 > 0.492 lim (3) angle from equ to ra0 > 15 wind (press) = 0.061 hmmt wind /cs macro dr variables d v if "%2"="" then .start else type (cargo%2) = unset `Unsetting existing sails for windage calcs set d = %1 set v = {d} plus .5 heel = 0 trim = 0 draft = {d} vcg = {v} solve weight, lcg solve maxvcg if {verbose}=1 then .report1 else .report0 `verbose=0 produces short report - \\Draft Maxvcg, verbose=1, generates a full report, eg. hmmt report, status, ra/lim. / macro report1 hmmt report status ra /lim / macro report0 \ { d:2} { FVCG:2} / macro start if {verbose}=0 then exit \\ Draft Max VCG / variable verbose set verbose=1 report ` Draft -Layer .dr 6.5 .dr 6 5 .dr 5 4 .dr 4 3 .dr 3 2 .dr 2 1 print preview report off ``` Add a free link to your site