MUST BE WRITTEN IN ELM

Write a function digitsofInt:Int ->List Int such that digitsofInt n returns [ if n is less than zero, and returns the list of digits of n in the order in which they appear. Once you have implemented the function, you should get the following behavior at the Elm REPL: > import FPWarmup exposing(..) > digitsofInt 3124 13,1,2,4] List Int > digitsofInt 352663 13,5,2,6,6,3]List Int > digitsofInt [01 : List Int