Ejemplo de entrada de datos para el cálculo de las primeras
fases de un puente construido por avance en voladizo.


//----------------------------------------------
// Archivo : Avance.Huebra.log
// Proyecto: Ejemplo de uso
// Objeto : Puente construido por avance en voladizo
// Autor : Francisco Cambronero Barrientos
// Compañia: www.vettones.com
// Fecha : 24-Noviembre-2002
// Programa: Vettones (Versión B.7.3.79)
// Tipo : Pórtico 2D
//----------------------------------------------

//borrar archivos de resultados de cálculos anteriores
DELETEFILES

//----------------------------------------------
// Nudos para la primera fase
//----------------------------------------------

//nudos para la primera pila
N,211,-2.345000e-13, -7.435096e+00
N,201,-1.797700e-12, -5.529665e+01
FILL,201,211

//nudos para las dos primeras dovelas
//definidos por el c.d.g.
//nudos para las dovelas a la izquierda
N, 9, -2.000000e+01, -2.420000
N, 10, -1.500000e+01, -2.760000
N, 11, -1.000000e+01, -3.140000
N, 12, -5.000000e+00, -3.570000

// Si se hubiese definido la sección del cajón por vértices y su variación,
// se hubiera podido, primero calcular automaticamente las características
// mecánicas, y luego hacer que el programa calcule la posición de los
// nudos para que pasen por el c.d.g.


//nudo del tablero encima de la pila
N, 13, -1.279000e-13, -4.040000e+00

//nudos para las dovelas a la derecha de la pila
N, 14, 5.000000e+00, -3.570000
N, 15, 1.000000e+01, -3.140000
N, 16, 1.500000e+01, -2.760000
N, 17, 2.000000e+01, -2.420000

//----------------------------------------------
// Elementos de la pila
//----------------------------------------------

//tipo de elemento
TYPE,1

//índice de material
MAT,10

//índice de característica mecánica
REAL,201

//crear elementos
EN,201,201,202
ENGEN,10,201

//barra de conexión entre pila y tablero
EN,211,211,13

//hormigón de la pila
//MPH,id,Fck,Humedad,Tiempo,Nuxy,Consistencia

MPH,10,4000.0,70.0,0.0, 0.2,1.0

//características mecánicas de la pila
//RH,idCon,It,Ac,Ix,pp,u,v,ef

RH,201,9.0085e+00,0.0000e+00,4.0824e+01,2.2500e+01,3.0000e+00,3.0000e+00,9.6520e-01

//empotramiento de la pila
D,201, 1,1,0, 0,0,1

//peso de la pila
//P,ele,qx,qy,tipo,ele2,paso

//En el módulo de construcción por fases el programa no mete
//las cargas de peso propio automaticamente, y hay
//que ponerlas explicitamente

P,201, 0.0,-2.2500e+01,GL,210,1

//----------------------------------------------
// Construcción de la pila ( día 15.0)
//----------------------------------------------

// Con la orden STEP se cálcula uns instante de tiempo
// con los datos definidos hasta ese momento.
// En la primera vez que aparece esta orden hay que
// poner la fecha en que empieza a funcionar
// estructuralmente el modelo.

STEP,Pila_1,15.0

// Módelo para la primera fase


// Para cada instante de tiempo que calcula el programa
// se crea los archivos de una estructura, la cual en su primera
// hipótesis guarda los resultados acumulados
// y en la segunda los incrementos en la última etapa de cálculo.

//----------------------------------------------
// Paso del tiempo
//----------------------------------------------

//pasa el tiempo hasta el día 30.0
// tres intervalos de cálculo de fluencia en el tiempo

SUBSTEP, 3 , 30.0 , 1.2

// Con la orden SUBSTEP se cálcula el número de pasos especificado
// en el tiempo, redistribuyendo esfuerzos por fluencia y retracción.
// En la próxima orden STEP ( cálculo de un instante de tiempo ) se hará
// para el día hasta el que se ha calculado la orden SUBSTEP anterior.

//----------------------------------------------
// Construcción de la primera dovela (Día 30.0)
//----------------------------------------------

//elementos
TYPE,1
MAT,0
REAL,11
EN, 11, 11, 12
ENGEN,-4,11

// Mediante la orden MPH se especifica la resistencia característica
// del hormigón 'fck', y el día de hormigonado.
// Esos datos los usará el programa para calcular el módulo
// de elasticidad en cada instante, y las curvas de fluencia
// y retracción.

