00001 #include "xtended.hh"
00002 #include "Text.hh"
00003 #include <math.h>
00004
00005 class AsinPrim : public xtended
00006 {
00007
00008 public:
00009
00010 AsinPrim() : xtended("asin") {}
00011
00012 virtual unsigned int arity () { return 1; }
00013
00014 virtual bool needCache () { return true; }
00015
00016 virtual Type infereSigType (const vector<Type>& args)
00017 {
00018 assert (args.size() == 1);
00019 return floatCast(args[0]);
00020 }
00021
00022 virtual void sigVisit (Tree sig, sigvisitor* visitor) {}
00023
00024 virtual int infereSigOrder (const vector<int>& args) {
00025 return args[0];
00026 }
00027
00028
00029 virtual Tree computeSigOutput (const vector<Tree>& args) {
00030 num n;
00031 if (isNum(args[0],n)) {
00032 return tree(asinf(float(n)));
00033 } else {
00034 return tree(symbol(), args[0]);
00035 }
00036 }
00037
00038 virtual string generateCode (Klass* klass, const vector<string>& args, const vector<Type>& types)
00039 {
00040 return subst("asinf($0)", args[0]);
00041 }
00042
00043 };
00044
00045
00046 xtended* gAsinPrim = new AsinPrim();
00047
00048
