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

Generates a report of bending moment as a function of wave phase. Demonstrates user plot and tabular data written to a text file.
    `Gererates a report of bending moment as a function of wave phase.
    `Demonstrates user plot and tabular data written to a text file.
    
    project BMMTPLOT
    
    read fv
    report
    
    `Quick and simple weight curve:
    draft 5
    vcg 7
    solve weight, lcg
    variable w={weight}, c={lcg}
    weight 1 @ -40, 1 @ 40
    weight {w}
    lcg {c}
    
    macro wave
     wave %1, 80
     ls /noprint
     me "%1, {bmmtmax}
     \Max bending moment: {bmmtmax:2}\
     \\
     set n={n} plus 1
     variable bm{n}={bmmtmax} `save bending moment
    /
    
    macro dowave
     variable n=0
     .wave (36,10) 0
    /
    
    me plotstart "Bending Moment vs. Wave Phase"
    me plotlabel "Phase angle", "Max moment"
    .dowave
    me plotend
    
    me (report) {project}.txt
    macro wave
     set n={n} plus 1
     me "%1    {bm{{n}}}
    /
    .dowave
    me (report) off
    
    page
    \Phase Bending moment
    view {project}.txt
    
    print /preview
    report off
    end
    
    
    
    
    
    

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