//hormigonada el día 25
//el dia 30 se tesa y empieza a actuar
MPH,00,4000.0,70.0, 25.0 , 0.2,1.0

//características mecánicas
RH,11,2.2076e+01,0.0000e+00,1.1199e+02,5.5168e+01,3.1437e+00,2.9294e+00,1.3368e+00, 2.4178e+01,0.0000e+00,1.4765e+02,6.0423e+01,3.5704e+00,3.1522e+00,1.4141e+00

RH,12,2.4178e+01,0.0000e+00,1.4765e+02,6.0423e+01,3.5704e+00,3.1522e+00,1.4141e+00, 2.6485e+01,0.0000e+00,1.9387e+02,6.6192e+01,4.0408e+00,3.3943e+00,1.4931e+00

RH,13,2.6485e+01,0.0000e+00,1.9387e+02,6.6192e+01,4.0408e+00,3.3943e+00,1.4931e+00, 2.4178e+01,0.0000e+00,1.4765e+02,6.0423e+01,3.5704e+00,3.1522e+00,1.4141e+00

RH,14,2.4178e+01,0.0000e+00,1.4765e+02,6.0423e+01,3.5704e+00,3.1522e+00,1.4141e+00, 2.2076e+01,0.0000e+00,1.1199e+02,5.5168e+01,3.1437e+00,2.9294e+00,1.3368e+00

// Las características mecánicas especificadas son las 'brutas'
// En cada instante de tiempo, el programa calculará las características
// homogeneizadas con las familias de pretensado que pasen por la
// sección.

//obtener cargas de peso propio de las características mecánicas
FOR,I=11,14,1
   SETR,R,I,3
   SETR,S,I,10
   //peso propio
   PTRAP, I, 0.0,-R,0.0,-S,GL, I,1
NEXT

//----------------------------------------------
// Pretensado de la primera dovela
//----------------------------------------------

//subfamilias que definen la forma de los cables
SUBFAMILIA, 1,5, 6.00,10.0-2.0,10.04, 0.30, 0.50
SUBFAMILIA, 2,4, 6.00,10.0-2.0,10.04, 0.30, 0.50


/número de tendones
SET,PM=6
//composición de cada tendón
SET,PT=16

FAMILIA,1, PM ,PT*140/(1000^2),0.12,1.95e7,0.02,0.2,190000.0
FAMILIABARS,1, 11,14,1
FAMILIAGEOF,1, 1,2

//tesado de la familia
FAMILIATESA,1,0.21,0.006, PT*140*140/1000,1, PT*140*140/1000.0,2 ,0.006,0.006
FAMILIAINYEC,1

//----------------------------------------------
// Primera dovela ( Día 30.0)
//----------------------------------------------

STEP,Dovela_1


//----------------------------------------------
// Colocación del carro de avance a cada lado de la pila
//----------------------------------------------

F,11, 0,-80.0,0, 0,0,0
F,12, 0,+40.0,0, 0,0,0
F,14, 0,+40.0,0, 0,0,0
F,15, 0,-80.0,0, 0,0,0

STEP,Carro_1


//pasa el tiempo hasta el día 40.0
SUBSTEP,3,40.0,1.2

//----------------------------------------------
// Segunda dovela (día 40.0)
//----------------------------------------------

TYPE,1
MAT,1

//hormigonada el día 35
//el dia 30 se tesa y empieza a actuar
MPH,1,4000.0,70.0, 35 , 0.2,1.0

//lado izquierdo
REAL,9
EN, 9, 9,10
ENGEN,-2,9

//lado derecho
REAL,15
EN, 15, 15,16
ENGEN,-2,15

//características mecánicas lado izquierdo
RH, 9, 1.8486e+01,0.0000e+00,6.4130e+01,4.6194e+01,2.4211e+00,2.5411e+00,1.1915e+00, 2.0179e+01,0.0000e+00,8.4743e+01,5.0427e+01,2.7608e+00,2.7256e+00,1.2623e+00

RH,10, 2.0179e+01,0.0000e+00,8.4743e+01,5.0427e+01,2.7608e+00,2.7256e+00,1.2623e+00, 2.2076e+01,0.0000e+00,1.1199e+02,5.5168e+01,3.1437e+00,2.9294e+00,1.3368e+00

//lado derecho
RH,15, 2.2076e+01,0.0000e+00,1.1199e+02,5.5168e+01,3.1437e+00,2.9294e+00,1.3368e+00, 2.0179e+01,0.0000e+00,8.4743e+01,5.0427e+01,2.7608e+00,2.7256e+00,1.2623e+00

