- 1
https://github.com/lhartikk/ArnoldC
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+143
https://github.com/lhartikk/ArnoldC
+119
Почитываю иногда комменты на govnokod.ru
Сложилось впечатление, что Stertor, bormand, kegdan, inkanus-gray, 1024--, и многие другие - один и тот же человек
так ли это?
+141
foo() ->
Du = os:cmd("du -b "++?PM_LOGS_PATH),
[DiscSize|_] = string:tokens(Du, "\t"),
case list_to_integer(DiscSize) > 10000000000 of
...
Вся мощь эрланга. В строке может быть не только число? Let it crash!
+144
<!--
Правил верстку, затем решил не коммитить без необходимости
<table border="1" style=" width: 900pt; margin-top: 20px; table-layout: fixed;">
<col style=" width: 55pt"/>
<col style=" width: 65pt"/>
<col style=" width: 140pt"/>
<col style=" width: 70pt"/>
<col style=" width: 65pt"/>
<col style=" width: 65pt"/>
<col style=" width: 70pt"/>
<col style=" width: 70pt"/>
<col style=" width: 75pt"/>
<col style=" width: 70pt"/>
<col style=" width: 75pt"/>
-->
И все-таки закоммитил.
+142
### TASK 1
R <- 1.987
toSi <- function (value, molar_mass) {
return (value * 4190 / molar_mass)
}
delta <- function (experiment, theory) {
return((experiment - theory)/experiment*100)
}
einsteinFormula <- function (t, A, B, D) {
return(A + B * t + D * t^2)
}
bennewitzRossner <- function (cv, Cnu, n, m, Cd, q) {
coeff1 = (3*n-6-m-q)/q
return(cv + R + 1/2 * m * R + Cnu + coeff1*Cd)
}
heatCapacity <- function(n, links, t, Anu, Bnu, Dnu, Ad, Bd, Dd, m, M) {
c_nu <- einsteinFormula(t, Anu, Bnu, Dnu)
#print(c_nu)
c_d <- einsteinFormula(t, Ad, Bd, Dd)
#print(c_d)
C_rot <- sum(c_nu*links)
C_bend <- sum(c_d*links)
q <- sum(links)
C_kalmol <- bennewitzRossner(3*R, C_rot, n, m, C_bend, q)
C_br <- toSi(C_kalmol, M)
return(data.frame(C_kalmol, C_br, C_rot, C_bend))
}
task11 <- function () {
t_C6H14 <- c(400, 600, 800)
n_C6H14 <- 20
m_C6H14 <- 5
M_C6H14 <- 86.2
Cp_C6H14_kalmol <- (3 * n_C6H14 - 2) * R
#print(Cp_C6H14_kalmol)
Cp_C6H14_mkt <- toSi(Cp_C6H14_kalmol, M_C6H14)
# print(Cp_C6H14_mkt)
Cp_C6H14_exp <- c(1890, 2611, 3159)
deltaC <- delta(Cp_C6H14_exp, Cp_C6H14_mkt)
cp_C6H14_1 <- heatCapacity(
20,
c(5, 14), #Links number
400, #Temperatures
c(-1.09, 0.229), c(6*10^-3, -1.224*10^-3), c(-4.495*10^-6, 1.658*10^-6), #A, B, D rotational
c(0.73, -0.928), c(3.414*10^-3, 3.9*10^-3), c(-2.577*10^-6, -1.324*10^-6), #A, B, D bending
m_C6H14, 86.2
)
cp_C6H14_2 <- heatCapacity(
20,
c(5, 14), #Links number
600, #Temperatures
c(-1.09, 0.229), c(6*10^-3, -1.224*10^-3), c(-4.495*10^-6, 1.658*10^-6), #A, B, D rotational
c(0.73, -0.928), c(3.414*10^-3, 3.9*10^-3), c(-2.577*10^-6, -1.324*10^-6), #A, B, D bending
m_C6H14, 86.2
)
cp_C6H14_3 <- heatCapacity(
20,
c(5, 14), #Links number
800, #Temperatures
c(-1.09, 0.229), c(6*10^-3, -1.224*10^-3), c(-4.495*10^-6, 1.658*10^-6), #A, B, D rotational
c(0.73, -0.928), c(3.414*10^-3, 3.9*10^-3), c(-2.577*10^-6, -1.324*10^-6), #A, B, D bending
m_C6H14, 86.2
)
cp <- c(cp_C6H14_1$C_br, cp_C6H14_2$C_br, cp_C6H14_3$C_br)
print(c(cp_C6H14_1$C_rot, cp_C6H14_2$C_rot, cp_C6H14_3$C_rot))
print(c(cp_C6H14_1$C_bend, cp_C6H14_2$C_bend, cp_C6H14_3$C_bend))
deltaC_br <- delta(Cp_C6H14_exp, cp)
#r <- data.frame(t, Cp_C6H14_mkt, Cp_C6H14_exp, cp, deltaC, deltaC_br)
return(data.frame(t_C6H14, Cp_C6H14_mkt, Cp_C6H14_exp, deltaC, cp, deltaC_br))
}
Мой грязный говнокод на R. Решал дз в инст, рассчет теплоемкости дряни по методу -Д-ж-и-г-у-р-д-ы-и-Б-а-р-р-и-А-л-е-б-а-с-о-в-а- Бенневица-Росснера. Шлю в кучу, потому что нет раздела для эрочки :( Особая ржака начинается со строчки №46.
+141
package eapi
// #include <eggdrop/mod/module.h>
// #include <eggdrop/main.h>
// #include <eggdrop/proto.h>
import (
"C"
"errors"
)
const (
DP_STDOUT = 0x7FF1
DP_LOG = 0x7FF2
DP_SERVER = 0x7FF3
DP_HELP = 0x7FF4
DP_STDERR = 0x7FF5
DP_MODE = 0x7FF6
DP_MODE_NEXT = 0x7FF7
DP_SERVER_NEXT = 0x7FF8
DP_HELP_NEXT = 0x7FF9
)
var (
binds []struct{
flags,match string
list *C.tcl_bind_list_t
}
bind_num int = 0
)
//...
func Bind(event,flags,match string, proc func(cd *C.ClientData, irp *C.Tcl_Interp, argc C.int, argv *[]C.char)) int,error{
tl := C.find_bind_table(C.CString(event))
if tl == nil{
return -1,errors.New("No such event table : "+ event)
}
func_name := bname(bind_num)
bind_num++
var cmd []C.tcl_cmds = {
{func_name,proc},
{nil,nil}
}
C.tcl_add_commands(cmd)
C.bind_bind_entry(tl, C.CString(flags), C.CString(match), C.CString(func_name))
append(binds,{flags,match,tl})
return bind_num-1,nil
}
func Unbind(int num){
if binds[num] == nil{
return
}
C.unbind_bind_entry(binds[num].list, C.CString(binds[num].flags), C.CString(binds[num].match), C.CString(bname(num)))
}
обертка на Go для Eggdrop API
+124
http://m.habrahabr.ru/post/249637/
−24
Оффтоп #2
Первая часть: http://govnokod.ru/18142
−54
* g o a t s e x * g o a t s e x * g o a t s e x *
g g
o / \ \ / \ o
a| | \ | | a
t| `. | | : t
s` | | \| | s
e \ | / / \\\ --__ \\ : e
x \ \/ _--~~ ~--__| \ | x
* \ \_-~ ~-_\ | *
g \_ \ _.--------.______\| | g
o \ \______// _ ___ _ (_(__> \ | o
a \ . C ___) ______ (_(____> | / a
t /\ | C ____)/ \ (_____> |_/ t
s / /\| C_____) | (___> / \ s
e | ( _C_____)\______/ // _/ / \ e
x | \ |__ \\_________// (__/ | x
* | \ \____) `---- --' | *
g | \_ ___\ /_ _/ | g
o | / | | \ | o
a | | / \ \ | a
t | / / | | \ |t
s | / / \__/\___/ | |s
e | / | | | |e
x | | | | | |x
* g o a t s e x * g o a t s e x * g o a t s e x *
https://searchcode.com/?q=goatse
https://code.openhub.net/search?s=goatse
+145
.panel-top ul.panel li:nth-child(1){
order: 1;
}
.panel-top ul.panel li:nth-child(2){
order: 4;
}
.panel-top ul.panel li:nth-child(3){
order: 2;
}
.panel-top ul.panel li:nth-child(4){
order: 5;
}
.panel-top ul.panel li:nth-child(5){
order: 3;
}
.panel-top ul.panel li:nth-child(6){
order: 6;
}
CSS Responsive