Caret almost finished.
Add userful function itplOrtho