Context Navigation

fcg_gcssold.h @ 3871

Last change on this file since 3871 was 2019, checked in by fhourdin, 11 years ago
Passage au format libre pour inclure les ficheirs du 1D dans lmdz1d.F90
File size: 448 bytes

Rev	Line
[2017]	1	!
	2	! $Id: fcg_gcssold.h 2010-08-10 17:02:56Z lahellec $
	3	!
[2019]	4	logical :: imp_fcg_gcssold,ts_fcg_gcssold,Tp_fcg_gcssold
	5	logical :: Tp_ini_gcssold
	6	logical :: xTurb_fcg_gcssold
[2017]	7
[2019]	8	common /fcg_gcssold/imp_fcg_gcssold,ts_fcg_gcssold,Tp_fcg_gcssold, &
	9	& Tp_ini_gcssold, &
	10	& xTurb_fcg_gcssold
[2017]	11
	12	!$OMP THREADPRIVATE(/fcg_gcssold/)
	13
	14
	15
	16
	17
	18
	19
	20
	21
	22
	23
	24
	25
	26
	27
	28
	29
	30
	31
	32
	33
	34
	35
	36
	37
	38
	39
	40
	41
	42
	43
	44
	45
	46

Note: See TracBrowser for help on using the repository browser.