ship_compartments(SCM object) -> SCM

Get ship compartments.

Scheme procedure
vtestbed ship-compartments

make_ship(SCM rest) -> SCM

Construct ship from hull, compartments and mass/displacement/draught.

Scheme procedure
vtestbed make-ship

ship_compartment_flood(SCM object, SCM name, SCM volume) -> SCM

Flood one of the compartments.

Scheme procedure
vtestbed ship-compartment-flood!

ship_mass(SCM object) -> SCM

Get ship mass.

Scheme procedure
vtestbed ship-mass

ship_quaternion(SCM object) -> SCM

Get ship quaternion.

Scheme procedure
vtestbed ship-quaternion

ship_quaternion_set(SCM object, SCM q) -> SCM

Set ship quaternion.

Scheme procedure
vtestbed ship-quaternion!