Context Navigation

fcg_gcssold.h @ 5872

Last change on this file since 5872 was 2019, checked in by fhourdin, 12 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.