RH,16, 2.0179e+01,0.0000e+00,8.4743e+01,5.0427e+01,2.7608e+00,2.7256e+00,1.2623e+00, 1.8486e+01,0.0000e+00,6.4130e+01,4.6194e+01,2.4211e+00,2.5411e+00,1.1915e+00

//peso propio lado izquierdo
FOR,I=9,10,1
   SETR,R,I,3
   SETR,S,I,10
   //peso propio
   PTRAP, I, 0.0,-R,0.0,-S,GL, I,1
NEXT

//peso propio lado derecho
FOR,I=15,16,1
   SETR,R,I,3
   SETR,S,I,10
   //peso propio
   PTRAP, I, 0.0,-R,0.0,-S,GL, I,1
NEXT

//----------------------------------------------
// Pretensado de la segunda dovela
//----------------------------------------------

SUBFAMILIA, 3,5, 16.00,20.0-2.0,20.07, 0.30, 0.50
SUBFAMILIA, 4,4, 16.00,20.0-2.0,20.07, 0.30, 0.50

/número de tendones
SET,PM=6
//composición de cada tendón
SET,PT=16
FAMILIA,2, PM ,PT*140/(1000^2),0.12,1.95e7,0.02,0.2,190000.0
FAMILIABARS,2, 9,16,1
FAMILIAGEOF,2, 3,4

FAMILIATESA,2,0.21,0.006, PT*140*140/1000,1, PT*140*140/1000.0,2 ,0.006,0.006
FAMILIAINYEC,2

//----------------------------------------------
// Segunda dovela ( Día 40)
//----------------------------------------------

STEP,Dovela_2

// Axiles acumulados

// Tensiones acumuladas en fibra superior.

//----------------------------------------------
// Avance del carro
//----------------------------------------------

//se quita de donde esta
F,11, 0,+80.0,0, 0,0,0
F,12, 0,-40.0,0, 0,0,0

F,14, 0,-40.0,0, 0,0,0
F,15, 0,+80.0,0, 0,0,0

//se pone en la nueva posición
F, 9, 0,-80.0,0, 0,0,0
F,10, 0,+40.0,0, 0,0,0

F,16, 0,+40.0,0, 0,0,0
F,17, 0,-80.0,0, 0,0,0

STEP,Carro_2

//pasa el tiempo hasta el día 50.0
SUBSTEP,3,50.0,1.2

//----------------------------------------------
// Segunda pila
//----------------------------------------------

//generar nudos para la segunda pila
NGEN,2,200, 201,211,1, 120,0,0

//elementos de la segunda pila
TYPE,1
MAT,11
REAL,401
EN,401,401,402
ENGEN,10,401
//hormigón de la pila
MPH,11,4000.0,70.0, 45.0 , 0.2,1.0

//características mecánicas de la pila
RH,401,9.0085e+00,0.0000e+00,4.0824e+01,2.2500e+01,3.0000e+00,3.0000e+00,9.6520e-01

//empotramiento de la pila
D,401, 1,1,0, 0,0,1

//peso de la pila
P,401, 0.0,-2.2500e+01,GL,410,1

//----------------------------------------------
// Construcción de la segunda pila ( Día 50.0)
//----------------------------------------------

STEP,Pila_2


// Historia de movimientos acumulados de un nudo

// Acabamos aqui el presente ejemplo.

// Cuando despues de varias etapas de cálculo se construyan los dos voladizos
// de un vano, y ambos extremos se unan con un elemento estableciendo
// la continuidad del vano, el programa empezará a calcular con el nuevo
// esquema estático y redistribuir los esfuerzos de construcción.

//----------------------------------------------
// Crear dibujos en formato DXF
//----------------------------------------------

//dibujo del puente
SCRIPTCANTO,0.15

//trazado de las familias de cables
FAMILIADXF,1,2

//cotas de los cables (desde tabla inferior)
FAMILIATXT,1,2, ,0.3,1.4,0

//nota de cálculo de los cables
FAMILIANC,1,2

//compone todos los dxf en uno solo
SUMADXF,todo,avance.huebra,avance.huebra.1,avance.huebra.1txt

// DXF creado por el programa

//salvar resultados de las familias de pretensado
//para poder acceder a los resultados mas tarde.
SAVEPRET

//----------------------------------------------
// Fin del archivo.
//----------------------------------------------