%%HP: T(3)A(R)F(.); \<< \-> \Gl 'IFTE(\Gl<450.,1.,IFTE(\Gl<600.0001,ALOG(.02*(\Gl-450.)),1.))' \>>