Home My Page Projects Code Snippets Project Openings diderot
Summary Activity Tracker Tasks SCM

SCM Repository

[diderot] Diff of /branches/vis15/src/compiler/basis/math-fns.sml
ViewVC logotype

Diff of /branches/vis15/src/compiler/basis/math-fns.sml

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 3756, Fri Apr 15 12:53:23 2016 UTC revision 3757, Fri Apr 15 14:30:25 2016 UTC
# Line 64  Line 64 
64              | POW => 2              | POW => 2
65            (* end case *))            (* end case *))
66    
67      (* return a type signature for a math function (based on the representation of a real) *)
68        fun sigOf (realTy, f) = (case f
69               of ATAN2 => (realTy, [realTy, realTy])
70                | POW => (realTy, [realTy, realTy])
71                | _ => (realTy, [realTy])
72              (* end case *))
73    
74    end    end

Legend:
Removed from v.3756  
changed lines
  Added in v.3757

root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0