From 11c72b1132feca7c1252ea01d02da4cb497e723f Mon Sep 17 00:00:00 2001
From: Joseph Redmon <pjreddie@gmail.com>
Date: Thu, 11 Jun 2015 22:38:58 +0000
Subject: [PATCH] testing on one image

---
 src/activations.c |   81 +++++++++++++---------------------------
 1 files changed, 27 insertions(+), 54 deletions(-)

diff --git a/src/activations.c b/src/activations.c
index 04b27c9..8b607c2 100644
--- a/src/activations.c
+++ b/src/activations.c
@@ -8,16 +8,20 @@
 char *get_activation_string(ACTIVATION a)
 {
     switch(a){
-        case SIGMOID:
-            return "sigmoid";
+        case LOGISTIC:
+            return "logistic";
         case RELU:
             return "relu";
+        case RELIE:
+            return "relie";
         case RAMP:
             return "ramp";
         case LINEAR:
             return "linear";
         case TANH:
             return "tanh";
+        case PLSE:
+            return "plse";
         default:
             break;
     }
@@ -26,8 +30,10 @@
 
 ACTIVATION get_activation(char *s)
 {
-    if (strcmp(s, "sigmoid")==0) return SIGMOID;
+    if (strcmp(s, "logistic")==0) return LOGISTIC;
     if (strcmp(s, "relu")==0) return RELU;
+    if (strcmp(s, "relie")==0) return RELIE;
+    if (strcmp(s, "plse")==0) return PLSE;
     if (strcmp(s, "linear")==0) return LINEAR;
     if (strcmp(s, "ramp")==0) return RAMP;
     if (strcmp(s, "tanh")==0) return TANH;
@@ -35,25 +41,23 @@
     return RELU;
 }
 
-float linear_activate(float x){return x;}
-float sigmoid_activate(float x){return 1./(1. + exp(-x));}
-float relu_activate(float x){return x*(x>0);}
-float ramp_activate(float x){return x*(x>0)+.1*x;}
-float tanh_activate(float x){return (exp(2*x)-1)/(exp(2*x)+1);}
-
 float activate(float x, ACTIVATION a)
 {
     switch(a){
         case LINEAR:
             return linear_activate(x);
-        case SIGMOID:
-            return sigmoid_activate(x);
+        case LOGISTIC:
+            return logistic_activate(x);
         case RELU:
             return relu_activate(x);
+        case RELIE:
+            return relie_activate(x);
         case RAMP:
             return ramp_activate(x);
         case TANH:
             return tanh_activate(x);
+        case PLSE:
+            return plse_activate(x);
     }
     return 0;
 }
@@ -66,19 +70,23 @@
     }
 }
 
-
-float gradient(float x, ACTIVATION a){
+float gradient(float x, ACTIVATION a)
+{
     switch(a){
         case LINEAR:
-            return 1;
-        case SIGMOID:
-            return (1.-x)*x;
+            return linear_gradient(x);
+        case LOGISTIC:
+            return logistic_gradient(x);
         case RELU:
-            return (x>0);
+            return relu_gradient(x);
+        case RELIE:
+            return relie_gradient(x);
         case RAMP:
-            return (x>0) + .1;
+            return ramp_gradient(x);
         case TANH:
-            return 1-x*x;
+            return tanh_gradient(x);
+        case PLSE:
+            return plse_gradient(x);
     }
     return 0;
 }
@@ -91,38 +99,3 @@
     }
 } 
 
-#ifdef GPU
-
-#include "opencl.h"
-#include <math.h>
-
-cl_kernel get_activation_kernel()
-{
-    static int init = 0;
-    static cl_kernel kernel;
-    if(!init){
-        kernel = get_kernel("src/activations.cl", "activate_array", 0);
-        init = 1;
-    }
-    return kernel;
-}
-
-
-void activate_array_ongpu(cl_mem x, int n, ACTIVATION a) 
-{
-    cl_setup();
-    cl_kernel kernel = get_activation_kernel();
-    cl_command_queue queue = cl.queue;
-
-    cl_uint i = 0;
-    cl.error = clSetKernelArg(kernel, i++, sizeof(x), (void*) &x);
-    cl.error = clSetKernelArg(kernel, i++, sizeof(n), (void*) &n);
-    cl.error = clSetKernelArg(kernel, i++, sizeof(a), (void*) &a);
-    check_error(cl);
-
-    size_t gsize = n;
-
-    clEnqueueNDRangeKernel(queue, kernel, 1, 0, &gsize, 0, 0, 0, 0);
-    check_error(cl);
-}
-#endif

--
Gitblit v1.10.0