IMRDAT (171)    FUNCTION (.5)