ERROR: line 895
ERROR: inferred type double[.] should match declared type double
ERROR: line 916
ERROR:  -- in _MAIN::ipddXID( int{100}, int)

*** Compilation failed ***
*** Exit code 7 (Running type inference system)
*** 1 Error(s), 0 Warning(s)