MCR MAC KOMSTR=KOMSTR
MCR MAC STRMOV=STRMOV
!MCR RAT ATAN3.RAT >ATAN3.FTN
MCR F4P ATAN3=ATAN3/NOTR/NOCK
LIBR CREATE MTREK KOMSTR,STRMOV,ATAN3
DEL/K MTREK.OLB