Hypocretin and Locus Coeruleus model neurons (Carter et al 2012)

 Download zip file 
Help downloading and running models
Conductance based model of the hypocretin neurons (HCRT) and another one of the Locus Coeruleus one (LC). The HCRT drive the LCs via the HCRT receptor on the LCs. The LCs lead to the awakening of the mice if the number of spikes raises over 10 spikes in 10 seconds window.
1 . Carter ME, Brill J, Bonnavion P, Huguenard JR, Huerta R, de Lecea, L (2012) Mechanism for Hypocretin-mediated sleep-to-wake transitions PNAS
Model Information (Click on a link to find other models with that property)
Model Type: Axon; Channel/Receptor;
Brain Region(s)/Organism:
Cell Type(s): Locus Coeruleus neuron;
Channel(s): I Na,t; I T low threshold; I A; I K; I K,Ca; I Calcium;
Gap Junctions:
Simulation Environment: C or C++ program;
Model Concept(s):
Implementer(s): Huerta, Ramon [rhuerta at ucsd.edu];
Search NeuronDB for information about:  I Na,t; I T low threshold; I A; I K; I K,Ca; I Calcium;
/* A C-program for MT19937: Real number version([0,1)-interval) (1998/4/6) */
/*   genrand() generates one pseudorandom real number (double) */
/* which is uniformly distributed on [0,1)-interval, for each  */
/* call. sgenrand(seed) set initial values to the working area */
/* of 624 words. Before genrand(), sgenrand(seed) must be      */
/* called once. (seed is any 32-bit integer except for 0).     */
/* Integer generator is obtained by modifying two lines.       */
/*   Coded by Takuji Nishimura, considering the suggestions by */
/* Topher Cooper and Marc Rieffel in July-Aug. 1997.           */

/* This library is free software; you can redistribute it and/or   */
/* modify it under the terms of the GNU Library General Public     */
/* License as published by the Free Software Foundation; either    */
/* version 2 of the License, or (at your option) any later         */
/* version.                                                        */
/* This library is distributed in the hope that it will be useful, */
/* but WITHOUT ANY WARRANTY; without even the implied warranty of  */
/* See the GNU Library General Public License for more details.    */
/* You should have received a copy of the GNU Library General      */
/* Public License along with this library; if not, write to the    */
/* Free Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA   */ 
/* 02111-1307  USA                                                 */

/* Copyright (C) 1997 Makoto Matsumoto and Takuji Nishimura.       */
/* When you use this, send an email to: matumoto@math.keio.ac.jp   */
/* with an appropriate reference to your work.                     */

/* REFERENCE                                                       */
/* M. Matsumoto and T. Nishimura,                                  */
/* "Mersenne Twister: A 623-Dimensionally Equidistributed Uniform  */
/* Pseudo-Random Number Generator",                                */
/* ACM Transactions on Modeling and Computer Simulation,           */
/* Vol. 8, No. 1, January 1998, pp 3--30.                          */
/* Period parameters */  
#define N 624
#define M 397
#define MATRIX_A 0x9908b0df   /* constant vector a */
#define UPPER_MASK 0x80000000 /* most significant w-r bits */
#define LOWER_MASK 0x7fffffff /* least significant r bits */

/* Tempering parameters */   
#define TEMPERING_MASK_B 0x9d2c5680
#define TEMPERING_MASK_C 0xefc60000
#define TEMPERING_SHIFT_U(y)  (y >> 11)
#define TEMPERING_SHIFT_S(y)  (y << 7)
#define TEMPERING_SHIFT_T(y)  (y << 15)
#define TEMPERING_SHIFT_L(y)  (y >> 18)

static unsigned long mt[N]; /* the array for the state vector  */
static int mti=N+1; /* mti==N+1 means mt[N] is not initialized */

/* initializing the array with a NONZERO seed */
sgenrand(unsigned long seed);
double genrand();
double gasdev();

Loading data, please wait...