|
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. |
|
|
`Loop over critical points 1-10 and report all submerged points.
PROJECT CRTHT
read fv.gf
draft 5
vcg 5.25
so we,lcg
crtpt(2) "test1" 33a,0,4.75
crtpt(3) "test2" 33a,0,5.5
crtpt(4) "test3" 33a,0,5.25
crtpt(5) "test4" 33a,0,4.0
crtpt(8) "nofld" 33a, 0, 3 /nofld
Variable CRTHT
macro lowcrtpt
set error=-4
HEIGHT (%1) CRTHT /ACCESS
if {error}<>-4 then exit
set error=0
if {CRTHT} < 0 then \{2}Critical Point {4}%1 {2}- height is {4}{crtht}\
/
.lowcrtpt(10,1)1
|
| Add a free link to your site |