Hallo everybody. This is my problem: I need to create a variable (a global one) to be used by various subroutines using a module. The problem is that I cannot use intrinsic functions in Module. Module Constants Implicit none Save real(8) :: area=100 real(8) :: side=dsqrt(area) End Module Constants I want to create the variable side (inside the Module) as result of an intrinsic function (dsqrt in the example) applied to a previous created variable. How can I solve this problem? Thank you for your help, Celevic