`Max VCG with the RINA Loss-Of-Lift criterion
proj rinaloss
read tanker
report
variables b, T1,P,D,M
set T1 = -10
\Maximum allowed heel angle during lifting = {T1}\
set p = 50
set d = 45
set m={p} times {d}
\p = {p} d = {d} heeling moment = {m}\
hmmt {m} /C1
`A2/A1>1
limit residual ratio from ABS {T1} to ABS 30 OR FLD > 1
`TR-T2>20
limit angle from ABS 30 TO FLD > 0
limit angle from ABS 30 TO RA0 > 20
maxvcg 5 6 7
draft 6
solve weight, lcg
vcg max
ra /lim
print /preview
report off